Re: accord sur basse

[Pierre Perol-Schneider]

Bien vu Jean-Pierre,

Le fil que je n'ai pas retrouvé ce matin :
http://lilypond.1069038.n5.nabble.com/Rootless-slash-chords-2017-edition-td201634.html

Et le snippet concerné :
http://lsr.di.unimi.it/LSR/Item?id=776

Cordialement,

Pierre

2018-01-12 14:28 GMT+01:00 achard <address@hidden>:

Voilà la réponse pour ceux que ça intéresse.

#(define (rootless-chord-names in-pitches bass inversion context)
   (ignatzek-chord-names `(,(ly:make-pitch 0 0 0) ,(ly:make-pitch 0 0
0)) bass inversion context))

#(define (empty-namer pitch lower?) (make-simple-markup ""))

retainChordNoteNamer =
\applyContext
  #(lambda (context)
     (let ((rn (ly:context-property context 'chordRootNamer)))
       (ly:context-set-property! context 'chordNoteNamer rn)))

rootless = {
  \retainChordNoteNamer
  \once \set chordNameFunction = #rootless-chord-names
  \once \set chordRootNamer = #empty-namer
}

After that, one can use \rootless as follows:

fis2:m7.9 \rootless fis4:m7.9/f \rootless fis4:m7.9/e \rootless
fis1:m7.9/dis

Cordialement

JPierre





_______________________________________________
liste de diffusion lilypond-user-fr
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr