This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
|
/*
|
|
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).
|