Fortran Wiki
mod

Description

mod(a,p) computes the remainder of the division of a by p. It is calculated as a - (int(a/p) * p).

Standard

FORTRAN 77 and later

Class

Elemental function

Syntax

result = mod(a, p)

Arguments

• a - Shall be a scalar of type integer or real
• p - Shall be a scalar of the same type as a and not equal to zero

Return value

The kind of the return value is the result of cross-promoting the kinds of the arguments.

Example

program test_mod
  print *, mod(17,3)
  print *, mod(17.5,5.5)
  print *, mod(17.5d0,5.5)
  print *, mod(17.5,5.5d0)

  print *, mod(-17,3)
  print *, mod(-17.5,5.5)
  print *, mod(-17.5d0,5.5)
  print *, mod(-17.5,5.5d0)

  print *, mod(17,-3)
  print *, mod(17.5,-5.5)
  print *, mod(17.5d0,-5.5)
  print *, mod(17.5,-5.5d0)
end program test_mod