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/coin2.uni
2009-02-16 12:23:29 +00:00

10 lines
156 B
Plaintext

universe(['Coin'],[coin1,coin2]).
mode(heads(coin)).
mode(tails(coin)).
mode(toss(coin)).
mode(fair(coin)).
mode(biased(coin)).
type(coin,[coin1,coin2]).