summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--hard_tit4tat.pl2
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,_,_).