4 Simple customised music apply.
8 music = \notes { c'4 d'4( e'4 f'4 }
10 #(define (reverse-music music)
11 (let* ((elements (ly-get-mus-property music 'elements))
12 (reversed (reverse elements))
13 (span-dir (ly-get-mus-property music 'span-direction)))
15 (ly-set-mus-property music 'elements reversed)
18 (ly-set-mus-property music 'span-direction (- span-dir)))
20 (map reverse-music reversed)
27 \apply #reverse-music \music
29 \paper { linewidth = -1.; }