NCEPLIBS-sp
2.5.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. More... | |
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().