D705: Real Fast Fourier Transform

Author(s): K.S. Kölbig, H.-H. Umstätter Library: MATHLIB
Submitter: Submitted: 22.04.1996
Language: Fortran Revised:

Subroutine RFSTFT calculates the finite Fourier transform of a real periodic sequence tex2html_wrap_inline91 , whose period n must be a power of two. Either the direct transform

equation42

or the inverse transform

equation50

where tex2html_wrap_inline95 are real and tex2html_wrap_inline97 are complex numbers, may be calculated. Note that tex2html_wrap_inline99 , where tex2html_wrap_inline101 denotes the complex conjugate of tex2html_wrap_inline103 . Thus, only the numbers tex2html_wrap_inline105 for which tex2html_wrap_inline107 are calculated.

Structure:

SUBROUTINE subprogram
User Entry Names: RFSTFT
External References: CFSTFT

Usage:

    COMPLEX C(0:..)
    REAL Y(0:..)
    EQUIVALENCE (C,Y)
    ...
    CALL RFSTFT(M,C)
    ...
M
(INTEGER) On entry, n is determined by the absolute value of M via tex2html_wrap_inline111 .
tex2html_wrap_inline113 The direct transform (1) is calculated.
tex2html_wrap_inline115 The inverse transform (2) is calculated.
Unchanged on exit.
C
(COMPLEX) One dimensional array of dimension (0:d), where tex2html_wrap_inline117 .
Y
(REAL) One dimensional array of dimension (0:d), where tex2html_wrap_inline119 .
tex2html_wrap_inline121
On entry, tex2html_wrap_inline123 .
On exit, tex2html_wrap_inline125 , as defined by (1).
tex2html_wrap_inline127
On entry, tex2html_wrap_inline129 .
On exit, tex2html_wrap_inline131 , as defined by (2).

Method:

The subroutine uses CFSTFT (D705) with sequences reduced to half of their length as explaind in Ref. 1.

References:

  1. E.O. Brigham, The fast Fourier transform, (Prentice-Hall, Englewood Cliffs, 1974) Ch. 10, Sect. 10, Fig. 10-10.
tex2html_wrap_inline133

Michel Goossens Wed Jun 5 01:36:56 METDST 1996