FloatIsPositive Function
Returns True if X is Positive, ie X > ESBTolerance.

Unit
QESBPCSMath

Declaration
Function FloatIsPositive(const X: Extended): Boolean;

Description
For Values with large negative exponents, ESBTolerance will need to be changed to a smaller value.

Parameters
Float to process.

Returns
X >= ESBTolerance.

Category
Comparison between Integers and Floats

Implementation

function FloatIsPositive (const X: Extended): Boolean;
begin
     Result := (X >= ESBTolerance);
End;


HTML generated by Time2HELP
http://www.time2help.com