import Control.Applicative

qsort :: [Int] -> [Int]
qsort []     = []
qsort (p:xs) = qsort lt ++ [p] ++ qsort gteq
  where lt   = [x | x <- xs, x < p ]
        gteq = [x | x <- xs, x >= p]


main :: IO()
main = do
  line <- map (read :: String -> Int) . words <$> getLine
  putStrLn $ unwords $ map show $ qsort line