6.103 INT — Convert to integer type

Description:

Convert to integer type

Standard:

F77 and later

Class:

Elemental function

Syntax:

RESULT = INT(A [, KIND))

Arguments:

A	Shall 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) equals the largest integer that does not exceed the range 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:

Name	Argument	Return type	Standard
IFIX(A)	REAL(4) A	INTEGER	F77 and later
IDINT(A)	REAL(8) A	INTEGER	F77 and later