From 7042741c556899fa1bebfea57603b28c366343a4 Mon Sep 17 00:00:00 2001 From: Benjamin Franzke Date: Tue, 6 Nov 2012 17:03:39 +0100 Subject: Prisoners Dilemma: Add tit for two tats algorithm --- tit42tat.pl | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 tit42tat.pl 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). -- cgit