integer-op-word ( triple -- word )


Vocabulary
math.partial-dispatch

Inputs
triplean object


Outputs
wordan object


Definition
USING: accessors sequences words ;

IN: math.partial-dispatch

: integer-op-word ( triple -- word )
[ name>> ] map "-" join "math.partial-dispatch" create-word
;