2temp2d ( quot: ( a b c d -- e f g h ) -- quot )

Vocabulary

combinators.extras

Inputs

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

Outputs

quot

an object

Definition

USING: shuffle ;

IN: combinators.extras

: 2temp2d ( quot: ( a b c d -- e f g h ) -- quot )
    '[ 2 4 0 nrotated @ 2 4 0 -nrotated ] ; inline