init commit again

2023-11-01 09:29:33 +01:00
parent 448147e7da
commit d6c745207b
250 changed files with 15552 additions and 1 deletions
--- a/IBAF-cbs/Funcons-beta/Computations/Normal/Storing/tests/structural-assign-2.config
+++ b/IBAF-cbs/Funcons-beta/Computations/Normal/Storing/tests/structural-assign-2.config
@@ -0,0 +1,22 @@
+general {
+    funcon-term: 
+      initialise-storing
+      give(
+        tuple(
+          allocate-initialised-variable(booleans,false),
+          42,
+          allocate-initialised-variable(booleans,true)),
+        sequential(
+          structural-assign(given,tuple(true,42,false)),
+          else(
+            structural-assign(given,[true,42,false]), 
+            structural-assign(given,tuple(true,99,false)), 
+            structural-assign(given,false), 
+            print"OK")))
+        ;
+}
+
+tests {
+    result-term: null-value;
+    standard-out: ["OK"];
+}