Le 31/12/2021 à 17:07, Thomas Morley a écrit :
How about:
\version "2.23.5"

#(define Bass_changes_equal_root_engraver
   (lambda (ctx)
   "For sequential ChordNames with same root, but different bass, the root 
markup
is dropped: D D/C D/B  -> D /C /B
The behaviour may be controlled by setting the chordChanges context-property."
     (define sort-procedure (lambda (p1 p2) (< (car p1) (car p2))))


For your information, there is a helper for this
starting in 2.23.4 (commit 89f7ebdc63).

(define sort-procedure (comparator-from-key car <))

Cheers,
Jean


Reply via email to