The SIGN function transfers the sign of a2 to the magnitude of a1.
SIGN(a1,a2) = ABS(a1) if a2 > 0
SIGN(a1,a2) = -ABS(a1) if a2 < 0
Format
SIGN (a1,a2)
Arguments
a1 | Any valid function expression. |
a2 | Any valid function expression. |
Caution: | The SIGN function is discontinuous. Use this function with care to avoid creating expressions that are discontinuous. |
Examples
VARIABLE/23, FUNCTION=10*SIGN(DM(24,33),VZ(24,33))
When VZ(24,33) >0, the value of VARIABLE/23 is +10*DM(24,33). When VZ(24,33) < 0, the value of VARIABLE/23 is -10*DM(24,33).
See other
FORTRAN 77 available.