jidim(3f) — CX/UX 6.20



dim(3F)                                                   dim(3F)



NAME
     dim, ddim, idim, jidim, iidim  - positive difference intrin-
     sic functions

SYNOPSIS
     integer i1,i2,i3
     integer*2  j1,j2,j3
     real a1,a2,a3
     double precision dp1,dp2,dp3

     i3 = idim(i1,i2)
     i3 = jidim(i1,i2)

     j3 = idim(j1,j2)
     j3 = iidim(j1,j2)

     a3 = dim(a1,a2)

     dp3 = ddim(dp1,dp2)

DESCRIPTION
     dim is the family of difference intrinsic functions.  ddim
     returns the double-precision absolute value of its double-
     precision argument.  idim returns the integer absolute value
     of its integer argument.  The generic form dim returns the
     type of its argument.

     The functions jidim and iidim have been included to provide
     compatibility with other vendors and are not recommended for
     general use.

     These functions return:
          a1-a2     if a1 > a2
          0         if a1 <= a2





















Page 1                        CX/UX Hf77 Fortran Reference Manual
Museum
