PROGRAM GAMMA2

LOGICAL X,Z,I,ALPHA,X
COMMON / ALPHA / I
LOGICAL K,Y
CHARACTER*7 I,J,I,K,BETA

Z = 01

END

 

more