PROGRAM GAMMA2
CHARACTER*7 Y,Z,ALPHA,X,Y,BETA
LOGICAL ALPHA,X,BETA,ALPHA
X = COS(ALPHA+X)
I = TAN(Z)
END
more