FFT.f90 File Reference

Data Types
interface	fftclass::fftcrlocal_fft
interface	fftclass::fftrclocal_fft

Modules
module	fftclass
	This class defines the 3d FFT transformation subject to open or periodic conditions, Fourier Sine transformation, Complex-Complex, Complex-Real, and Real-Complex FFT.

Functions/Subroutines
subroutine	fftclass::fft3d1_fft (nx, ny, nz, nsizez, nsizey, nsizexy, nsizeyz, ksign, scalex, scaley, scalez, x, xstable, xrtable, ystable, yrtable, nprocrow, commrow, nproccol, commcol, comm2d, myidx, myidy, xout)
subroutine	fftclass::invfft3d1_fft (nz, ny, nx, nsizexy, nsizeyz, nsizey, nsizez, ksign, scalex, scaley, scalez, x, xstable, xrtable, ystable, yrtable, nprocrow, commrow, nproccol, commcol, comm2d, myidx, myidy, xout)
subroutine	fftclass::invfft3d1img_fft (nz, ny, nx, nsizexy, nsizeyz, nsizey, nsizez, ksign, scalex, scaley, scalez, x, xstable, xrtable, ystable, yrtable, nprocrow, commrow, nproccol, commcol, comm2d, myidx, myidy, xout)
subroutine	fftclass::fftlocal0_fft (ksign, scale, x, ny, nsizex)
subroutine	fftclass::fftlocal_fft (ksign, scale, x, ny, nsizex)
subroutine	fftclass::fftrclocal1_fft (ksign, scale, x, ny, nsizex, y)
subroutine	fftclass::fftrclocal2_fft (ksign, scale, x, ny, nsizex, y)
subroutine	fftclass::fftcrlocal1_fft (ksign, scale, x, ny, nsizex, y)
subroutine	fftclass::fftcrlocal2_fft (ksign, scale, x, ny, nsizex, y)
subroutine	fftclass::four1 (data, nn, isign)
subroutine	fftclass::realft (data, n, isign)
subroutine	fftclass::sinft (y, ny)
subroutine	fftclass::cosft1_fftpack (y, n)
subroutine	fftclass::rvec_pack2nr_cosft1 (r, ny, y)
subroutine	fftclass::rvec_nr2pack_sint1f (r, n, y)
subroutine	fftclass::rvec_pack2nr_sint1f (r, n, y)
subroutine	fftclass::rvec_nr2pack_rfft1f (r, n, data)
subroutine	fftclass::rvec_pack2nr_rfft1f (r, n, data)
subroutine	fftclass::rvec_nr2pack_rfft1b (r, n, data)
subroutine	fftclass::rvec_pack2nr_rfft1b (r, n, data)
subroutine	fftclass::rvec_nr2pack_gnl (r, n, data)
subroutine	fftclass::rvec_pack2nr_gnl (r, n, data)
subroutine	fftclass::c1f2kb (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f2kf (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f3kb (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f3kf (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f4kb (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f4kf (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f5kb (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1f5kf (ido, l1, na, cc, in1, ch, in2, wa)
subroutine	fftclass::c1fgkb (ido, ip, l1, lid, na, cc, cc1, in1, ch, ch1, in2, wa
subroutine	fftclass::c1fgkf (ido, ip, l1, lid, na, cc, cc1, in1, ch, ch1, in2, wa
subroutine	fftclass::c1fm1b (n, inc, c, ch, wa, fnf, fac)
subroutine	fftclass::c1fm1f (n, inc, c, ch, wa, fnf, fac)
subroutine	fftclass::cfft1b (n, inc, c, lenc, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cfft1f (n, inc, c, lenc, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cfft1i (n, wsave, lensav, ier)
subroutine	fftclass::cmf2kb (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf2kf (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf3kb (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf3kf (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf4kb (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf4kf (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf5kb (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmf5kf (lot, ido, l1, na, cc, im1, in1, ch, im2, in2, wa)
subroutine	fftclass::cmfgkb (lot, ido, ip, l1, lid, na, cc, cc1, im1, in1, ch, ch1, im2, in2, wa)
subroutine	fftclass::cmfgkf (lot, ido, ip, l1, lid, na, cc, cc1, im1, in1, ch, ch1, im2, in2, wa)
subroutine	fftclass::cosq1b (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cosq1f (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cosq1i (n, wsave, lensav, ier)
subroutine	fftclass::cosqb1 (n, inc, x, wsave, work, ier)
subroutine	fftclass::cosqf1 (n, inc, x, wsave, work, ier)
subroutine	fftclass::cosqmb (lot, jump, n, inc, x, lenx, wsave, lensav, work, len
subroutine	fftclass::cosqmf (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cosqmi (n, wsave, lensav, ier)
subroutine	fftclass::cost1b (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cost1f (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::cost1i (n, wsave, lensav, ier)
subroutine	fftclass::costb1 (n, inc, x, wsave, work, ier)
subroutine	fftclass::costf1 (n, inc, x, wsave, work, ier)
subroutine	fftclass::costmb (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::costmf (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::costmi (n, wsave, lensav, ier)
subroutine	fftclass::mcsqb1 (lot, jump, n, inc, x, wsave, work, ier)
subroutine	fftclass::mcsqf1 (lot, jump, n, inc, x, wsave, work, ier)
subroutine	fftclass::mcstb1 (lot, jump, n, inc, x, wsave, dsum, work, ier)
subroutine	fftclass::mcstf1 (lot, jump, n, inc, x, wsave, dsum, work, ier)
subroutine	fftclass::mradb2 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1)
subroutine	fftclass::mradb3 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2)
subroutine	fftclass::mradb4 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2, wa3)
subroutine	fftclass::mradb5 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2, wa3, wa4)
subroutine	fftclass::mradbg (m, ido, ip, l1, idl1, cc, c1, c2, im1, in1, ch, ch2, im2, in2, wa)
subroutine	fftclass::mradf2 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1)
subroutine	fftclass::mradf3 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2)
subroutine	fftclass::mradf4 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2, wa3)
subroutine	fftclass::mradf5 (m, ido, l1, cc, im1, in1, ch, im2, in2, wa1, wa2, wa3, wa4)
subroutine	fftclass::mradfg (m, ido, ip, l1, idl1, cc, c1, c2, im1, in1, ch, ch2, im2, in2, wa)
subroutine	fftclass::mrftb1 (m, im, n, in, c, ch, wa, fac)
subroutine	fftclass::mrftf1 (m, im, n, in, c, ch, wa, fac)
subroutine	fftclass::mrfti1 (n, wa, fac)
subroutine	fftclass::msntb1 (lot, jump, n, inc, x, wsave, dsum, xh, work, ier)
subroutine	fftclass::msntf1 (lot, jump, n, inc, x, wsave, dsum, xh, work, ier)
subroutine	fftclass::r1f2kb (ido, l1, cc, in1, ch, in2, wa1)
subroutine	fftclass::r1f2kf (ido, l1, cc, in1, ch, in2, wa1)
subroutine	fftclass::r1f3kb (ido, l1, cc, in1, ch, in2, wa1, wa2)
subroutine	fftclass::r1f3kf (ido, l1, cc, in1, ch, in2, wa1, wa2)
subroutine	fftclass::r1f4kb (ido, l1, cc, in1, ch, in2, wa1, wa2, wa3)
subroutine	fftclass::r1f4kf (ido, l1, cc, in1, ch, in2, wa1, wa2, wa3)
subroutine	fftclass::r1f5kb (ido, l1, cc, in1, ch, in2, wa1, wa2, wa3, wa4)
subroutine	fftclass::r1f5kf (ido, l1, cc, in1, ch, in2, wa1, wa2, wa3, wa4)
subroutine	fftclass::r1fgkb (ido, ip, l1, idl1, cc, c1, c2, in1, ch, ch2, in2, wa)
subroutine	fftclass::r1fgkf (ido, ip, l1, idl1, cc, c1, c2, in1, ch, ch2, in2, wa)
subroutine	fftclass::r2w (ldr, ldw, l, m, r, w)
subroutine	fftclass::r4_factor (n, nf, fac)
subroutine	fftclass::r4_mcfti1 (n, wa, fnf, fac)
subroutine	fftclass::r4_tables (ido, ip, wa)
subroutine	fftclass::r8_factor (n, nf, fac)
subroutine	fftclass::r8_mcfti1 (n, wa, fnf, fac)
subroutine	fftclass::r8_tables (ido, ip, wa)
subroutine	fftclass::rfft1b (n, inc, r, lenr, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::rfft1f (n, inc, r, lenr, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::rfft1i (n, wsave, lensav, ier)
subroutine	fftclass::rfftb1 (n, in, c, ch, wa, fac)
subroutine	fftclass::rfftf1 (n, in, c, ch, wa, fac)
subroutine	fftclass::rffti1 (n, wa, fac)
subroutine	fftclass::rfftmb (lot, jump, n, inc, r, lenr, wsave, lensav, work, len
subroutine	fftclass::rfftmf (lot, jump, n, inc, r, lenr, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::rfftmi (n, wsave, lensav, ier)
subroutine	fftclass::sinq1b (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sinq1f (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sinq1i (n, wsave, lensav, ier)
subroutine	fftclass::sinqmb (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sinqmf (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sinqmi (n, wsave, lensav, ier)
subroutine	fftclass::sint1b (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sint1f (n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sint1i (n, wsave, lensav, ier)
subroutine	fftclass::sintb1 (n, inc, x, wsave, xh, work, ier)
subroutine	fftclass::sintf1 (n, inc, x, wsave, xh, work, ier)
subroutine	fftclass::sintmb (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sintmf (lot, jump, n, inc, x, lenx, wsave, lensav, work, lenwrk, ier)
subroutine	fftclass::sintmi (n, wsave, lensav, ier)
subroutine	fftclass::w2r (ldr, ldw, l, m, r, w)
logical function	fftclass::xercon (inc, jump, n, lot)
subroutine	fftclass::xerfft (srname, info)