Go to the source code of this file.
|
subroutine | cwrsk (ZR, FNU, KODE, N, Y, NZ, CW, TOL, ELIM, ALIM) |
|
◆ cwrsk()
subroutine cwrsk |
( |
complex |
ZR, |
|
|
real |
FNU, |
|
|
integer |
KODE, |
|
|
integer |
N, |
|
|
complex, dimension(n) |
Y, |
|
|
integer |
NZ, |
|
|
complex, dimension(2) |
CW, |
|
|
real |
TOL, |
|
|
real |
ELIM, |
|
|
real |
ALIM |
|
) |
| |