diff options
| -rw-r--r-- | tit42tat.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tit42tat.pl b/tit42tat.pl index 72a6e6a..281bc4d 100644 --- a/tit42tat.pl +++ b/tit42tat.pl @@ -1,5 +1,5 @@ % Select distraction only if opponents both last decision were to distract. % See: http://en.wikipedia.org/wiki/Tit_for_tat#Tit_for_two_tats -tit42tat([d,d|_],d,_,_). +tit42tat([d,d|_],d,_,_):-!. tit42tat(_,c,_,_). |