Go to the source code of this file.
Functions/Subroutines | |
subroutine | zs1s2 (ZRR, ZRI, S1R, S1I, S2R, S2I, NZ, ASCLE, ALIM, IUF) |
subroutine zs1s2 | ( | double precision | ZRR, |
double precision | ZRI, | ||
double precision | S1R, | ||
double precision | S1I, | ||
double precision | S2R, | ||
double precision | S2I, | ||
integer | NZ, | ||
double precision | ASCLE, | ||
double precision | ALIM, | ||
integer | IUF | ||
) |