Data commit

Task/Loops-N-plus-one-half/Oz/loops-n-plus-one-half-1.oz

@@ -0,0 +1,5 @@
+for N in {List.number 1 10 1} break:Break do
+   {System.printInfo N}
+   if N == 10 then {Break} end
+   {System.printInfo ", "}
+end

Task/Loops-N-plus-one-half/Oz/loops-n-plus-one-half-2.oz

@@ -0,0 +1,11 @@
+declare
+  fun {CommaSep Xs}
+     case Xs of nil then nil
+     [] X|Xr then
+	{FoldL Xr
+	 fun {$ Z X} Z#", "#X end
+	 X}
+     end
+  end
+in
+  {System.showInfo {CommaSep {List.number 1 10 1}}}