sign(3F) — sysv — mips UMIPS RISC/os 4.52



SIGN(3F-SysV)       RISC/os Reference Manual        SIGN(3F-SysV)



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

SYNOPSIS
     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
     isign returns the magnitude of its first argument with the
     sign of its second argument.  sign and dsign are its real
     and double-precision counterparts, respectively.  The gen-
     eric version is sign and will devolve to the appropriate
     type depending on its arguments.
































                         Printed 1/15/91                   Page 1
Museum
