summaryrefslogtreecommitdiff
path: root/rules/hard_tit4tat.pl
diff options
context:
space:
mode:
Diffstat (limited to 'rules/hard_tit4tat.pl')
-rw-r--r--rules/hard_tit4tat.pl2
1 files changed, 2 insertions, 0 deletions
diff --git a/rules/hard_tit4tat.pl b/rules/hard_tit4tat.pl
index 8efc124..6ba56e6 100644
--- a/rules/hard_tit4tat.pl
+++ b/rules/hard_tit4tat.pl
@@ -2,5 +2,7 @@
% Cooperates unless the opponent has defected
% at least once in the last two rounds.
+% Syntax: hard_tit4tat(+history, -choice, +state_in, -state_out)
+
hard_tit4tat([A,B|_],d,_,_):-(A=d;B=d),!.
hard_tit4tat(_,c,_,_).