-i* ( x -- y )

Vocabulary

math.functions

Inputs

x

an object

Outputs

y

an object

Definition

USING: kernel math ;

IN: math.functions

: -i* ( x -- y ) >rect swap neg rect> ;