FLOOR
— Integer floor function ¶FLOOR(A)
returns the greatest integer less than or equal to X.
Fortran 95 and later
Elemental function
RESULT = FLOOR(A [, KIND])
A | The type shall be REAL . |
KIND | (Optional) An INTEGER initialization
expression indicating the kind parameter of the result. |
The return value is of type INTEGER(KIND)
if KIND is present
and of default-kind INTEGER
otherwise.
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
CEILING
— Integer ceiling function,
NINT
— Nearest whole number