sort.hs

import List

main = do cs <- getContents
          putStr $ unlines $ sort $ lines cs

[Sample Code Index] [Support Site Top]