deep-spread>quot ( seq -- quot )

Vocabulary

combinators

Inputs

seq	a sequence

Outputs

quot	a quotation

Word description

Creates a new quotation from a sequence of quotations that applies each quotation to a stack element in turn.

See also

spread

Definition

USING: kernel sequences ;

IN: combinators

: deep-spread>quot ( seq -- quot )
    [ ] [ [ [ dip ] curry ] dip append ] reduce ;