HP Fortran Programmer's Reference

Intrinsic procedures
Intrinsic procedure specifications
Arguments
A must be of type integer or real.
P must be of the same type and kind type parameter as A.
Result type/
type parameters
Same as A.
Result value
If P is not 0, the value of the result is A – INT(A/P) * P. IfP=0, the result is
processor-dependent.
Specific forms
AMOD, BMOD, DMOD, HMOD, IMOD, JMOD, KMOD, QMOD.
MODULO(A, P)
Description
Modulo function.
Class
Elemental function.
Arguments
A must be of type integer or real.
P must be of the same type and kind type parameter as A.
Result type/
type parameters
Same as A.
Result value
Case 1 A is of type integer. If P is not 0, MODULO(A, P) has the value R such that A=
Q * P + R,whereQ is an integer, the inequalities 0