C T NO DESCRIPTION C REAL T(5,21), TV(5,21) REAL TL(105), TVL(105) EQUIVALENCE (T(1,1),TL(1)), (TV(1,1),TVL(1)) C COMMON /T/ T, TV