Skip to content

Commit 091986d

Browse files
authored
Merge pull request #6 from Axelrod-Python/fix-k61r
Fix k61r.
2 parents 4bf5f9d + f4f8769 commit 091986d

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

src/strategies/k61r.f

+1
Original file line numberDiff line numberDiff line change
@@ -2,6 +2,7 @@ FUNCTION K61R(ISPICK,ITURN,K,L,R, JA)
22
C BY DANNY C. CHAMPION
33
C TYPED BY JM 3/27/79
44
k61r=ja ! Added 7/27/93 to report own old value
5+
IF (ITURN .EQ. 1) ICOOP = 0 ! Added 10/8/2017 to fix bug for multiple runs
56
IF (ITURN .EQ. 1) K61R = 0
67
IF (ISPICK .EQ. 0) ICOOP = ICOOP + 1
78
IF (ITURN .LE. 10) RETURN

0 commit comments

Comments
 (0)