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