Added power chord definition, symbol and command to typeset this symbol.
<c d es>-\markup { "m" }-\markup { \normal-size-super "sus2" }
}
<c d es>-\markup { "m" }-\markup { \normal-size-super "sus2" }
}
+powerChordSymbol = {
+ <c g>-\markup { \normal-size-super "5" }
+ <c g c'>1-\markup { \normal-size-super "5" }
+}
+
%% TODO: compatibility ignatzek code
fullJazzExceptions=
%% TODO: compatibility ignatzek code
fullJazzExceptions=
partialJazzExceptions=
#(sequential-music-to-chord-exceptions partialJazzMusic #f)
partialJazzExceptions=
#(sequential-music-to-chord-exceptions partialJazzMusic #f)
+powerChordExceptions =
+ #(sequential-music-to-chord-exceptions powerChordSymbol #t)
+
ignatzekExceptions =
#(sequential-music-to-chord-exceptions ignatzekExceptionMusic #t)
ignatzekExceptions =
#(sequential-music-to-chord-exceptions ignatzekExceptionMusic #t)
\set chordRootNamer = #(chord-name->italian-markup #f)
\set chordPrefixSpacer = #0.4
}
\set chordRootNamer = #(chord-name->italian-markup #f)
\set chordPrefixSpacer = #0.4
}
+powerChords = {
+ \set chordNameExceptions = #powerChordExceptions
+}