Adding disjuction elimination test

eyereasoner · Jul 12, 2024 · a914c3e · a914c3e
1 parent 5e8a057
commit a914c3e
Show file tree

Hide file tree

Showing 2 changed files with 20 additions and 1 deletion.
diff --git a/test/pure/disjunction_elimination4.n3s b/test/pure/disjunction_elimination4.n3s
@@ -0,0 +1,19 @@
+@prefix : <urn:example:> .
+@prefix log: <http://www.w3.org/2000/10/swap/log#> .
+
+# (A & B) v (A & C)
+# leads to A
+
+() log:onNegativeSurface {
+    () log:onNegativeSurface {
+        :test :is true .
+        :Moon a :Cheese .
+    } .
+
+    () log:onNegativeSurface {
+        :test :is true .
+        :FrenchKing a :Bald .
+    } .
+} .
+
+() log:onNegativeSurface { :test :is true. () log:onNegativeAnswerSurface { :test :is true } } .
diff --git a/test/pure/disjunction_introduction.n3s b/test/pure/disjunction_introduction.n3s
@@ -6,7 +6,7 @@
 # requires C to be true
 :Alice a :Person .
 
-() log:onNegativeAnswerSurface {
+() log:onNegativeSurface {
 
     () log:onNegativeSurface {
         () log:onNegativeSurface {