]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/ancient-fonts.ly
Imported Upstream version 2.19.45
[lilypond.git] / Documentation / snippets / ancient-fonts.ly
index e0d6f54f924baea1bc180d1802631de4cadacc92..70537f268162aa27f3926ca3671950d39bee0128 100644 (file)
@@ -1,24 +1,22 @@
-% DO NOT EDIT this file manually; it is automatically
-% generated from Documentation/snippets/new
-% Make any changes in Documentation/snippets/new/
-% and then run scripts/auxiliar/makelsr.py
-%
-% This file is in the public domain.
-%% Note: this file works from version 2.17.6
+%% DO NOT EDIT this file manually; it is automatically
+%% generated from LSR http://lsr.di.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
 %% This file is in the public domain.
-\version "2.17.6"
+\version "2.18.0"
 
 \header {
   lsrtags = "ancient-notation, symbols-and-glyphs"
 
   texidoc = "
-Shown here are many (all?) of the symbols that are included in
-LilyPond's support for ancient notation.
+Shown here are many of the symbols that are included in LilyPond's
+ancient notation.
+
 "
   doctitle = "Ancient fonts"
 } % begin verbatim
 
-
 upperStaff = \new VaticanaStaff = "upperStaff" <<
   \context VaticanaVoice <<
     \transpose c c {
@@ -31,7 +29,6 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       \override NoteHead.style = #'vaticana.inclinatum
       a! b ces'
       \bar "|"
-      % \break % 1 (8*1)
 
       \override NoteHead.style = #'vaticana.quilisma
       b! des'! ges! fes!
@@ -42,7 +39,6 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       \override NoteHead.style = #'vaticana.reverse.plica
       c d
       \bar "|"
-      % \break %2 (8*1)
 
       \override NoteHead.style = #'vaticana.punctum.cavum
       es f
@@ -54,7 +50,6 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       g f
       \override NoteHead.style = #'vaticana.linea.punctum
       \once \override Staff.BarLine.bar-extent = #'(-1 . 1) \bar "|"
-      % \break % 3 (8*1)
 
       es d
       \override NoteHead.style = #'vaticana.epiphonus
@@ -62,14 +57,15 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       \override NoteHead.style = #'vaticana.cephalicus
       es f
 
-      \override Staff.KeySignature.glyph-name-alist = #alteration-medicaea-glyph-name-alist
-      \override Staff.Accidental.glyph-name-alist = #alteration-medicaea-glyph-name-alist
+      \override Staff.KeySignature.glyph-name-alist =
+        #alteration-medicaea-glyph-name-alist
+      \override Staff.Accidental.glyph-name-alist =
+        #alteration-medicaea-glyph-name-alist
       \override Staff.Custos.style = #'medicaea
       \override NoteHead.style = #'medicaea.punctum
       \clef "medicaea-fa2"
       ces des
       \bar "|"
-      % \break % 4 (8*1)
 
       e! f! ges
       \clef "medicaea-do2"
@@ -78,21 +74,21 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       \override NoteHead.style = #'medicaea.virga
       b! a!
       \bar "|"
-      % \break % 5 (8*1)
 
       ges fes
       \clef "medicaea-fa1"
       \override NoteHead.style = #'medicaea.rvirga
       e des ces
 
-      \override Staff.KeySignature.glyph-name-alist = #alteration-hufnagel-glyph-name-alist
-      \override Staff.Accidental.glyph-name-alist = #alteration-hufnagel-glyph-name-alist
+      \override Staff.KeySignature.glyph-name-alist =
+        #alteration-hufnagel-glyph-name-alist
+      \override Staff.Accidental.glyph-name-alist =
+        #alteration-hufnagel-glyph-name-alist
       \override Staff.Custos.style = #'hufnagel
       \override NoteHead.style = #'hufnagel.punctum
       \clef "hufnagel-fa2"
       ces des es
       \bar "|"
-      % \break % 6 (8*1)
 
       fes ges
       \clef "hufnagel-do2"
@@ -101,17 +97,14 @@ upperStaff = \new VaticanaStaff = "upperStaff" <<
       \override NoteHead.style = #'hufnagel.virga
       bes! as!
       \bar "|"
-      % \break % 7 (8*1)
 
       ges! fes!
       \clef "hufnagel-do-fa"
       \override NoteHead.style = #'hufnagel.punctum
       es! des ces des! es! fes!
       \bar "||"
-      % \break % 8 (8*1)
 
       s32*1
-      % \break % 12 (32*1)
     }
   >>
 >>
@@ -126,12 +119,10 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
       \clef "neomensural-c2"
       cis1
       \bar "|"
-      % \break % 2 (16*1)
 
       \[ g\breve dis''\longa \]
       b\breve \[ a\longa d\longa \]
       \clef "petrucci-c2"
-      % \break % 4 (16*1)
 
       fis1 ces1
       \clef "petrucci-c2"
@@ -140,7 +131,6 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
       \clef "mensural-c2"
       r\breve
       \bar "|"
-      % \break % 5 (8*1)
 
       r2
       \clef "mensural-g"
@@ -155,7 +145,6 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
       \clef "petrucci-f"
       r\breve
       \bar "|"
-      % \break % 6 (8*1)
 
       r\breve
       \clef "mensural-f"
@@ -165,18 +154,15 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
       \clef "mensural-f"
       e\breve f g a1
       \clef "mensural-g"
-      % \break % 7 (8*1)
 
       \[ bes'!\longa a'!\longa c''!\longa \]
       e'1 d' c' d' \bar "|"
       \bar "|"
-      % \break % 9 (16*1)
 
       bes'!\longa fis'!1 as'!1 ges'!\longa % lig
       \set Staff.forceClef = ##t
       \clef "mensural-g"
       e'2 d' c' \bar "|"
-      % \break % 11 (16*1)
 
       \set Staff.forceClef = ##t
       \clef "petrucci-g"
@@ -187,7 +173,6 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
       \set Staff.forceClef = ##t
       \clef "mensural-g"
       es'! des'! cis'!1 \bar "||"
-      % \break % 12 (8*1)
     }
   >>
 >>
@@ -203,7 +188,6 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
   >>
   \layout {
     indent = 0.0
-    line-width = 17.25\cm
     \context {
       \Score
       timing = ##f
@@ -218,14 +202,16 @@ lowerStaff = \new MensuralStaff = "lowerStaff" <<
     \context {
       \MensuralStaff
       \revert  BarLine.transparent
-      \override KeySignature.glyph-name-alist = #alteration-mensural-glyph-name-alist
+      \override KeySignature.glyph-name-alist =
+        #alteration-mensural-glyph-name-alist
       clefGlyph = #"clefs.petrucci.c2"
     }
     \context {
       \VaticanaStaff
       \revert  BarLine.transparent
       \override StaffSymbol.thickness = #2.0
-      \override KeySignature.glyph-name-alist = #alteration-vaticana-glyph-name-alist
+      \override KeySignature.glyph-name-alist =
+        #alteration-vaticana-glyph-name-alist
       \override Custos.neutral-position = #4
     }
   }