input/test/vaticana.ly

   1 \version "1.8.0"
   2 % possible rename to ancient-something.
   3
   4 \header { texidoc       = "Ancient Vaticana
   5 Vaticana ligature test. "
   6 }
   7
   8 \include "gregorian-init.ly"
   9
  10 cantus = \notes {
  11   \clef "vaticana_fa2"
  12   \[ f \quilisma g \auctum \descendens a \]
  13   \[ \virga a g \pes a \inclinatum f \inclinatum d
  14      c \pes d \quilisma e \pes f \virga g
  15      a \flexa f \pes g \inclinatum f \inclinatum e \]
  16   \[ d \quilisma e f \flexa e \pes f \]
  17   \[ e \flexa d \]
  18 }
  19
  20 verba = \context Lyrics = verba \lyrics {
  21   Al-4*3 le-4*15 lu-4*5 ia.4*2
  22 }
  23
  24 \score {
  25   \context VaticanaVoice <
  26     \cantus
  27     \verba
  28   >
  29   \paper {
  30     stafflinethickness = \staffspace / 7.0
  31     linewidth = 137.0 \mm
  32     width = 137.0 \mm
  33     indent = 0.0
  34     raggedright = ##t
  35     packed = ##t
  36     % packed = ##t %%%% FIXME
  37     \translator {
  38       \ScoreContext
  39       \remove Bar_number_engraver
  40       timing = ##f
  41       barAlways = ##t
  42     }
  43   }
  44 }