1temp2d ( quot: ( a b c -- d e f ) -- quot )

Vocabulary

combinators.extras

Inputs

quot	a quotation with stack effect ( a b c -- d e f )

Outputs

quot

an object

Definition

USING: kernel ;

IN: combinators.extras

: 1temp2d ( quot: ( a b c -- d e f ) -- quot )
    [ [ rot ] ] dip [ -rot ] compose compose ; inline