HaskellCourse/cm/io_rev.hs

-- Slide 55
-- It makes more sense to compile this file

import Data.List

main::IO()
main = getLine >>= putStrLn.(\x -> concat [x, " ", reverse x])