dim(3F) dim(3F)NAME dim, ddim, idim - Fortran 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 January 1992 1