Browse Source

Implement a prog to swap two inputs

DricomDragon 5 years ago
parent
commit
2681135c7d
1 changed files with 7 additions and 0 deletions
  1. 7 0
      io_shuffle.hs

+ 7 - 0
io_shuffle.hs

@@ -0,0 +1,7 @@
+-- Slide 55
+-- It makes more sense to compile this file
+
+import Data.List
+
+main::IO()
+main = getLine >>= (\x -> getLine >>= (\y -> putStrLn (y ++ x)))