summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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]).