Meanwhile, I found a solution for my question, for anyone who could be
interested:
%%%%%%%%
createTuplet = #(define-music-function (parser location notes) (ly:music?)(let
((noteCount (length (extract-typed-music notes '(note-event event-chord
rest-event skip-event)))) ) #{ \times #(cons 2 noteCount) $notes#}))
{\createTuplet {<c' g'> e' s g r}}
Il Venerdì 2 Marzo 2018 18:33, Paolo Prete <p4olo_pr...@yahoo.it> ha
scritto:
Hello,
in the snippet below how can I replace "4" (in the denominator of "\times")
with the number of notes+rests (including "s") in $notes ?
Thanks
%%%%%%%%
createTuplet = #(define-music-function (parser location notes) (ly:music?)#{
\times 2/4 $notes#})
{ \createTuplet {c' e' r g'}}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
