]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/custos.ly
Merge branch 'master' of git+ssh://git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / input / regression / custos.ly
1 \version "2.12.0"
2 \header {
3     texidoc = "Custodes may be engraved in various styles."
4 }
5
6 \layout {
7   \context {
8     \Staff
9     \consists Custos_engraver
10   }
11   ragged-right = ##t
12 }
13
14
15
16 {
17   \override Staff.Custos  #'neutral-position = #4
18
19   \override Staff.Custos  #'style = #'hufnagel
20   c'1^"hufnagel"
21   \break < d' a' f''>1
22
23   \override Staff.Custos  #'style = #'medicaea
24   c'1^"medicaea"
25   \break < d' a' f''>1
26
27   \override Staff.Custos  #'style = #'vaticana
28   c'1^"vaticana"
29   \break < d' a' f''>1
30
31   \override Staff.Custos  #'style = #'mensural
32   c'1^"mensural"
33   \break < d' a' f''>1
34 }