9.100 FLOOR — Integer floor function

Description:
FLOOR(A) returns the greatest integer less than or equal to X.
Standard:
Fortran 95 and later
Class:
Elemental function
Syntax:
RESULT = FLOOR(A [, KIND])
Arguments:
A The type shall be REAL.
KIND (Optional) An INTEGER initialization expression indicating the kind parameter of the result.
Return value:
The return value is of type INTEGER(KIND) if KIND is present and of default-kind INTEGER otherwise.
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
See also:
CEILING, NINT

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-5.4.0/gfortran/FLOOR.html