Rectangular To Polar Format Conversion
Validation and Benchmark Tool:
ComplexRectToPolBV13.zip
Tables of results:
CmplxRegtToPolBenchmarks13.xls
Description
(The following description was written by Lars Gravengaard, April, 2006)
The objective is to build the fastest RectToPol routines.
There are three overloaded functions differing in the input and output datatype.
function RectToPol(const X : TPolarComplexE) : TRegtangularComplexE; overload;
function RectToPol(const X : TPolarComplexD) : TRegtangularComplexD; overload;
function RectToPol(const X : TPolarComplexS) : TRegtangularComplexS; overload;
Type definition
TRegtangularComplexS = packed record
RealPart, ImaginaryPart : Single;
end;
TRegtangularComplexD = packed record
RealPart, ImaginaryPart : Double;
end;
TRegtangularComplexE = packed record
RealPart : Extended;
Pad1 : Cardinal; //4 byte
Pad2 : SmallInt; //2 byte
ImaginaryPart : Extended;
Pad3 : Cardinal; //4 byte
Pad4 : SmallInt; //2 byte
end;
TPolarComplexS = packed record
Amplitude, Phase : Single;
end;
TPolarComplexD = packed record
Amplitude, Phase : Double;
end;
TPolarComplexE = packed record
Amplitude : Extended;
Pad1 : Cardinal; //4 byte
Pad2 : SmallInt; //2 byte
Phase : Extended;
Pad3 : Cardinal; //4 byte
Pad4 : SmallInt; //2 byte
end;