diff options
| author | Jan Klemkow <j.klemkow@wemelug.de> | 2012-11-11 09:51:55 +0100 |
|---|---|---|
| committer | Jan Klemkow <j.klemkow@wemelug.de> | 2012-11-11 09:51:55 +0100 |
| commit | cefe0246166fd68ae0877a37717d0b18b3551750 (patch) | |
| tree | ecda5fed93c22d89653602a55ec81ccdb38e1c76 | |
| parent | 22b189d3f9b07e0bd9d3fc2c852b16560980d8f6 (diff) | |
| download | wbs-cefe0246166fd68ae0877a37717d0b18b3551750.tar.gz wbs-cefe0246166fd68ae0877a37717d0b18b3551750.tar.bz2 wbs-cefe0246166fd68ae0877a37717d0b18b3551750.zip | |
Add tit4tat prolog code example.
| -rw-r--r-- | doc/presentation.asciidoc | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/doc/presentation.asciidoc b/doc/presentation.asciidoc index dc9ad65..38b565e 100644 --- a/doc/presentation.asciidoc +++ b/doc/presentation.asciidoc @@ -14,17 +14,7 @@ image::image/game_rules.svg[game rules] [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,_,_). +include::../rules/tit4tat.pl[] ---- == Netzwerkprotokoll |