ordinary-op ( word -- o )

Vocabulary

math.dual.private

Inputs

word

an object

Outputs

o

an object

Definition

USING: accessors generalizations kernel ;

IN: math.dual.private

MACRO: ordinary-op ( word -- o )
    [ input-length ] keep
    [ [ [ [ ordinary-part>> ] ] ] dip [ napply ] curry compose ]
    dip [ execute ] curry compose ;