#
Fortran Wiki

dim

## Description

`dim(x,y)`

returns the difference `x-y`

if the result is positive; otherwise returns zero.

## Standard

FORTRAN 77 and later

## Class

Elemental function

## Syntax

`result = dim(x, y)`

## Arguments

`x`

- The type shall be `integer`

or `real`

`y`

- The type shall be the same type and kind as `x`

.

## Return value

The return value is of type `integer`

or `real`

.

## Example

```
program test_dim
integer :: i
real(8) :: x
i = dim(4, 15)
x = dim(4.345_8, 2.111_8)
print *, i
print *, x
end program test_dim
```

Revised on April 30, 2009 22:40:19
by

Jason Blevins
(71.70.142.190)
(659 characters / 0.0 pages)