Clicky
Showing changes from revision #0 to #1:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
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