import Data.List (sort) main :: IO () main = putStrLn . reverse . sort =<< getLine