ceiling(a) returns the least integer greater than or equal to a.
Fortran 95 and later
result = ceiling(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 a default-kind integer otherwise.
program test_ceiling
real :: x = 63.29
real :: y = -63.59
print *, ceiling(x) ! returns 64
print *, ceiling(y) ! returns -63
end program test_ceiling