Undocumented functions

[Rangarajan]

Hi,

I stumbled upon two functions in Opusmodus that seem to be undocumented:

- (left-rotate a-list)

- (right-rotate a-list)

 

Could you take care of this in the next release? Both are useful functions.

 

Regards,

Rangarajan

[opmo]

No need for it, they are part of the final function GEN-ROTATE:

    

(gen-rotate 2 '(c4 d4 e4 g4 a4))

=> (g4 a4 c4 d4 e4)

 

(gen-rotate -2 '(c4 d4 e4 g4 a4))

=> (e4 g4 a4 c4 d4)

 

The keywords :left and :right are equivalents of the integer values -1 and 1. We can also use :type :seq to generate multiple lists for an entire rotation of the items in list:

 

(gen-rotate :left '(1 2 3 4) :type :seq)

=> ((1 2 3 4) (4 1 2 3) (3 4 1 2) (2 3 4 1))

 

Generate a sequence based on a rotation of 2 places right:

 

(gen-rotate 2 '(1 2 3 4 5) :type :seq)

=> ((1 2 3 4 5) (5 1 2 3 4) (4 5 1 2 3))

[Rangarajan]

OK. I had accidentally defined these two functions in my project and got an error message that these are predefined. I assume someone else might encounter the same situation and that is why I made that suggestion.

 

Regards,

Rangarajan