]> git.donarmstrong.com Git - lilypond.git/blob - ly/chord-modifiers.ly
dd82fdb331726323673d30e4a8414b9403e13bb0
[lilypond.git] / ly / chord-modifiers.ly
1 \version "1.3.146"
2
3 % urg!
4 %
5 \chordmodifiers #`(
6         (m . ,(make-pitch 0 2 -1 ))
7         (min . ,(make-pitch 0 2 -1 ))
8         (aug . ,(make-pitch 0 4 1 ))
9         ;; (dim . ,(make-pitch -100 4 -1 ))     
10         (dim . ,(make-pitch -100 2 -1 ))
11         ;; urg, not actually a chord-modifier, but it works
12         ;;  c7 -> <c bes>, c 7+ -> c b
13         (maj . ,(make-pitch 0 6 1 ))
14         ;; sus4 should delete 2 too...
15         (sus . ,(make-pitch 0 3 0 ))
16 )
17