init commit again

IBAF-cbs/Funcons-beta/Computations/Normal/Giving/tests/interleave-map.config

@@ -0,0 +1,20 @@
+general {
+    funcon-term: 
+      initialise-giving
+      sequential(
+        print [ interleave-map(fail, ( )) ],
+        tuple interleave-map(
+          sequential(print integer-add(given,2), given),
+          sequential(print 1, 1),
+          sequential(print 2, 2)))
+        ;
+}
+
+tests {
+    result-term: tuple(1, 2);
+    standard-out: [ [ ], 1, 2, 3, 4];
+//Also:
+//  standard-out: [ [ ], 2, 1, 3, 4];
+//  standard-out: [ [ ], 1, 2, 4, 3];
+//  standard-out: [ [ ], 2, 1, 4, 3];
+}