DricomDragon 5 éve
szülő
commit
fddc128534
1 módosított fájl, 7 hozzáadás és 0 törlés
  1. 7 0
      io_rev.hs

+ 7 - 0
io_rev.hs

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