1 files changed, 2 insertions, 2 deletions
diff --git a/tit4tat.pl b/tit4tat.pl
index 528d915..6f801be 100644
--- a/tit4tat.pl
+++ b/tit4tat.pl
@@ -38,7 +38,7 @@ tit4tat(A, Hist, PayA, PayB) :-
 sum([], 0).
 sum([H|T], S) :- sum(T, TMP), S is TMP + H.
 
-do(e, _, _, _):-!.
+do(e, _, _, _) :- !.
 do(Choice, Hist, PayedA, PayedB) :-
 	tit4tat(Choice, Hist, PayA, PayB),
 
@@ -54,4 +54,4 @@ loop(Hist, PayedA, PayedB) :-
 	write('Type c,d or e to end: '), read(Choice),
 	do(Choice, Hist, PayedA, PayedB).
 
-start :- loop([], [], []),halt.
+start :- loop([], [], []), halt.