Next: INT2, Previous: INDEX intrinsic, Up: Intrinsic Procedures [Contents][Index]
INT
— Convert to integer typeConvert to integer type
Fortran 77 and later
Elemental function
RESULT = INT(A [, KIND))
A | Shall be of type INTEGER ,
REAL , or COMPLEX . |
KIND | (Optional) An INTEGER initialization
expression indicating the kind parameter of the result. |
These functions return a INTEGER
variable or array under
the following rules:
If A is of type INTEGER
, INT(A) = A
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.
If A is of type COMPLEX
, rule B is applied to the real part of A.
program test_int integer :: i = 42 complex :: z = (-3.7, 1.0) print *, int(i) print *, int(z), int(z,8) end program
Name | Argument | Return type | Standard |
INT(A) | REAL(4) A | INTEGER | Fortran 77 and later |
IFIX(A) | REAL(4) A | INTEGER | Fortran 77 and later |
IDINT(A) | REAL(8) A | INTEGER | Fortran 77 and later |