Argument Definitions (+ indicates altered content) REAL PHI, THETA
Description PARAMETERS: THETA - takeoff angle in radians PHI - azimuthal angle in radians
Source file: f2.f
Intrinsic Functions Called INTEGER IABS GENERIC COS, SIN
Local Variables (+ indicates altered content) INTEGER +I, +NBS REAL +ARG, +COF, +CPHI, +CPSI REAL +CTHETA, +EF, +FX, +FYI REAL +FYR, +FZPHR, +FZTHR, +SPHI REAL +SPSI2, +STHETA
Referenced Common Block Variables (+ indicates altered content) ANTDAT INTEGER NOSTAK, NUMBAY FWAVE REAL C(8), CEIL FWAVE REAL EIL, PS(14) FWAVE REAL R(14), XR FWAVE REAL Y(14), Z(8)