NCEPLIBS-ip 5.2.0
|
Get wave-space constants. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | spwget (iromb, maxwv, eps, epstop, enn1, elonn1, eon, eontop) |
This subprogram gets wave-space constants. | |
subroutine spwget | ( | iromb, | |
maxwv, | |||
real, dimension((maxwv+1)*((iromb+1)*maxwv+2)/2) | eps, | ||
real, dimension(maxwv+1) | epstop, | ||
real, dimension((maxwv+1)*((iromb+1)*maxwv+2)/2) | enn1, | ||
real, dimension((maxwv+1)*((iromb+1)*maxwv+2)/2) | elonn1, | ||
real, dimension((maxwv+1)*((iromb+1)*maxwv+2)/2) | eon, | ||
real, dimension(maxwv+1) | eontop | ||
) |
This subprogram gets wave-space constants.
IROMB | spectral domain shape (0 for triangular, 1 for rhomboidal) |
MAXWV | spectral truncation |
EPS | |
EPSTOP | |
ENN1 | |
ELONN1 | |
EON | |
EONTOP |
Definition at line 17 of file spwget.f.
References speps().
Referenced by sptgpm(), sptgpmd(), sptgpmv(), sptgps(), sptgpsd(), sptgpsv(), sptgpt(), sptgptd(), sptgptsd(), sptgptv(), sptgptvd(), sptrand(), sptranf0(), sptrungv(), sptrunl(), sptrunmv(), sptrunsv(), and sptrunv().