index
:
wbs
master
Prisoners Dilemma implemented in Prolog
root
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
rules
/
random_choice.pl
blob: 3bd4a9161ccc52f4aa8091d924f9801340e0aa98 (
plain
)
1
2
random_choice
(
_
,
Choice
,
_
,
_
) :-
random
(
Number
), (
Number
<
0.5
->
Choice
=
c
;
Choice
=
d
).