Descrition
Returns the remainder of a floored division.
Syntax
Remainder.d = Modulo(Value.d, Divisor.d)
Parameters
Value | The dividend number. |
Divisor | The divisor number. |
Return value
The reminder with the sign of the divisor.
Snippet
Procedure.d Modulo(Value.d, Divisor.d)
Protected Modulo.d
Modulo = Mod(Value, Divisor)
If (Divisor > 0.0 And Value < 0.0 And Modulo < 0.0) Or (Divisor < 0.0 And Value > 0.0 And Modulo > 0.0)
Modulo + Divisor
EndIf
ProcedureReturn Modulo
EndProcedure
Example
Debug Modulo(4.00, 1.0)
Debug Modulo(2.25, 1.0)
Debug Modulo(-2.25, 1.0)
Debug Modulo(-4.00, 1.0)
Debug Modulo(4.00, -1.0)
Debug Modulo(2.25, -1.0)
Debug Modulo(-2.25, -1.0)
Debug Modulo(-4.00, -1.0)
0.0
0.25
0.75
0.0
0.0
-0.75
-0.25
0.0