%	Ave verum corpus Christi,
%	natum de Maria Virgine:
%	vere passum, immolatum
%	in cruce pro homine:
%	cuius latus perforatum
%	fudit aquam cum sanguine:
%	esto nobis praegustatum,
%	mortis in examine. Amen.

\version "2.10.16"
#(set-global-staff-size 17)
\include "english.ly"

\paper {
	oddHeaderMarkup = \markup \fill-line {
		" "
		\on-the-fly #not-first-page \fromproperty #'header:runningTitle
		\on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string
	}
	evenHeaderMarkup = \markup \fill-line {
		\on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string
		\on-the-fly #not-first-page \fromproperty #'header:runningTitle
		" "
	}
	after-title-space = 3 \mm
}

\layout {
	indent = 0.0\cm
}

\header {
	title = \markup { "Ave verum corpus" }
	composer = \markup { "Franz Liszt (1811–1886)" }
	copyright = \markup{ "Typeset 2007 by Matthew Collett for the Auckland Catholic Music Schola" }
	runningTitle = \markup{ Liszt: \italic {Ave verum corpus} }
}

\paper {
  #(set-paper-size "a5")
	evenFooterMarkup = \markup \fill-line { " " "www.schola.org.nz" " " }
	page-top-space = #6
	ragged-last-bottom=##f
	system-count = #6
}

words = \lyricmode { 
	A -- ve ve -- rum cor -- pus Chris -- ti,
	na -- tum de Ma -- ri -- a Vir -- gi -- ne:
	ve -- re pas -- sum, im -- mo -- la -- tum
	in cru -- ce pro ho -- mi -- ne:
	cui -- us la -- tus per -- fo -- ra -- tum
	fu -- dit a -- quam cum san -- gui -- ne:
	es -- to no -- bis prae -- gus -- ta -- tum,
	mor -- tis in ex -- a -- mi -- ne. 
	A -- men, a -- men.
}

% create 3/2 2/2
tsMarkup =\markup {
  \override #'(baseline-skip . 2) \number {
    \column { "3" "2" }
    \column { "2" "2" }
  }
}
signature = {
	\override Staff.TimeSignature #'stencil = #ly:text-interface::print
	\override Staff.TimeSignature #'text = #tsMarkup
	\key d \minor
}

espress = \markup{ \dynamic p \italic{ espress. } }
molto = { \setTextCresc \set crescendoText = \markup { \italic "cresc. molto" }}
dolciss = \markup { \italic "dolciss." }
perd = \markup{\italic "perdendo" }
three = \set Score.measureLength = #(ly:make-moment 3 2)
two = \set Score.measureLength = #(ly:make-moment 2 2)

sMusic =  << \relative {
	\three	g'4.\p^\markup{\bold {Lento} } g8 g4 g g g 
	\two	a2 a \breathe
	\three 	a4. a8 a4 a a a 	
	\two	bf4. bf8 bf2 \breathe
	r2 bf4.\tenuto_\espress a8 a4 g \breathe bf4.\tenuto a8 
	\three 	a4 g \breathe r8 \setTextCresc bf8\< bf2 b8 b
	\two	b4.\accent\! b8 b4( c) \breathe \bar "||" \key a \minor r2 c4.\tenuto\p b8
	b4 a \breathe c4.\tenuto b8 b4 a \breathe r8 \molto c4\< c8
	\three 	c4 cs8 cs \setHairpinCresc cs4.\< d8 d2\sf~
	\two	\setTextDim d2.\> r4\fermata \bar "||" 
	\key d \major e4.(\!_\dolciss d8 cs4) b b4.( a8) a4 r4 |
	cs4.( b8 a4) g g4.( fs8) fs4 r4 |
	\setHairpinCresc fs2\pp fs8 r8 fs8 fs fs2.\< fs4\>
	\three 	fs1\fermata\pp ~ fs4 r4\fermata \bar "||" 	\two	g1~\pp^\markup{\italic{un poco riten.}} g2 fs4( e) a1^\perd a1\fermata \bar "|."
} >>

