PROGRAM TEST

COMMON / X / ALPHA,X

ALPHA = ALPHA-(8)

END

 

more