From 22b189d3f9b07e0bd9d3fc2c852b16560980d8f6 Mon Sep 17 00:00:00 2001
From: Jan Klemkow <j.klemkow@wemelug.de>
Date: Sat, 10 Nov 2012 16:24:13 +0100
Subject: Add prolog code for tit3tat rules.

---
 doc/presentation.asciidoc | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

(limited to 'doc/presentation.asciidoc')

diff --git a/doc/presentation.asciidoc b/doc/presentation.asciidoc
index ebd2091..dc9ad65 100644
--- a/doc/presentation.asciidoc
+++ b/doc/presentation.asciidoc
@@ -10,6 +10,23 @@ Gefangenendilemma in Prolog
 == Spielregeln
 image::image/game_rules.svg[game rules]
 
+== Computerspielerregeln
+
+[source,prolog]
+----
+% Tit for Tat:
+% Begins with cooperation and then plays what its opponent played in the last
+% move (if the opponent defects in some round, Tit for Tat will defect in the
+% following one; to cooperation it responds with cooperation).
+
+% Syntax: MODULE(UserDecisionHistry [in], ModuleDecision [out])
+
+% Use opponents last decision
+tit4tat([Last|_],Last,_,_).
+% Fallback to coorporate if history is empty.
+tit4tat([],c,_,_).
+----
+
 == Netzwerkprotokoll
  * TCP Port 8068
  * Uebertragung von einem Byte!
-- 
cgit 

