Parcourir la source

Implement a prog to swap two inputs

DricomDragon il y a 5 ans
Parent
commit
2681135c7d
1 fichiers modifiés avec 7 ajouts et 0 suppressions
  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)))