examples for the new programs

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2017 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
rzf
2007-11-15 12:38:55 +00:00
parent 83b4c2cdac
commit 8fb01d6607
26 changed files with 281 additions and 49 deletions

View File

@@ -0,0 +1,13 @@
/*
?- s([death],P).
P = 0.305555555555556 ?
yes
?-
*/
death : 1/6 :- pull_trigger(left_gun).
death : 1/6 :- pull_trigger(right_gun).
pull_trigger(left_gun).
pull_trigger(right_gun).