NCEPLIBS-sp
2.3.3
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | spfft1 (IMAX, INCW, INCG, KMAX, W, G, IDIR) |
This subprogram performs multiple fast fourier transforms between complex amplitudes in fourier space and real values in cyclic physical space. More... | |
subroutine spfft1 | ( | integer, intent(in) | IMAX, |
integer, intent(in) | INCW, | ||
integer, intent(in) | INCG, | ||
integer, intent(in) | KMAX, | ||
complex, dimension(incw,kmax), intent(inout) | W, | ||
real, dimension(incg,kmax), intent(inout) | G, | ||
integer, intent(in) | IDIR | ||
) |
This subprogram performs multiple fast fourier transforms between complex amplitudes in fourier space and real values in cyclic physical space.
Subprogram SPFFT1 initializes trigonometric data each call. Use subprogram SPFFT to save time and initialize once. this version invokes the ibm essl fft.
IMAX | - INTEGER NUMBER OF VALUES IN THE CYCLIC> PHYSICAL SPACE (SEE LIMITATIONS ON IMAX IN REMARKS BELOW.) | |
INCW | - INTEGER FIRST DIMENSION OF THE COMPLEX AMPLITUDE ARRAY (INCW >= IMAX/2+1) | |
INCG | - INTEGER FIRST DIMENSION OF THE REAL VALUE ARRAY (INCG >= IMAX) | |
KMAX | - INTEGER NUMBER OF TRANSFORMS TO PERFORM | |
[out] | W | - COMPLEX(INCW,KMAX) COMPLEX AMPLITUDES IF IDIR>0 |
[out] | G | - REAL(INCG,KMAX) REAL VALUES IF IDIR<0 |
IDIR | - INTEGER DIRECTION FLAG IDIR>0 TO TRANSFORM FROM FOURIER TO PHYSICAL SPACE IDIR<0 TO TRANSFORM FROM PHYSICAL TO FOURIER SPACE |
SUBPROGRAMS CALLED: