|
NCEPLIBS-ip 5.2.0
|
A concatination of the (FFTPACK)[https://netlib.org/fftpack/] library code. More...
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | csfft (isign, n, scale, x, y, table, work, isys) |
| csfft | |
| subroutine | dcrft (init, x, ldx, y, ldy, n, m, isign, scale, table, n1, wrk, n2, z, nz) |
| dcrft | |
| subroutine | drcft (init, x, ldx, y, ldy, n, m, isign, scale, table, n1, wrk, n2, z, nz) |
| drcft | |
| subroutine | radb2 (ido, l1, cc, ch, wa1) |
| RADB2. | |
| subroutine | radb3 (ido, l1, cc, ch, wa1, wa2) |
| RADB3 | |
| subroutine | radb4 (ido, l1, cc, ch, wa1, wa2, wa3) |
| RADB4. | |
| subroutine | radb5 (ido, l1, cc, ch, wa1, wa2, wa3, wa4) |
| RADB5. | |
| subroutine | radbg (ido, ip, l1, idl1, cc, c1, c2, ch, ch2, wa) |
| RADBG. | |
| subroutine | radf2 (ido, l1, cc, ch, wa1) |
| RADBG. | |
| subroutine | radf3 (ido, l1, cc, ch, wa1, wa2) |
| RADF3. | |
| subroutine | radf4 (ido, l1, cc, ch, wa1, wa2, wa3) |
| RADF4. | |
| subroutine | radf5 (ido, l1, cc, ch, wa1, wa2, wa3, wa4) |
| RADF5. | |
| subroutine | radfg (ido, ip, l1, idl1, cc, c1, c2, ch, ch2, wa) |
| RADFG. | |
| subroutine | rfftb (n, r, wsave) |
| RFFTB. | |
| subroutine | rfftb1 (n, c, ch, wa, ifac) |
| RFFTB1. | |
| subroutine | rfftf (n, r, wsave) |
| RFFTF. | |
| subroutine | rfftf1 (n, c, ch, wa, ifac) |
| RFFTF1. | |
| subroutine | rffti (n, wsave) |
| RFFTI. | |
| subroutine | rffti1 (n, wa, ifac) |
| RFFTI1. | |
| subroutine | scfft (isign, n, scale, x, y, table, work, isys) |
| scfft | |
| subroutine | scrft (init, x, ldx, y, ldy, n, m, isign, scale, table, n1, wrk, n2, z, nz) |
| scrft | |
| subroutine | srcft (init, x, ldx, y, ldy, n, m, isign, scale, table, n1, wrk, n2, z, nz) |
| srcft | |
A concatination of the (FFTPACK)[https://netlib.org/fftpack/] library code.
FFTPACK is a package of Fortran subprograms for the fast Fourier transform of periodic and other symmetric sequences. It includes complex, real, sine, cosine, and quarter-wave transforms.
Reference:
P.N. Swarztrauber, Vectorizing the FFTs, in Parallel Computations (G. Rodrigue, ed.), Academic Press, 1982, pp. 51–83.
Definition in file fftpack.F.
| subroutine csfft | ( | integer | isign, |
| integer | n, | ||
| real | scale, | ||
| real, dimension(*) | x, | ||
| real, dimension(*) | y, | ||
| real, dimension(*) | table, | ||
| real, dimension(*) | work, | ||
| integer | isys | ||
| ) |
| subroutine dcrft | ( | integer | init, |
| real, dimension(2*ldx,*) | x, | ||
| integer | ldx, | ||
| real, dimension(ldy,*) | y, | ||
| integer | ldy, | ||
| integer | n, | ||
| integer | m, | ||
| integer | isign, | ||
| real | scale, | ||
| real, dimension(44002) | table, | ||
| integer | n1, | ||
| real, dimension(*) | wrk, | ||
| integer | n2, | ||
| real, optional | z, | ||
| integer, optional | nz | ||
| ) |
| subroutine drcft | ( | integer | init, |
| real, dimension(ldx,*) | x, | ||
| integer | ldx, | ||
| real, dimension(2*ldy,*) | y, | ||
| integer | ldy, | ||
| integer | n, | ||
| integer | m, | ||
| integer | isign, | ||
| real | scale, | ||
| real, dimension(44002) | table, | ||
| integer | n1, | ||
| real, dimension(*) | wrk, | ||
| integer | n2, | ||
| real, optional | z, | ||
| integer, optional | nz | ||
| ) |
| subroutine radb2 | ( | ido, | |
| l1, | |||
| dimension(ido,2,l1) | cc, | ||
| dimension(ido,l1,2) | ch, | ||
| dimension(*) | wa1 | ||
| ) |
| subroutine radb3 | ( | ido, | |
| l1, | |||
| dimension(ido,3,l1) | cc, | ||
| dimension(ido,l1,3) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2 | ||
| ) |
| subroutine radb4 | ( | ido, | |
| l1, | |||
| dimension(ido,4,l1) | cc, | ||
| dimension(ido,l1,4) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2, | ||
| dimension(*) | wa3 | ||
| ) |
| subroutine radb5 | ( | ido, | |
| l1, | |||
| dimension(ido,5,l1) | cc, | ||
| dimension(ido,l1,5) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2, | ||
| dimension(*) | wa3, | ||
| dimension(*) | wa4 | ||
| ) |
| subroutine radbg | ( | ido, | |
| ip, | |||
| l1, | |||
| idl1, | |||
| dimension(ido,ip,l1) | cc, | ||
| dimension(ido,l1,ip) | c1, | ||
| dimension(idl1,ip) | c2, | ||
| dimension(ido,l1,ip) | ch, | ||
| dimension(idl1,ip) | ch2, | ||
| dimension(*) | wa | ||
| ) |
| subroutine radf2 | ( | ido, | |
| l1, | |||
| dimension(ido,l1,2) | cc, | ||
| dimension(ido,2,l1) | ch, | ||
| dimension(*) | wa1 | ||
| ) |
| subroutine radf3 | ( | ido, | |
| l1, | |||
| dimension(ido,l1,3) | cc, | ||
| dimension(ido,3,l1) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2 | ||
| ) |
| subroutine radf4 | ( | ido, | |
| l1, | |||
| dimension(ido,l1,4) | cc, | ||
| dimension(ido,4,l1) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2, | ||
| dimension(*) | wa3 | ||
| ) |
| subroutine radf5 | ( | ido, | |
| l1, | |||
| dimension(ido,l1,5) | cc, | ||
| dimension(ido,5,l1) | ch, | ||
| dimension(*) | wa1, | ||
| dimension(*) | wa2, | ||
| dimension(*) | wa3, | ||
| dimension(*) | wa4 | ||
| ) |
| subroutine radfg | ( | ido, | |
| ip, | |||
| l1, | |||
| idl1, | |||
| dimension(ido,ip,l1) | cc, | ||
| dimension(ido,l1,ip) | c1, | ||
| dimension(idl1,ip) | c2, | ||
| dimension(ido,l1,ip) | ch, | ||
| dimension(idl1,ip) | ch2, | ||
| dimension(*) | wa | ||
| ) |
| subroutine rfftb | ( | n, | |
| dimension(*) | r, | ||
| dimension(*) | wsave | ||
| ) |
| subroutine rfftb1 | ( | n, | |
| real, dimension(*) | c, | ||
| real, dimension(*) | ch, | ||
| real, dimension(*) | wa, | ||
| real, dimension(*) | ifac | ||
| ) |
| subroutine rfftf | ( | n, | |
| dimension(*) | r, | ||
| dimension(*) | wsave | ||
| ) |
| subroutine rfftf1 | ( | n, | |
| real, dimension(*) | c, | ||
| real, dimension(*) | ch, | ||
| real, dimension(*) | wa, | ||
| real, dimension(*) | ifac | ||
| ) |
| subroutine rffti | ( | n, | |
| dimension(*) | wsave | ||
| ) |
| subroutine rffti1 | ( | n, | |
| real, dimension(*) | wa, | ||
| real, dimension(*) | ifac | ||
| ) |
| subroutine scfft | ( | integer | isign, |
| integer | n, | ||
| real | scale, | ||
| real, dimension(*) | x, | ||
| real, dimension(*) | y, | ||
| real, dimension(*) | table, | ||
| real, dimension(*) | work, | ||
| integer | isys | ||
| ) |
| subroutine scrft | ( | integer | init, |
| real, dimension(2*ldx,*) | x, | ||
| integer | ldx, | ||
| real, dimension(ldy,*) | y, | ||
| integer | ldy, | ||
| integer | n, | ||
| integer | m, | ||
| integer | isign, | ||
| real | scale, | ||
| real, dimension(44002) | table, | ||
| integer | n1, | ||
| real, dimension(*) | wrk, | ||
| integer | n2, | ||
| real, optional | z, | ||
| integer, optional | nz | ||
| ) |
| subroutine srcft | ( | integer | init, |
| real, dimension(ldx,*) | x, | ||
| integer | ldx, | ||
| real, dimension(2*ldy,*) | y, | ||
| integer | ldy, | ||
| integer | n, | ||
| integer | m, | ||
| integer | isign, | ||
| real | scale, | ||
| real, dimension(44002) | table, | ||
| integer | n1, | ||
| real, dimension(*) | wrk, | ||
| integer | n2, | ||
| real, optional | z, | ||
| integer, optional | nz | ||
| ) |