diff options
| author | Benjamin Franzke <benjaminfranzke@googlemail.com> | 2012-11-07 13:47:50 +0100 |
|---|---|---|
| committer | Benjamin Franzke <benjaminfranzke@googlemail.com> | 2012-11-07 13:47:50 +0100 |
| commit | 4affb8a63a09aacae4fe2c2c4bda8b9459eb5ef9 (patch) | |
| tree | 1960bdbb34d976850e2ccd0859fb2ea24692004d /hard_tit4tat.pl | |
| parent | a4981391e069f1705f928524a4ef2b2a36586a71 (diff) | |
| download | wbs-4affb8a63a09aacae4fe2c2c4bda8b9459eb5ef9.tar.gz wbs-4affb8a63a09aacae4fe2c2c4bda8b9459eb5ef9.tar.bz2 wbs-4affb8a63a09aacae4fe2c2c4bda8b9459eb5ef9.zip | |
Prisoners Dilemma: Add hard_tit4tat algorithm
Diffstat (limited to 'hard_tit4tat.pl')
| -rw-r--r-- | hard_tit4tat.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/hard_tit4tat.pl b/hard_tit4tat.pl new file mode 100644 index 0000000..5bff447 --- /dev/null +++ b/hard_tit4tat.pl @@ -0,0 +1,2 @@ +hard_tit4tat([A,B|_],d,_,_):-(A=d;B=d),!. +hard_tit4tat(_,c,_,_). |