>
> 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

Reply via email to