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