diff --git a/src/strategies/k90r.f b/src/strategies/k90r.f index 733ff02..c6aa9ce 100644 --- a/src/strategies/k90r.f +++ b/src/strategies/k90r.f @@ -7,5 +7,5 @@ FUNCTION K90R(J,M,K,L,R, JA) k90r=0 if((jold.eq.1).and.(j.eq.1)) k90r=1 jold=j - RETURN + RETURN END