SUBROUTINE REFCOF ( A0, B0, D1, E1, T1, T2, T3, T4 )
Argument Definitions (+ indicates altered content)
REAL               A0,         B0,         D1,         E1
REAL              +T1,        +T2,        +T3,        +T4
Source file:refcof.f
Intrinsic Functions Called
GENERIC            ABS,        SQRT
Local Variables (+ indicates altered content)
REAL              +C1,        +C11,       +E2,        +F2
REAL              +G1,        +H2,        +HN,        +RK1
REAL              +RL1,       +RL1N,      +RM1,       +RN1