find-operator ( operators string -- word/f )


Vocabulary
24-game

Inputs
operatorsan object
stringan object


Outputs
word/fan object


Definition
USING: accessors kernel sequences ;

IN: 24-game

: find-operator ( operators string -- word/f )
[ [ name>> ] ] dip [ = ] curry compose find nip ;