PROGRAM GAMMA2

CHARACTER*7 Y,Z,ALPHA,X,Y,BETA
LOGICAL ALPHA,X,BETA,ALPHA

X = COS(ALPHA+X)
I = TAN(Z)

END

 

more