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