[CM] rotation-pattern

[Johannes Quint]

is it possible to get the following with a rotation-pattern?

(setf x
	(new rotation :of '(a b c d e)
	:rotations ???
	))

(next x 25)
=>
a b c d e
c d e a b
e a b c d
b c d e a
d e a b c

in my  memory, there was a way, by i don't remember it.
thanks, johannes

__

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
johannes.quint at web.de
http://private.addcom.de/j.quint/index.htm
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: text/enriched
Size: 452 bytes
Desc: not available
URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20030930/ad6d8a64/attachment.bin>