A FORTRAN implementation of a length-2 FFT module (Butterfly) to be used in a Prime Factor Algorithm program or other FFT program. In Place version.
C
C----------------WFTA N=2--------------------------------
C
102 R1 = A(1)
A(1) = R1 + A(2)
A(2) = R1 - A(2)
C
R1 = B(1)
B(1) = R1 + B(2)
B(2) = R1 - B(2)
C
GOTO 20
Figure. Length-2 FFT Module




