> > You could also use append-map which will concatenate the lists without > the inner call to make-sequential-music: > > %%%% > { > $(make-sequential-music > (append-map > (lambda (x) (list > #{ $(ly:make-pitch 0 x) 4 #} > #{ \mark \markup \override #'(font-size . -3) 10 #} )) > (iota 4 1))) > } > %%%% > > In fact, using list-splicing, you can eliminate the outer call to > make-sequential-music as well: > > %%%% > { > $@(append-map > (lambda (x) (list > #{ $(ly:make-pitch 0 x) 4 #} > #{ \mark \markup \override #'(font-size . -3) 10 #} )) > (iota 4 1)) > } > %%%% > > Thanks Aaron, that is indeed very neat.
> Also note the above use of #{ #} to escape music syntax within scheme, > which can often be more abbreviated. > Yes, another thing I had forgotten about! Best, /h