Intel® Fortran Compiler 18.0 Developer Guide and Reference
Elemental Intrinsic Function (Generic): Returns the difference between two numbers (if the difference is positive).
result = DIM (x, y)
x |
(Input) Must be of type integer or real. |
y |
(Input) Must have the same type and kind parameters as x. |
The result type and kind are the same as x. The value of the result is x- y if x is greater than y; otherwise, the value of the result is zero.
The setting of compiler options specifying integer size can affect this function.
Specific Name |
Argument type |
Result Type |
|---|---|---|
BDIM |
INTEGER(1) |
INTEGER(1) |
IIDIM1 |
INTEGER(2) |
INTEGER(2) |
IDIM 2 |
INTEGER(4) |
INTEGER(4) |
KIDIM |
INTEGER(8) |
INTEGER(8) |
DIM |
REAL(4) |
REAL(4) |
DDIM |
REAL(8) |
REAL(8) |
QDIM |
REAL(16) |
REAL(16) |
1Or HDIM. 2Or JIDIM. For compatibility, IDIM can also be specified as a generic function for integer types. |
||
DIM (6, 2) has the value 4.
DIM (-4.0, 3.0) has the value 0.0.
The following shows another example:
INTEGER i
REAL r
REAL(8) d
i = IDIM(10, 5) ! returns 5
r = DIM (-5.1, 3.7) ! returns 0.0
d = DDIM (10.0D0, -5.0D0) ! returns 15.0D0