Argument Definitions (+ indicates altered content) REAL +A(0:361), +B(0:361), UUST
Description pre-sets arrays of trig values if uust=1, 91 values are set if uust=1/3, 271 values are set -- WHAT??? This won't work!!!
Source file: trigfun.f
Intrinsic Functions Called INTEGER IFIX GENERIC COS, SIN
Local Variables (+ indicates altered content) REAL +Z
Referenced Common Block Variables (+ indicates altered content) GENERAL REAL Q1