REAL FUNCTION CANG ( Z )
Argument Definitions (+ indicates altered content)
COMPLEX            Z
Description
FUNCTION CANG               (NEXT) 
 
 
     FOR USE WITH HFMUFES3 IN SYSTEMS WHERE FUNCTION CANG IS MISSING. 
 
 
 
    CANG - COMPUTES CANG=ARG(Z), Z=X + I*Y=COMPLEX NUMBER, SUCH THAT 
       -PI .LT. CANG .LE. +PI.  SEE CONTROL DATA CORP. 3600/3800 
       COMPUTER SYSTEMS LIBRARY FUNCTIONS MANUAL, PUBLICATION NO. 
       60056400, JULY 1, 1966.
Source file:cang.f
Intrinsic Functions Called
REAL               AIMAG
GENERIC            ATAN,       REAL
Local Variables (+ indicates altered content)
REAL              +X,         +Y
Referenced Common Block Variables (+ indicates altered content)
CON                REAL               PI,        PIO2