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.
yap-6.3/packages/cplint/examples/exrange.cpl
2009-02-16 12:23:29 +00:00

22 lines
231 B
Plaintext

/*
s([a(X)],P).
Variables: [(1,[]),(5,[]),(2,[]),(6,[])]
P = 0.2775
X = 1 ? ;
Variables: [(3,[]),(5,[]),(4,[]),(6,[])]
P = 0.36
X = 2 ? ;
*/
a(1):0.3:-p(1).
a(1):0.3:-p(2).
a(2):0.4:-p(1).
a(2):0.4:-p(2).
p(1):0.5.
p(2):0.5.