PPU173%" ǁCoufftU ufft.pas$"PKSystemW/@"objpasǂ#Kqutypes_{Z,)SpNumathêx ufft.o  d RSYSTEMUTYPESx            &   , 4mn   [~+.0 +UFFT_$$_FFT$LONGINT$TCOMPVECTOR$TCOMPVECTOR[," NumSamples  )"InArray!*"OutArray#,+6:df ,UFFT_$$_IFFT$LONGINT$TCOMPVECTOR$TCOMPVECTOR[," NumSamplesCL )" InArrayNW*" OutArrayYb+lp =UFFT_$$_FFT_INTEGER$LONGINT$TINTVECTOR$TINTVECTOR$TCOMPVECTOR[," NumSamplesy ("RealIn ("ImagIn *"OutArray!(n+ UFFT_$$_FFT_INTEGER_CLEANUP[+ :UFFT_$$_CALCFREQUENCY$LONGINT$LONGINT$TCOMPVECTOR$$COMPLEX[," NumSamples/ 0"FrequencyIndex0)"InArray1)"$result A ufft system objpas utypes umath FFT  IFFT   FFT_Integer 'FFT_Integer_Cleanup( ! CalcFrequency/ [ z+!% UFFT_$$_init$.0? INIT$_$UFFT UFFT_$$_init$[l+6:CEE UFFT_$$_MAXPOWER$$LONGINT[x+KOceJ %UFFT_$$_ISPOWEROFTWO$LONGINT$$BOOLEAN[#" XJXa ~+ko[ +UFFT_$$_NUMBEROFBITSNEEDED$LONGINT$$LONGINT[,"' PowerOfTwo[x + i ,UFFT_$$_REVERSEBITS$LONGINT$LONGINT$$LONGINT['"-Indexi )".NumBitsi+ v ?UFFT_$$_FOURIERTRANSFORM$DOUBLE$LONGINT$TCOMPVECTOR$TCOMPVECTOR[0"5AngleNumeratorv ,"6 NumSamplesw)"7InArrayx*"8OutArrayx'()+ UFFT_$$_init_implicit$  INIT$_$UFFTUFFT_$$_init_implicit$[+ UFFT_$$_finalize_implicit$&( FINALIZE$_$UFFTUFFT_$$_finalize_implicit$[ "$UFFT_$$_init$?.. TempArraySize@4=?%TempCAJLMaxPowerE N  IsPowerOfTwoJ T&&NumberOfBitsNeeded[ Z, ReverseBitsi `$4FourierTransformv f,m$UFFT_$$_init_implicit$ l0n$UFFT_$$_finalize_implicit$ rS