Source position: ufft.pas line 15
procedure FFT(
NumSamples: Integer;
InArray: TCompVector;
OutArray: TCompVector
);