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