数値が0より大きい場合は1、数値が0の場合は0、数値が0より小さい場合は-1を返します。
SIGN(i)
/*Main program*/ say SIGN(12) say SIGN(-12)
上記のプログラムを実行すると、次の結果が得られます。
1 -1