Re: Créer une fonction "polyphonie"

[Valentin Villenave]

2011/7/19 Seventies <address@hidden>:
> Étant un âne dans la manipulation de Scheme, je me demande s'il ne serait
> pas simple de créer une fonction du genre :
> polyphony expression1 expression2
>
> Voilà, alors, comment la créer, et comment l'utiliser ?

Au pif, quelque chose comme ceci :

polyphony=
#(define-music-function (parser location voixun voixdeux)
    (ly:music? ly:music?)
#{
<<{
  \voiceOne
  $voixun
}
\new Voice
{
  \voiceTwo
  $voixdeux
}
>>
\oneVoice
#})

C'est d'ailleurs quelque chose de ce style que j'utilise partout dans mon code :
http://git.savannah.gnu.org/cgit/opus-libre.git/tree/bin/macros.scm#n44

Cordialement,
V. Villenave.