diff options
Diffstat (limited to 'tit4tat.pl')
-rw-r--r-- | tit4tat.pl | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -22,9 +22,7 @@ pay(d,d,2). pay(c,c,3). pay(d,c,4). -pay2(A, B, PayA, PayB) :- - pay(A, B, PayA), - pay(B, A, PayB). +pay2(A, B, PayA, PayB) :- pay(A, B, PayA), pay(B, A, PayB). % Use opponents last decision tit4tat_select(H,[H|_]). |