[CM] rotation-pattern

[Johannes Quint]

--Apple-Mail-2-739983193
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
	charset=US-ASCII;
	format=flowed

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@web.de
http://private.addcom.de/j.quint/index.htm
--Apple-Mail-2-739983193
Content-Transfer-Encoding: 7bit
Content-Type: text/enriched;
	charset=US-ASCII

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


<fontfamily><param>Helvetica</param>__


Johannes Quint

Rilkestr.55

D-53225 Bonn

0228 468256

johannes.quint@web.de

http://private.addcom.de/j.quint/index.htm</fontfamily>
--Apple-Mail-2-739983193--