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-3.config
+++ b/IBAF-cbs/Funcons-beta/Computations/Normal/Storing/tests/structural-assign-3.config
@@ -0,0 +1,25 @@
+general {
+    funcon-term:
+      initialise-storing
+      give(
+        { "a" |-> allocate-initialised-variable(booleans,false),
+          "b" |-> 42,
+          "c" |-> allocate-initialised-variable(booleans,true) },
+        sequential(
+          structural-assign(map(),map()),
+          structural-assign(given,{"a"|->true,"b"|->42,"c"|->false}),
+          structural-assign(true,true),
+          else(
+            structural-assign(given,{"a"|->true,"b"|->99,"c"|->false}),
+            structural-assign(given,{"a"|->true,"c"|->false}),
+            structural-assign(given,map()),
+            structural-assign(given,{"a"|->true,"b"|->42,"c"|->false,"d"|->()}),
+            structural-assign(true,false),
+            print"OK")))
+        ;
+}
+
+tests {
+    result-term: null-value;
+    standard-out: ["OK"];
+}