OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
iceil.f File Reference

Go to the source code of this file.

Functions/Subroutines

integer function iceil (inum, idenom)

Function/Subroutine Documentation

◆ iceil()

integer function iceil ( integer inum,
integer idenom )

Definition at line 1 of file iceil.f.

2*
3* -- ScaLAPACK tools routine (version 1.7) --
4* University of Tennessee, Knoxville, Oak Ridge National Laboratory,
5* and University of California, Berkeley.
6* May 1, 1997
7*
8* .. Scalar Arguments ..
9 INTEGER IDENOM, INUM
10* ..
11*
12* Purpose
13* =======
14*
15* ICEIL returns the ceiling of the division of two integers.
16*
17* Arguments
18* =========
19*
20* INUM (local input) INTEGER
21* The numerator,
22*
23* IDENOM (local input) INTEGER
24* and the denominator of the fraction to be evaluated.
25*
26* =====================================================================
27*
28* .. Executable Statements ..
29*
30 iceil = (inum+idenom-1) / idenom
31*
32 RETURN
33*
34* End of ICEIL
35*
integer function iceil(inum, idenom)
Definition iceil.f:2