-nrot ( n -- quot )
Factor handbook » The language » Combinators » Generalized shuffle words and combinators » Generalized shuffle words

Prev:	nrot ( n -- quot )
Next:	nnip ( n -- )

Vocabulary
generalizations

Inputs

n	an integer

Outputs
None

Word description
A generalization of -rot that works for any number of items on the stack.

Examples

USING: arrays generalizations kernel prettyprint ; 1 2 3 4 4 -nrot 4array .
{ 4 1 2 3 }

Some core words expressed in terms of -nrot:

swap	2 -nrot
-rot	3 -nrot

Definition

USING: kernel math ;

IN: generalizations

MACRO: -nrot ( n -- quot )
    1 -
    [ ] [ [ [ swap ] ] dip [ dip ] curry compose ] swapd times ;