dim(3F) dim(3F)
NAME
dim, ddim, idim - positive difference intrinsic functions
SYNOPSIS
integer a1,a2,a3
a3 = idim(a1,a2)
real a1,a2,a3
a3 = dim(a1,a2)
double precision a1,a2.,a3
a3 = ddim(a1,a2)
DESCRIPTION
These functions return:
a1-a2 if a1 > a2
0 if a1 <= a2
Page 1 (last mod. 1/14/87)