io_shuffle.hs 151 B

1234567
  1. -- Slide 55
  2. -- It makes more sense to compile this file
  3. import Data.List
  4. main::IO()
  5. main = getLine >>= (\x -> getLine >>= (\y -> putStrLn (y ++ x)))