|
From: | Simon Froger |
Subject: | Détection d'une propriété de 'NoteEvent par scheme |
Date: | Sun, 22 Feb 2015 11:18:51 +0100 |
User-agent: | Mozilla/5.0 (X11; Linux x86_64; rv:31.0) Gecko/20100101 Thunderbird/31.4.0 |
Bonjour.Je suis en train de construire une fonction musicale en scheme, dans laquelle j'ai besoin de détecter si la note traitée fait l'objet d'un départ de crochet d'analyse (\startGroup).
Cette fonction est de type : maFonction = #(define-music-function (parser location myNote) (ly:music?) [définition de ma fonction...] ) Si je rentre : \displayMusic c4\startGroup j'obtiens : (make-music 'NoteEvent 'articulations (list (make-music 'NoteGroupingEvent 'span-direction -1)) 'duration (ly:make-duration 2 0 1) 'pitch (ly:make-pitch -1 0 0))Si j'ai bien compris, à l'intérieur de la liste : (ly:music-property myNote 'articulations) je dois trouver l'élément : (make-music 'NoteGroupingEvent 'span-direction -1) pour avoir une fonction de type : (if [monElement est présent dans maListe] [fais ceci] [sinon fais cela]) Problème : je ne trouve pas la fonction scheme qui corresponde à "est présent dans"... J'ai essayé successivement "memq", "memv" et "member", sans résultat...
[Prev in Thread] | Current Thread | [Next in Thread] |