Re: Détection d'une propriété de 'NoteEvent par scheme

[Gilles THIBAULT]

Le mardi 24 février 2015, 06:34:29 Siphon a écrit :
> Gilles THIBAULT wrote
> 
> > Il existe dans les dossiers Lilypond une fonction (non documenté) qui peut
> > simplifier ça :
> > (extract-named-music music liste-de-nom)
> > Elle renvoie la liste de music, dont les noms sont contenus dans
> > liste-de-nom.
> > Avec
> > music = { c4\startGroup }
> > on écrirait
> > (extract-named-music music '(NoteGroupingEvent))
> > 
> > On obtiendrait une liste avec 1 seul élément :
> >  (make-music 'NoteGroupingEvent ...)
> > 
> > --
> > Gilles
> 
> Merci, voilà qui m'avance déjà pas mal... Maintenant que j'ai filtré les
> notes qui contiennent 'NoteGroupingEvent, si je veux sélectionner celles
> dont 'span-direction = -1 (départ de crochet), est-ce que je peux utiliser
> cette même fonction extract-named-music ?
Il suffit de filtrer la liste obtenue
  (filter 
     (lambda(m)
         (= (ly:music-property m 'span-direction 0) -1))
      ma-liste-de-NoteGrouping)

-- 
Gilles