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/Values/Abstraction/Patterns/tests/pattern-unite.config
+++ b/IBAF-cbs/Funcons-beta/Values/Abstraction/Patterns/tests/pattern-unite.config
@@ -0,0 +1,19 @@
+general {
+    funcon-term: 
+      initialise-giving
+      initialise-binding
+      sequential(
+        check-true is-equal(
+          match(false,pattern-unite(pattern-bind"a",pattern-bind"b")), {"a"|->false,"b"|->false}),
+        check-true is-equal(
+          match(false,pattern-unite(pattern-type booleans,pattern-bind"b")), {"b"|->false}),
+        else(
+          effect match(false,pattern-unite(pattern-bind"a",pattern-bind"a")),
+        print"OK"))
+        ;
+}
+
+tests {
+    result-term: null-value;
+    standard-out: ["OK"];
+}