aMusic = << \relative {
	d4.\p d8 e4 e d d d4.( cs8) cs2 \breathe |
	e4. e8 f4 f f8( ef) ef4 ef4. d8 d2 \breathe |
	r2 f4.\tenuto_\espress e!8 e4 e \breathe f4.\tenuto e8 |
	e4 e \breathe r8 \setTextCresc e8\< e2 fs8 fs fs4.\accent\! g8 g2 \breathe |
	\key a \minor r2 g4.\tenuto\p fs8 fs4 fs \breathe g4.\tenuto fs8 fs4 fs \breathe r8 \molto fs4\< fs8 |
	fs4 e8 e \setHairpinCresc f4.\< f8 f2\sf\!~ \setTextDim f2.\> r4\fermata | 
	\key d \major e2.\!_\dolciss e4 e2( fs4) e8( d) cs2. cs4 cs2 cs4 r4 |
	\setHairpinCresc ds2\pp ds8 r8 ds8 ds cs2(\< b4) b8(\> cs) d!1\fermata\pp ~ d4 r4\fermata |
	d2(\pp e d) d d2.( cs4) d1\fermata |
} >>

tMusic = << \relative {
	g4.\p g8 g4 g g f8( e) f4.( e8) e2 \breathe |
	a4. a8 a4 a a g8( f) g4. f8 f2 \breathe |
	r2 d'4.\tenuto_\espress cs8 c4 c \breathe d4.\tenuto cs8 |
	cs4 cs \breathe r8 \setTextCresc cs8\< cs2 b8 b d4.\accent\! d8 d4( c!) \breathe |
	\key a \minor r2 e4.\tenuto\p ds8 ds4 ds \breathe e4.\tenuto ds8 ds4 ds \breathe r8 \molto ds4\< ds8 |
	ds4 cs8 cs cs4(\accent\! b8) b cs4(\sf b~ \setTextDim b2.)\> r4\fermata | 
	\key d \major b2.\!_\dolciss b4 cs2( d4) a a( g2) a4 as2 as4 r4 |
	\setHairpinCresc as2\pp as8 r8 as8 as fs2.\< fs4\> b2(\! a!2\fermata~ a4) r4\fermata |
	g1~\pp g2 g2 fs2( e) fs1\fermata |
} >>

bMusic = << \relative {
	bf,4.\p bf8 c4 c bf bf a2 a \breathe |
	cs4. cs8 d4 d c c bf4. bf8 bf2 \breathe |
	bf'4.\tenuto_\espress a8 a4 g \breathe bf4.\tenuto a8 a4 g \breathe |
	r8 bf8\< bf( a\!~a \setTextCresc g\<~g fs) fs4 r8 fs8 g4(\accent\! fs8) e e2 \breathe |
	\key a \minor c'4.\tenuto\p b8 b4 a \breathe c4.\tenuto b8 b4 a \breathe |
	\setHairpinCresc r8 c4\< b8 b8( a4 gs8) |
	gs4\! \molto r8 gs8\< a4(\accent gs8) gs a4(\sf\! gs4~ \setTextDim gs2.)\> r4\fermata |
	\key d \major gs2(\!_\dolciss g4) g g2( fs4) fs e2. e4 e2 fs4( e) | 
	\setHairpinCresc ds2\pp ds8 r8 ds8 ds ds2.\< ds4\> d1\fermata~\! d4 r4\fermata
	b2(\pp c b) bf a1 <<d1\fermata d,1>> |
} >>

\score { 
	\new ChoirStaff << 
		\new Staff << \clef treble     \signature \sMusic >> \addlyrics { \words } 
		\new Staff << \clef treble     \signature \aMusic >> \addlyrics { \words }
		\new Staff << \clef "treble_8" \signature \tMusic >> \addlyrics { \words }
		\new Staff << \clef bass       \signature \bMusic >> \addlyrics { \words }
	>>
}