]> git.donarmstrong.com Git - lilypond.git/blob - input/test/chord-names.ly
76a0246148c27d8a1be28f28196d3ec079af107a
[lilypond.git] / input / test / chord-names.ly
1 chord = \notes\transpose c''\chords{
2    c1
3    c:m
4    c:m5-
5    c:m5-.7-
6    c:7+
7    c:m5-.7
8    c:5-.7+
9    c:m7
10    c:7
11    d
12    d/a
13    d/+gis
14 }
15
16 \score{
17     <
18             \context ChordNames \chord
19             \context Staff \chord
20     >
21     \paper{
22         linewidth = -1.0;
23                 \translator { 
24                         \ChordNameContext
25                         ChordName \push #'word-space = #1 
26                 }
27     }
28 }
29