SUBROUTINE COLL ( SUM )
Argument Definitions (+ indicates altered content)
COMPLEX           +SUM
Description
SUBROUTINE COLL             (NEXT) 
 
    COLL - CALCULATES THE MUTUAL IMPEDANCE BETWEEN COLINEAR DIPOLE 
       ELEMENTS OF EQUAL LENGTHS. 
    SEE REFERENCES IN SUBROUTINE GAIN AND ALSO THE ARTICLE BY 
    H.E. KING, IRE TRANS. ANT. AND PROP., JULY 1957, P 306.
Source file:coll.f
Intrinsic Functions Called
COMPLEX            CMPLX,      CONJG
REAL               ALOG
GENERIC            COS,        SIN
External Functions and Subroutines Called
COMPLEX            CSZ1
Local Variables (+ indicates altered content)
COMPLEX           +CSU1,      +CSU3,      +CSV2,      +ZE
REAL              +H2LOG,     +HLOG,      +T,         +TS
REAL              +U1,        +U3,        +UZ,        +V2
REAL              +V4
Referenced Common Block Variables (+ indicates altered content)
CON                REAL               PI2
CUR                INTEGER            KODE
CUR                REAL               EIL,       HIJ