| ESBMod Function |
Unit
QESBPCSMath
Declaration
Function ESBMod(const X, Y: Extended): Extended;
Description
ESBTolerance may need to be changed to a different value.
| Parameters |
| X | First Float to process |
| Y | Second Float to process |
Category
Arithmetic Routines for FloatsImplementation
function ESBMod (const X, Y: Extended): Extended;
begin
if FloatIsZero (Y) then
raise EMathError.Create (rsDivideByZero);
Result := X - ESBFloor (X / Y) * Y
End; |
|
|