sign(3F) sign(3F)NAME sign, isign, dsign - returns Fortran transfer-of-sign intrinsic functions 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 generic version is sign, which devolves to the appropriate type depending on its arguments. January 1992 1