Next: , Previous: , Up: Intrinsic Procedures   [Contents][Index]


9.148 INT — Convert to integer type

Description:

Convert to integer type

Standard:

Fortran 77 and later

Class:

Elemental function

Syntax:

RESULT = INT(A [, KIND))

Arguments:
AShall be of type INTEGER, REAL, or COMPLEX.
KIND(Optional) An INTEGER initialization expression indicating the kind parameter of the result.
Return value:

These functions return a INTEGER variable or array under the following rules:

(A)

If A is of type INTEGER, INT(A) = A

(B)

If A is of type REAL and |A| < 1, INT(A) equals 0. If |A| \geq 1, then INT(A) is the integer whose magnitude is the largest integer that does not exceed the magnitude of A and whose sign is the same as the sign of A.

(C)

If A is of type COMPLEX, rule B is applied to the real part of A.

Example:
program test_int
  integer :: i = 42
  complex :: z = (-3.7, 1.0)
  print *, int(i)
  print *, int(z), int(z,8)
end program
Specific names:
NameArgumentReturn typeStandard
INT(A)REAL(4) AINTEGERFortran 77 and later
IFIX(A)REAL(4) AINTEGERFortran 77 and later
IDINT(A)REAL(8) AINTEGERFortran 77 and later