PROGRAM GAMMA2

CHARACTER*0 K

I = BETA
Z = 9
Z = 32
DO 4 X = 7,89
K = BETA
94 CONTINUE
ALPHA = 20
IF (K.LE.Z) THEN
BETA = BETA
I = J/K
ELSE
X = X-Y
END IF

END

 

more