Unit FFT1 |
Classes |
Functions |
delete_fft - real_fft *) (* Fuert Bandpass aus
DoubleToLong - Wandelt reele Zahl in Integer um
fft_makereal - DoubleToLong*) { Wandelt FFT Ergebnis r[i],i[i] Array in Realbetraege
Groesse ist dann Size/2!
y[0] bleibt
y[1,3,5 .
FFT_World - delete *) (* Ermittelt X und Y Bereiche fuer Bildschirmausgabe
real_fft - Real-FFT :
Reele FFT mit Umkehrfunktion ----------------------------------------
Eingabeparameter:
direct:Boolean FALSE: Berechnung der diskkreten Fourierkoeffizienten
TRUE: Berechnung der Funktionswerte
tau:Integer 2 hoch tau ist Anzahl der Funktionswerte
tau_2:Integer Anzahl der Funktionswerte
VAR y: enthaelt Werte und zwar fuer direct=
array[tau_2] FALSE : Funktionswerte
og single TRUE: Diskrete Fourierkoeffizienten
y[0]=a0
y[k]=a(k+1)/2
mit k=1,3,.
Types |
Constants |
Variables |
Functions |
Reele FFT mit Umkehrfunktion ---------------------------------------- Eingabeparameter: direct:Boolean FALSE: Berechnung der diskkreten Fourierkoeffizienten TRUE: Berechnung der Funktionswerte tau:Integer 2 hoch tau ist Anzahl der Funktionswerte tau_2:Integer Anzahl der Funktionswerte VAR y: enthaelt Werte und zwar fuer direct= array[tau_2] FALSE : Funktionswerte og single TRUE: Diskrete Fourierkoeffizienten y[0]=a0 y[k]=a(k+1)/2 mit k=1,3,...,tau_2-1 also in der Reihenfolge a0 a1 b1 a2 b2 Ausgabeparameter: y:array[tau_2] fuer direct= FALSE: diskrete Fourierkoeffizienten (s.o) TRUE: Funktionswerte Benoetigt: sin cos und PI:=3.141... tau_2 MUSS 2 hoch n sein !!! -----------------------------------------------------------------------
Types |
Constants |
Variables |