]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/chords/chord-name-exceptions.ly
ee969ff49281acb4f73dc85d2ea943d1dd14b20a
[lilypond.git] / input / lsr / chords / chord-name-exceptions.ly
1 %%  Do not edit this file; it is auto-generated from LSR!
2 \version "2.10.12"
3
4 \header { texidoc = "
5 The property @code{chordNameExceptions} can used to store a list of
6 special notations for specific chords. 
7 " }
8
9 % 7sus4 denoted with ^7 wahh
10 chExceptionMusic = {
11   <c f g bes>1-\markup { \super "7" "wahh" }
12 }
13
14 % add to existing exceptions.
15 chExceptions = #(append
16   (sequential-music-to-chord-exceptions chExceptionMusic #t)
17   ignatzekExceptions)
18
19 theMusic = \chordmode {
20   c:7sus4 c:dim7/+f
21   \set chordNameExceptions = #chExceptions
22   c:7sus4 c:dim7/+f
23 }
24
25 \layout {
26   ragged-right = ##t 
27 }
28
29 << \context ChordNames \theMusic
30    \context Voice \theMusic
31 >>  
32