PROGRAM %MAIN ( )

Source file:t208j.f
Intrinsic Functions Called
GENERIC            COS,        SQRT
Local Variables (+ indicates altered content)
REAL              +A