diff options
| -rw-r--r-- | tit42tat.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tit42tat.pl b/tit42tat.pl new file mode 100644 index 0000000..4ec519d --- /dev/null +++ b/tit42tat.pl @@ -0,0 +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(_,c). |