c====>Begin Module %MAIN File t208c.f c---->Makedcls Options: All variables c c Local variables c CHARACTER C, CNL CHARACTER*144 S, T, T1, T2 CHARACTER*144 T3, T4, T5, T6 CHARACTER*144 T7 CHARACTER*72 U c COMPLEX*12 Y COMPLEX YNL c INTEGER*2 SHORT INTEGER SHORTNL c LOGICAL LOGNL LOGICAL*1 LOGVAR LOGICAL*2 LOGVAR2 c REAL*16 X16 REAL*6 X6 REAL*8 X8 REAL XNL c c====>End Module %MAIN File t208c.f