A-M baby

Task/Loops-Foreach/Ela/loops-foreach-1.ela

@@ -0,0 +1,3 @@
+open console imperative
+
+each writen [1..10]

Task/Loops-Foreach/Ela/loops-foreach-2.ela

@@ -0,0 +1,2 @@
+each f (x::xs) = f x $ each f xs
+each _ [] = ()

Task/Loops-Foreach/Ela/loops-foreach-3.ela

@@ -0,0 +1,3 @@
+open console list
+
+_ = map writen [1..10]

Task/Loops-Foreach/Ela/loops-foreach-4.ela

@@ -0,0 +1,4 @@
+each (x::xs) = writen x $ each xs
+each []      = ()
+
+each [1..10]