I'm trying to create a function that changes the note head font-size depending on the duration of the note. For example, if the note is a whole-note, then its note head should have double size.
I haven't found anything in the lilypond snippets that is even close. I was trying something like this, but for some reason the argument grub is not passed.
#(define (size-notehead grob)
(duration-to-size
(ly:event-property (event-cause grob) 'duration)))
applyNoteHeadSize = {
\override NoteHead.font-size = #size-notehead
}
Can someone help me, please?