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 | ||
) |