PROGRAM GAMMA2

INTEGER Y,K,I,I,X,X,X,BETA,Z,X,K,Z,X,K,J
CHARACTER*8 ALPHA,K
LOGICAL Y,I,I,K

K = COS(K)
Y = SIN(COS(19))

END

 

more