C  UC2S.INC                    NO DESCRIPTION
C
	REAL  UC2S(5,56)
	REAL  UC2SL(280)
	EQUIVALENCE  (UC2S(1,1),UC2SL(1))
C
	COMMON /UC2S/ UC2S