max(3F)

NAME
     max, max0, imax0, jmax0, amax0, max1, amax1, dmax1, qmax1, imax1, jmax1,
     aimax0, ajmax0 - FORTRAN maximum-value functions

SYNOPSIS
     integer i, j, k, l
     integer*2 ii1, ii2, ii3, ii4
     integer*4 ji1, ji2, ji3, ji4
     real a, b, c, d
     real*4 r1, r2, r3, r4
     double precision dp1, dp2, dp3
     real*16 qp1, qp2, qp3

     k = max0(i, j)
     l = max(i, j, k)

     ii4 = imax0(ii1, ii2, ii3)
     ii4 = max(ii1, ii2, ii3)
     ii3 = max0(ii1, ii2)

     ji4 = jmax0(ji1, ji2, ji3)
     ji3 = max(ji1, ji2)
     ji4 = max0(ji1, ji2, ji3)

     a = amax0(i, j, k)
     a = max(i, j, k)

     i = max1(a, b)
     i = max(a, b, c)

     d = amax1(a, b, c)
     c = max(a, b)

     dp3 = dmax1(dp1, dp2)
     dp4 = max(dp1, dp2, dp3)

     qp3 = qmax1(qp1, qp2)
     qp4 = max(qp1, qp2, qp3)

     ii1 = imax1(r1, r2)
     ii1 = max1(r1, r2, r3)

     ji1 = jmax1(r1, r2)
     ji1 = max1(r1, r2, r3)

     r1 = aimax0(ii1, ii2, ii3)
     r1 = amax0(ii1, ii2, ii3)

     r1 = aimax0(ji1, ji2, ji3)
     r1 = amax0(ji1, ji2, ji3)
DESCRIPTION
     The maximum-value functions return the largest of their arguments.  There
     may be any number of arguments, but they must all be of the same type.
     max0 returns the integer form of the maximum value of its integer
     arguments; amax0, the real form of its integer arguments; max1, the
     integer form of its real arguments; amax1, the real form of its real
     arguments; dmax1, the double-precision form of its double-precision
     arguments; imax1, the integer*2 form of its real*4 arguments; jmax1, the
     integer*4 form of its real*4 arguments; aimax0, the real*4 form of its
     integer*2 arguments; and ajmax0, the real*4 form of its integer*4
     arguments.  max, max0, max1, and amax0 are the generic forms which can be
     used as indicated above.

SEE ALSO
     min(3F).