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