PROGRAM GAMMA2

CHARACTER*61 J,Z,Y

J = BETA-K
Z = ALPHA-(ALPHA)
X = SIN(Y)
I = BETA
K = Z+X
BETA = I
Z = Y+X

END

 

more