Fortran Wiki
dim (Rev #1, changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Showing changes from revision #0 to #1: (追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)

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

Revision from April 24, 2009 16:04:26 by Jason Blevins

Forward in time (to current) | See current | History | Rollback | View: Source | Linked from: Intrinsic procedures