-1^ ( m -- n )

Vocabulary

koszul

Inputs

m

an object

Outputs

n

an object

Definition

USING: kernel math ;

IN: koszul

: -1^ ( m -- n ) odd? -1 1 ? ;