summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBenjamin Franzke <benjaminfranzke@googlemail.com>2012-11-06 11:49:17 +0100
committerBenjamin Franzke <benjaminfranzke@googlemail.com>2012-11-06 11:49:17 +0100
commit37d9f943bcb59e7c8523e318ad9849e5743e294a (patch)
treee1c4e427fc0e3c38085789e2d1adaf6ed1ae25e1
parent065cedc2f11a12cc8ebee5bf3a2f9d3d1dc30ae9 (diff)
downloadwbs-37d9f943bcb59e7c8523e318ad9849e5743e294a.tar.gz
wbs-37d9f943bcb59e7c8523e318ad9849e5743e294a.tar.bz2
wbs-37d9f943bcb59e7c8523e318ad9849e5743e294a.zip
tit4tat.pl: Remove debug output
-rw-r--r--tit4tat.pl1
1 files changed, 0 insertions, 1 deletions
diff --git a/tit4tat.pl b/tit4tat.pl
index 6f801be..d6600e7 100644
--- a/tit4tat.pl
+++ b/tit4tat.pl
@@ -46,7 +46,6 @@ do(Choice, Hist, PayedA, PayedB) :-
write('B Pay: '), write(PayB), write('\t'),
write('A: '), sum([PayA|PayedA], SumA), write(SumA), write('\t'),
write('B: '), sum([PayB|PayedB], SumB), write(SumB), nl,
- write(Choice),nl,
loop([Choice|Hist], [PayA|PayedA], [PayB|PayedB]).