


      SIGN(3F)                    (UNIX 5.0)                   SIGN(3F)



      NAME
           sign, isign, dsign - Fortran transfer-of-sign intrinsic
           function

      SYNTAX
           integer i, j, k
           real r1, r2, r3
           double precision dp1, dp2, dp3

           k = isign(i, j)
           k = sign(i, j)

           r3 = sign(r1, r2)

           dp3 = dsign(dp1, dp2)
           dp3 = sign(dp1, dp2)

      DESCRIPTION
           Sign returns the magnitude of its first argument with the
           sign of its second argument, in the integer, real, or
           double-precsion type of its arguments.

           ISign returns the integer magnitude of its integer
           arguments.

           Dsign returns the double magnitude of its double arguments.

           Although sign works for integers, reals, and doubles, the
           various forms are for programming clarity.


























      Page 1                                          (73 A2 03MT REV1)



