mod(3f) - [FORTRAN:INTRINSIC:NUMERIC] Remainder function
result = mod(a, p)
mod(a,p) computes the remainder of the division of A by P.
A Shall be a scalar of type INTEGER or REAL. P Shall be a scalar of the same type and kind as A and not equal to zero.
The return value is the result of a - (int(a/p) * p). The type and kind of the return value is the same as that of the arguments. The returned value has the same sign as A and a magnitude less than the magnitude of P.
Sample program:
program demo_mod implicit none print *, mod(17,3) ! yields 2 print *, mod(17.5,5.5) ! yields 1.0 print *, mod(17.5d0,5.5d0) ! yields 1.0d0 print *, mod(17.5d0,5.5d0) ! yields 1.0d0print *, mod(-17,3) ! yields -2 print *, mod(-17.5,5.5) ! yields -1.0 print *, mod(-17.5d0,5.5d0) ! yields -1.0d0 print *, mod(-17.5d0,5.5d0) ! yields -1.0d0
print *, mod(17,-3) ! yields 2 print *, mod(17.5,-5.5) ! yields 1.0 print *, mod(17.5d0,-5.5d0) ! yields 1.0d0 print *, mod(17.5d0,-5.5d0) ! yields 1.0d0 end program demo_mod
[[FORTRAN 77]] and later
[[Elemental procedure|Elemental function]]
modulo(3)
mod (3) | March 11, 2021 |