\version "2.18.2"

\include "gregorian.ly"

#(set-global-staff-size 40)
\paper {
  %fonts = #(make-pango-font-tree
            %"Linux Libertine O"
            %"Linux Biolinum O"
            %"Ubuntu Mono"
            %(/ (* staff-height pt) 2.5))
  system-system-spacing.basic-distance = #8
  annotate-spacing = ##f
  ragged-last = ##f
}

\layout {
  \override Staff.InstrumentName.font-size = 8
  \override Staff.InstrumentName.Y-offset = -7.9
  \override Lyrics.StanzaNumber.font-series = #'medium
  \override Lyrics.LyricText.font-size = -2
  \override Lyrics.StanzaNumber.font-size = -2
  %\revert VaticanaStaff.StaffSymbol.color
  %\override VaticanaStaff.LedgerLineSpanner.color = #black
  \override VaticanaStaff.VerticalAxisGroup.nonstaff-nonstaff-spacing.basic-distance = #0
  \override VaticanaStaff.VerticalAxisGroup.nonstaff-nonstaff-spacing.minimum-distance = #0
  \override VaticanaStaff.VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0
  \override VaticanaStaff.VerticalAxisGroup.default-staff-staff-spacing.basic-distance = #0
  indent = 2\cm
}

\header {
  title = \markup \medium \smallCaps "Populus Sion"
  %composer = \markup \small \italic "Cf. Is. 30, 19 . 30 ; Ps. 79"
}

br = {  \bar "" \break }
red = { \once \override NoteHead.color = #red 
\once \override Script.color = #red }
green = { \once \override NoteHead.color = #green }
blue = { \once \override NoteHead.color = #blue }



music = {
  \set VaticanaStaff.instrumentName = "P"
  \clef "vaticana-do2"
  \[ g \melisma \pes c' c' \pes d' \melismaEnd \] % s
  c' % u
  c'  % u
  \[  c' \pes d' \] % i
  \[  c' \flexa b \pes \green \augmentum c' \] % o
  \divisioMaior
  \[  c' \pes d' \flexa c' \pes d' \] % e
  \green \augmentum g  % e
  \[ \green \augmentum g \flexa a \quilisma b \pes c' c' \pes d' \] % ó
  c' % i
   c' % u
  \[  c' \pes d' \] % é
  \[  d' \flexa b d' \flexa c' \] % i
  \green \augmentum c' % e
  \divisioMinima
  \br
  \[ \red \virga \augmentum d'  c' \pes d' \flexa b \] % a
  \[  a \flexa \deminutum g \] % a
  \[  b \pes c' \flexa b \] % á
  \[  a \pes b \] % a
  \[   g\episemInitium \flexa a \pes g \episemFinis \] % e
  \green \augmentum g % e
  \divisioMaxima
  g % e
  \[  g \pes c' \] % s
  \[  c' c' \pes d' \] % í
  d' % a
  \[  f' \flexa e' \pes f' \flexa d' \] % á
  d' % i
  d' % e
  \[  d' \pes e' \] % ó
  \br
  \[  d' \flexa c' \pes d' \] % i
  \[ \red \virga \augmentum d'  c' \pes d'\inclinatum c'\inclinatum a \] % u
  \divisioMinima
  \[  c' \blue d'\ictus \pes e' \] % ó
  \[  e' \flexa d'\virga f'\inclinatum e'\inclinatum  d' \] % i
  \[  d' \pes \deminutum e' \] % a
  \[ \red \augmentum e'  \flexa d'\quilisma e' \pes f' \] % o
  \[  e' \flexa d' \] % i
  \[  d'\episemInitium \pes e' \flexa d' \episemFinis \] % u
  \green \augmentum d' % æ
  \divisioMaior
  g  % i
  g  % æ
  \[  g \blue a\ictus \pes c' \] % í
   c' % i
  \[  c' \pes d'\virga e' e' \flexa d' \] % s
  \br
  \[  b \pes c' d' \pes e'\inclinatum \blue d'\ictus \inclinatum c' \] % o
  \[  d' \flexa c' c' \flexa a\quilisma b \pes c' \] % i
  \[  g \episemInitium \flexa a \pes g \episemFinis \] % e
   g % i
  \finalis
  \[  g \pes c' \flexa b \] % i
  \[  c' \pes d' \] % e
   d' % i
   d' % s
   d' % a
  \[ d' \pes f' \] % e
   e' % i
  \[  e' \flexa \deminutum d' \] % é
  \[ \red \augmentum d' \pes \red \augmentum e' \] % e
  \divisioMaxima
  \br
  \[  d' \flexa b \] % i
  \[  c' \pes d' \] % e
   d' % ú
   d' % i
   d' % e
  \[  d'\quilisma e' \pes f' \] % u
  \[  \blue d'\ictus \] % s
  c' % e
  \[  c' c' c' \] % o
  \[ \red \augmentum a \flexa \red \augmentum g \] % e
  \finalis
  \[  g \pes c' \flexa b \] % ó
  \[  c' \pes d' \] % i
   d' % s
   d' % a
   d' % i
  \divisioMaxima
  \br
  d' % s
  \[  d'\quilisma e' \pes f' \] % s
  d' % s
  c' % s
  \[ c' c' c' \] % s
  \[ \red \augmentum a \flexa \red \augmentum g \] s % s
  \finalis
}

lyricx = \lyricmode {
  Ó -- pu -- lus Si --  _ on,  _  _
  \set stanza = "*"
  ec --  _  _  _ ce Dó --  _  _  _  _  _ mi -- nus vé --  _ ni --  _  _  _ et
  ad -- _  _  _ sal --  _ ván --  _  _ das  _ gen --  _  _ tes
  \set stanza = ":"
  et au --  _ dí --  _  _ tam fá --  _  _  _ ci -- et Dó  _ mi --  _  _ nus  _  _  _  _
  gló --  _  _ ri --  _  _  _  _ am  _ vo --  _  _  _ cis  _ su --  _  _ æ,
  in læ -- tí --  _  _ ti -- a  _  _  _  _ cor --  _  _  _  _  _ dis  _  _  _  _  _ ves --  _  _ tri.
  \set stanza = \markup \italic "Ps."
  Qui  _  _ re --  _ gis I -- sra -- el,  _ in -- tén --  _ de:  _
  \set stanza = "*"
  qui  _ de --  _ dú -- cis vel -- ut  _  _ o -- vem Jo --  _  _ seph.  _
  Gló --  _  _ ri --  _ a Pa -- tri.
  E -- u --  _  _ o -- u a --  _  _ e  _
}


\score {
  <<
    \new VaticanaStaff \new VaticanaVoice = "v" \music
    \new Lyrics \lyricsto "v" \lyricx
  >>
  \layout {
    ragged-last = ##t
    timing = ##t
    barAlways = ##f
    \context {
      \Score
      \override SpacingSpanner.spacing-increment = 0
      \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1 2)
      \remove "Default_bar_line_engraver"
    }
  }
}