Argument Definitions (+ indicates altered content)

REAL S

Description

FUNCTION REACT (NEXT) REACT - PARAMETERS FOR THE MUTUAL REACTANCE EVALUATION BY GAUSSIAN INTEGRATION. CALLED BY AGAUSS (BY DIRECTION OF MUTUAL) TO EVALUATE INTEGRAND SEE REFERENCES IN SUBROUTINE GAIN

Source file:	react.f

Intrinsic Functions Called

GENERIC ABS, COS, SIN, SQRT

Local Variables (+ indicates altered content)

REAL +CA, +CA1, +CA2, +CR REAL +CR1, +CR2, +FACX, +R REAL +R1, +R2, +RHO2, +SY REAL +SZ, +TERM

Referenced Common Block Variables (+ indicates altered content)

CON REAL PI2 MUT REAL CFAC, CT MUT REAL H2, PROD1 MUT REAL Y0, Z0