8.58 FLOOR — Integer floor function

Description:

FLOOR(X) returns the greatest integer less than or equal to X.

Option:

f95, gnu

Class:

elemental function

Syntax:

I = FLOOR(X[,KIND])

Arguments:

X	The type shall be REAL(*).
KIND	Optional scaler integer initialization expression.

Return value:

The return value is of type INTEGER(KIND)

Example:

          program test_floor
              real :: x = 63.29
              real :: y = -63.59
              print *, floor(x) ! returns 63
              print *, floor(y) ! returns -64
          end program test_floor