Dear Janusz and friends,  I´m back to the subject of permutations. The expression below brings all the permutations for a diatonic scale (or any other set you might want to do).   (setf diat-permute (permute '(1 2 3 4 5 6 7))) (substitute-map '(c4 d4 e4 f4 g4 a4 b4) '(1 2 3 4 5 6 7) diat-permute)   But the list is too long and redundant (I got also a stack overflow when trying to make a snippet out of it (but this is another problem...)   The question I´d like to