1 %% DO NOT EDIT this file manually; it is automatically
2 %% generated from LSR http://lsr.di.unimi.it
3 %% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
4 %% and then run scripts/auxiliar/makelsr.py
6 %% This file is in the public domain.
10 lsrtags = "scheme-language"
13 You can add additional elements to notes using @code{map-some-music}.
14 In this example, an extra script is attached to a note.
16 In general, first do a @code{\\displayMusic} of the music you want to
17 create, then write a function that will work on the appropriate parts
21 doctitle = "Adding extra fingering with scheme"
25 #(define-music-function (script music)
29 (define (append-script-at! prop)
30 (set! (ly:music-property mus prop)
31 (append (ly:music-property mus prop)
32 (list (ly:music-deep-copy script))))
34 (case (ly:music-property mus 'name)
36 (append-script-at! 'elements))
38 (append-script-at! 'articulations))
44 \addScript _6 { c'4-3 <c' e' g'> }