]> git.donarmstrong.com Git - lilypond.git/blob - ly/gregorian-init.ly
Juergens patch.
[lilypond.git] / ly / gregorian-init.ly
1 \version "1.7.10"
2
3 %
4 % declare shortcuts for gregorian chant notation
5 %
6
7 virga =
8   \once \property Voice.LigatureHead \override #'virga = ##t
9 stropha =
10   \once \property Voice.LigatureHead \override #'stropha = ##t
11 inclinatum =
12   \once \property Voice.LigatureHead \override #'inclinatum = ##t
13 auctum =
14   \once \property Voice.LigatureHead \override #'auctum = ##t
15 aucta =
16   \once \property Voice.LigatureHead \override #'auctum = ##t
17 descendens =
18   \once \property Voice.LigatureHead \override #'descendens = ##t
19 ascendens =
20   \once \property Voice.LigatureHead \override #'ascendens = ##t
21 pes =
22   \once \property Voice.LigatureHead \override #'pes-or-flexa = ##t
23 flexa =
24   \once \property Voice.LigatureHead \override #'pes-or-flexa = ##t
25 semivocalis =
26   \once \property Voice.LigatureHead \override #'semivocalis = ##t
27 oriscus =
28   \once \property Voice.LigatureHead \override #'oriscus = ##t
29 quilisma =
30   \once \property Voice.LigatureHead \override #'quilisma = ##t
31 deminutum =
32   \once \property Voice.LigatureHead \override #'deminutum = ##t