floor(3f) - [FORTRAN:INTRINSIC:NUMERIC] Integer floor function
floor(a) returns the greatest integer less than or equal to X.
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.
Sample program:
program demo_floor implicit none real :: x = 63.29 real :: y = -63.59 print *, floor(x) ! returns 63 print *, floor(y) ! returns -64 end program demo_floor
[[Fortran 95]] and later
[[Elemental procedure|Elemental function]]
ceiling(3), nint(3)
floor (3) | March 11, 2021 |