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.
|
universe(['Coin'],[coin1,coin2]).
|
|
|
|
mode(heads(coin)).
|
|
mode(tails(coin)).
|
|
mode(toss(coin)).
|
|
mode(fair(coin)).
|
|
mode(biased(coin)).
|
|
|
|
type(coin,[coin1,coin2]).
|