added some test file

added a target to makefile to perform individual tests git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2040 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2007-12-05 17:43:32 +00:00
parent 9c511da82c
commit 803e032b9f
7 changed files with 113 additions and 6 deletions
--- a/cplint/examples/exist.cpl
+++ b/cplint/examples/exist.cpl
@@ -0,0 +1,32 @@
+/*
+semlpad.pl
+ground_body(false)
+   ?- s([a],P).
+P = 0.18 ?
+
+ground_body(true)
+   ?- s([a],P).
+P = 0.19 ? 
+yes
+
+ 
+yes
+lpad.pl
+ground_body(false)
+   ?- s([a],P).
+P = 0.02 ? 
+yes
+ground_body(true)
+   ?- s([a],P).
+P = 0.19 ? 
+yes
+
+*/
+
+a:0.5 :- p(X).
+
+p(X):0.2 :- c(X).
+
+c(1).
+
+c(2).