Go to the source code of this file.
|
subroutine | zunhj (ZR, ZI, FNU, IPMTR, TOL, PHIR, PHII, ARGR, ARGI, ZETA1R, ZETA1I, ZETA2R, ZETA2I, ASUMR, ASUMI, BSUMR, BSUMI) |
|
◆ zunhj()
subroutine zunhj |
( |
double precision |
ZR, |
|
|
double precision |
ZI, |
|
|
double precision |
FNU, |
|
|
integer |
IPMTR, |
|
|
double precision |
TOL, |
|
|
double precision |
PHIR, |
|
|
double precision |
PHII, |
|
|
double precision |
ARGR, |
|
|
double precision |
ARGI, |
|
|
double precision |
ZETA1R, |
|
|
double precision |
ZETA1I, |
|
|
double precision |
ZETA2R, |
|
|
double precision |
ZETA2I, |
|
|
double precision |
ASUMR, |
|
|
double precision |
ASUMI, |
|
|
double precision |
BSUMR, |
|
|
double precision |
BSUMI |
|
) |
| |