DIM(3F)								       DIM(3F)

NAME    [Toc]    [Back]

     dim, ddim,	qdim, idim, iidim, jidim - FORTRAN positive difference
     intrinsic functions

SYNOPSIS    [Toc]    [Back]

     real r1, r2, r3
     double precision dp1, dp2,	dp3
     real*16 qp1, qp2, qp3
     integer i1, i2, i3
     integer*2 ii1, ii2, ii3
     integer*4 ji1, ji2, ji3

     r3	= dim(r1, r2)

     dp3 = ddim(dp1, dp2)
     dp3 = dim(dp1, dp2)

     qp3 = qdim(qp1, qp2)
     qp3 = dim(qp1, qp2)

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

     ii3 = iidim(ii1, ii2)
     ii3 = idim(ii1, ii2)
     ii3 = dim(ii1, ii2)

     ji3 = jidim(ji1, ji2)
     ji3 = idim(ji1, ji2)
     ji3 = dim(ji1, ji2)

DESCRIPTION    [Toc]    [Back]

     These functions return:
	  arg1-arg2 if arg1 > arg2
	  0	    if arg1 <= arg2


									PPPPaaaaggggeeee 1111