summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBenjamin Franzke <benjaminfranzke@googlemail.com>2012-11-08 13:27:49 +0100
committerBenjamin Franzke <benjaminfranzke@googlemail.com>2012-11-08 13:27:49 +0100
commit858300e97a00f969e16992d479698d048e551df6 (patch)
treea0d3cf365f8b7251182e03c39478afa6268f2173
parent553e4655f2227783051d5ea7fba65d9135310ad4 (diff)
downloadwbs-858300e97a00f969e16992d479698d048e551df6.tar.gz
wbs-858300e97a00f969e16992d479698d048e551df6.tar.bz2
wbs-858300e97a00f969e16992d479698d048e551df6.zip
prisoners_dilemma.pl: Remove debug code
-rw-r--r--prisoners_dilemma.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/prisoners_dilemma.pl b/prisoners_dilemma.pl
index 16d0388..f4f5d74 100644
--- a/prisoners_dilemma.pl
+++ b/prisoners_dilemma.pl
@@ -46,5 +46,6 @@ loop(Module, ModuleState, Hist, PayedA, PayedB) :-
do(Choice, Module, ModuleState, Hist, PayedA, PayedB).
-start(Module) :- atom_concat('rules/', Module, Path), write(Path), consult(Path), loop(Module, [], [], [], []).
+start(Module) :- atom_concat('rules/', Module, Path), consult(Path),
+ loop(Module, [], [], [], []).
start :- start(tit4tat),halt.