]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/chord-name-exceptions.ly
Merge branch 'lilypond/translation' of ssh://trettig@git.sv.gnu.org/srv/git/lilypond...
[lilypond.git] / input / lsr / chord-name-exceptions.ly
index ce7ace9071014525766be026fb0c0a1b15b535fc..21eda82d0b3e706dc6b70e035e08f1b03c540713 100644 (file)
@@ -1,26 +1,33 @@
-%% Do not edit this file; it is auto-generated from LSR!
-%% Tags: chords
-\version "2.11.35"
+%% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
+%% This file is in the public domain.
+\version "2.11.49"
 
-\header { texidoc = "
-The property @code{chordNameExceptions} can used to store a list of
+\header {
+  lsrtags = "chords"
+
+  texidoc = "
+The property @code{chordNameExceptions} can be used to store a list of
 special notations for specific chords. 
-" }
-% begin verbatim
-% 7sus4 denoted with ^7 wahh
+
+"
+  doctitle = "Chord name exceptions"
+} % begin verbatim
+% modify maj9 and 6(add9)
+% Exception music is chords with markups
 chExceptionMusic = {
-  <c f g bes>1-\markup { \super "7" "wahh" }
+  <c e g b d'>1-\markup { \super "maj9" }
+  <c e g a d'>1-\markup { \super "6(add9)" }
 }
 
-% add to existing exceptions.
-chExceptions = #(append
-  (sequential-music-to-chord-exceptions chExceptionMusic #t)
+% Convert music to list and prepend to existing exceptions.
+chExceptions = #( append
+  ( sequential-music-to-chord-exceptions chExceptionMusic #t)
   ignatzekExceptions)
 
 theMusic = \chordmode {
-  c:7sus4 c:dim7/+f
+  g1:maj9 g1:6.9
   \set chordNameExceptions = #chExceptions
-  c:7sus4 c:dim7/+f
+  g1:maj9 g1:6.9
 }
 
 \layout {
@@ -30,4 +37,3 @@ theMusic = \chordmode {
 << \context ChordNames \theMusic
    \context Voice \theMusic
 >>  
-