CEILING — Integer ceiling function ¶CEILING(A) returns the least integer greater than or equal to A.
Fortran 95 and later
Elemental function
RESULT = CEILING(A [, KIND])
| A | The type shall be REAL. | 
| KIND | (Optional) A scalar INTEGERconstant
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