put-st ( value -- state )

Vocabulary

monads

Inputs

value

an object

Outputs

state

an object

Definition

USING: arrays kernel ;

IN: monads

: put-st ( value -- state ) '[ drop _ f 2array ] <state> ;