FLOOR (The GNU Fortran Compiler)

### 8.117 `FLOOR` — Integer floor function ¶

Synopsis:

  `RESULT = FLOOR(A [, KIND])`

Description:

  `FLOOR(A)` returns the greatest integer less than or equal to A.

Class:

  Elemental function

Arguments:

  A | The type shall be `REAL`.
  KIND | (Optional) A scalar `INTEGER` constant expression indicating the kind parameter of the result.

Return value:

  The return value is of type `INTEGER(KIND)` if KIND is present and of default-kind `INTEGER` otherwise.

Example:

      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

Standard:

  Fortran 95 and later

See also:

  `CEILING` — Integer ceiling function,
  `NINT` — Nearest whole number