C  TC2S.INC			NO DESCRIPTION
C
	REAL  TC2S(5,21)
	REAL  TC2SL(105)
	EQUIVALENCE  (TC2S(1,1),TC2SL(1))
C
	COMMON /TC2S/ TC2S