-1^ ( n -- -1/1 )


Vocabulary
benchmark.partial-sums

Inputs
nan object


Outputs
-1/1an object


Definition
USING: math ;

IN: benchmark.partial-sums

: -1^ ( n -- -1/1 ) 2 mod 2 * 1 - ; inline