Museum

DIM(3F)                              SysV                              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