2016 Update

Task/Loop-over-multiple-arrays-simultaneously/Ela/loop-over-multiple-arrays-simultaneously-1.ela

@@ -1,6 +1,12 @@
-open console list imperative
+open monad io list imperative
 
 xs = zipWith3 (\x y z -> show x ++ show y ++ show z) ['a','b','c']
-['A','B','C'] [1,2,3]
+  ['A','B','C'] [1,2,3]
 
-each writen xs
+print x = do putStrLn x
+
+print_and_calc xs = do
+  xss <- return xs
+  return $ each print xss
+
+print_and_calc xs ::: IO