Rebol Programming/sign?

= USAGE: = SIGN? number

= DESCRIPTION: = Returns sign of number as 1, 0, or -1 (to use as multiplier).

SIGN? is a function value. = ARGUMENTS =
 * number -- (Type: number money time)

= SOURCE CODE = sign?: func [ {Returns sign of number as 1, 0, or -1 (to use as multiplier).} number [number! money! time!] ][   either positive? number [1] [either negative? number [-1] [0]] ]