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) 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