sign(3F) sign(3F)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 gener- ic version is sign, which devolves to the appropriate type depending on its arguments. April, 1990 1