Initial data commit

Task/Loops-For/Ela/loops-for-1.ela

@@ -0,0 +1,13 @@
+open monad io
+
+loop m n | n < m = do
+            loop' n 0
+            putStrLn ""
+            loop m (n + 1)
+         | else = do return ()
+          where loop' m n | n <= m = do
+                              putStr "*"
+                              loop' m (n + 1)
+                          | else = do return ()
+
+_ = loop 10 1 ::: IO

Task/Loops-For/Ela/loops-for-2.ela

@@ -0,0 +1,9 @@
+**
+***
+****
+*****
+******
+*******
+********
+*********
+**********