\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.6)
#(ly:set-option 'point-and-click #f)
%mobile -s15.5 -i3.2

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
incipitwidth = 20
mtempo={\tempo 4 = 120}
mtempob={\tempo 4 = 60}

htitle="AD: 7. Manus tuæ"
hcomposer="Vásquez"

\header {
	title=\markup{\fontsize #3 "7. Manus tuæ"}
	subtitle="Agenda Defunctorum"
	subsubtitle=\markup{\column{"ad matutinum" " " " " }}
	composer="Juan Vásquez (c.1500-c.1560)"
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{"Sevilla 1556"}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={\key c \major \time 2/2
        \skip 1*63 
	\bar "|."
}


cantus=\relative c''{
	gis2. gis4
	\ss gis4 a a gis
	a a a a
	a2 a
	a4 a a a
	a2 c ~
	c4 b c b
	a4 a g2 ~
	g r4 e'
	e d c2
	b4 e d c ~
	c b a2 ~
	a4 \ss gis8 \ss fis gis!2
	a2 a4 a
	a2 a4 a
	a4 a a2
	a2 a
	a4 a a2
	r4 a2 a4
	a4. a8 a4 a ~
	a a f a ~
	a \ss gis8 \ss fis gis2
	c1
	b
	a2. a4
	a a a2 ~
	a4 \ss gis gis2
	r4 \ss g! g g
	g2. g4
	g2 g4 g
	g g a2 ~
	a2 \ss gis
	a2 r4 a
	b a a g
	g2. f4
	g4 a2 \ss gis4
	a4 c2 b4
	a4 a a4. g8
	e2 r4 c' ~
	c8 \noBeam b a4. g8 f e
	f4 d2 f4
	e1
	R1
	r2 e' ~
	e d
	c2. c4
	b4 b a2 ~
	a4 a g2
	c2. c4
	d e e d
	e1
	R1
	r2 a,
	a4 a a2
	a4 a \[a2
	g\] a2 % SR \ss gis
	a a
	a4 a c2 ~
	c4 b b2
	a1 ~
	a
	\ss gis ~
	gis\breve*1/2 % \ss gis ?
}

altus=\relative c'{
	e2. e4
	e4 e e e
	e2 f4 f ~
	f4 e f f
	f f f f
	e2 a ~
	a4 g e e
	c4 d e e
	e d c8 d e f
	g4 g a e
	g2 f4 e
	r4 g e e
	e2 e
	r4 f f e
	f2 e
	e2 e4 e
	e e e f
	e2 f
	r4 f2 f4
	f4. f8 f4 f
	e2 d
	e1
	r4 c c8 d e f
	g4 g2 d4
	f2. f4
	f2 c
	e1
	r4 e e e
	e2. e4
	e2 \parenthesize e4 \parenthesize e % e2 e2 e2
	d4 d d2
	e1
	r2 e
	e4 e d d
	e2. d4
	d2 d
	c2 e4 e
	f f f4. e8
	c2 e
	f2. d4 ~
	d f4. e8 d4 ~
	d4 c8 b c2
	R1
	a'1
	g2 f
	e e ~
	e4 e e2
	f2 e
	r4 a2 a4
	a a a2
	a2 e
	e4 e d e
	f e4. d8 d4
	e4 e f e
	f2 e4 f
	d2 e4 f ~
	f f f f
	f f e4. f8
	g1
	r4 f f e ~
	e4 d8 c d2
	e1 ~
	e\breve*1/2
}

tenor=\relative c'{
	b2. b4
	b4 c b b
	a2 a4 d ~
	d c d d % SR \ss cis
	d d d d ~
	d c r4 e
	f d c g
	a2 c4 c
	c b a2
	g4 g c c
	d c r4 g
	a b c2
	b1
	d2 d4 \ss cis
	d2. \ss cis4
	r4 \ss cis4 cis cis
	\ss cis cis cis d ~
	d \ss cis d2
	r4 c2 c4
	c4. c8 c4 \parenthesize d ~ % c
	d4 c a2
	b1
	r2 e ~
	e2 d
	d4 d c2 ~
	c4 c a2
	c4 b8 a b2
	b2 b4 b
	c2. b4
	b2 b4 b
	b b a2
	b1
	a2 c
	b4 c a b
	c2. a4
	d,2 d
	e4 a2 g4
	f4 d f4. g8
	a4 c4. b8 a[ g]
	f2 d ~
	d1
	a'2 r
	c2 b
	a b
	c4 c a a
	a2 r4 a
	e2 c'4 c
	d4 d b2
	r4 e2 e4
	f e f2
	e2 r4 c
	c b a g
	a4. g8 f2
	e4 a d \ss cis
	d2 \ss cis4 d
	b2 a
	r4 d2 d4
	d d c2
	d4 e4. d8 b4
	c4 d2 c4 ~
	c8 b a g a2
	b2 c
	b\breve*1/2
}

bassus=\relative c{
	e2. e4
	e a, e' e
	\[a,2 d\]
	r2 r4 d
	d d d8[ e] f[ g]
	a2 a
	f4 g a e
	f2 c8 d e f
	g2 r4 c
	c b a2
	g4 c, d e
	f g a2
	e1
	r4 d d a'
	d,8 e f g a2
	a2 a4 a
	a a a d,
	a'2 d,
	r4 f2 f4
	f4. f8 f4 d
	a'2 d,4 f
	e1
	a
	e2 g4 g
	f2. f4
	f2 f
	e1
	e2 e4 e
	c2. e4
	e2 e4 e
	g g f2
	e1
	a,2 a'
	g4 a f g % SR \ss gis4 a f g
	c,2. d4
	b4. a8 b2
	a1
	d
	R1*3
	r2 a' ~
	a g
	f4 f e2
	c d4 d
	a2 a' ~
	a4 g a4 a % SR \ss gis
	d,4 d e2
	a2. a4
	d \ss cis d2
	a2 a
	a4 e f e
	d \ss cis d2
	a r
	R1
	r2 r4 d ~
	d d d d
	d2 a'
	g e4 g
	a4 d,2 a'4 ~
	a8 g f e f2
	e c4. d8 
	e\breve*1/2
}

textocantus=\lyricmode{
Ma -- nus tu -- æ Do -- mi -- ne
fe -- ce -- runt me,
et pla -- sma -- ve -- runt me
to -- tum in cir -- cu -- i -- tu:
et sic re -- pen -- te præ -- ci -- pi -- tas me? __ _ _ _ 
Me -- men -- to quæ -- so,
quod sic -- ut lu -- tum fe -- ce -- ris me
et in pul -- ve -- rem re -- du -- ces me. __ _ _ _ 
Non -- ne sic -- ut lac mul -- si -- sti me
et sic -- ut ca -- se -- um me
co -- a -- gu -- la -- _ sti?
Pel -- le et car -- ni -- bus ve -- sti -- _ sti me:
os -- si -- bus et ner -- _ vis
com -- pe -- gi -- _ _ _ _ _ sti me.
Vi -- tam et mi -- se -- ri -- cor -- di -- am
tri -- bu -- i -- sti mi -- _ hi
et vi -- si -- ta -- ti -- o tu -- _ a
cu -- sto -- di -- vit spi -- ri -- tum me -- um.
}

textoaltus=\lyricmode{
Ma -- nus tu -- æ Do -- mi -- ne
fe -- ce -- runt me,
et pla -- sma -- ve -- runt me
to -- tum in cir -- cu -- i -- tu:
et  sic re -- pen -- _ _ _ te
præ -- ci -- _ \italicas pi -- tas \rectas me % pi -- tas _
præ -- ci -- pi -- tas me?
Me -- men -- to quæ -- so,
quod sic -- ut lu -- tum fe -- ce -- ris me
et in pul -- ve -- rem re -- du -- ces me.
Non -- ne __ _ _ _ _ sic -- ut lac 
mul -- si -- sti me
et sic -- ut ca -- se -- um
me co -- a -- gu -- la -- sti?
Pel -- le et car -- ni -- bus 
ve -- sti -- sti me:
os -- si -- bus et ner -- _ vis
com -- pe -- gi -- _ _ sti __ _ _ me.
Vi -- tam et mi -- se -- ri -- cor -- di -- am
tri -- bu -- i -- sti mi -- hi,
et vi -- si -- ta -- ti -- o tu -- _ _ a,
et vi -- si -- ta -- ti -- o tu -- a,
cu -- sto -- di -- vit spi -- ri -- tum me -- um
spi -- ri -- tum __ _ _ me -- um.
}

textotenor=\lyricmode{
Ma -- nus tu -- æ Do -- mi -- ne
fe -- ce -- runt me,
et pla -- sma -- ve -- runt me
to -- tum in cir -- cu -- i -- tu:
et sic re -- pen -- te præ -- ci -- pi -- tas me?
præ -- ci -- pi -- tas me?
Me -- men -- to quæ -- so
quod sic -- ut lu -- tum fe -- ce -- ris me
et in pul -- ve -- rem re -- du -- ces me.
Non -- ne sic -- ut lac mul -- si -- sti __ _ _ me,
et sic -- ut ca -- se -- um me
co -- a -- gu -- la -- _ sti?
Pel -- le et car -- ni -- bus ve -- sti -- sti me:
os -- si -- bus et ner -- _ vis
com -- pe -- gi -- _ _ sti me.
Vi -- tam et mi -- se -- ri -- cor -- di -- am
et mi -- se -- ri -- cor -- di -- am
tri -- bu -- i -- sti mi -- hi
et vi -- si -- ta -- ti -- o __ _ tu -- a,
et vi -- si -- ta -- ti -- o tu -- a
cu -- sto -- di -- vit
spi -- ri -- tum __ _ _ me -- _ _ _ _ _ _ um,
me -- um.
}

textobassus=\lyricmode{
Ma -- nus tu -- æ Do -- mi -- ne __ _
et pla -- sma -- ve -- _ runt _ me
to -- tum in cir -- cu -- i -- tu: __ _ _ _ _ 
et sic re -- pen -- te
præ -- ci -- pi -- tas __ _ _ me?
Me -- men -- to quæ -- _ _ _ so,
quod sic -- ut lu -- tum fe -- ce -- ris me
et in pul -- ve -- rem re -- du -- ces __ _ me.
Non -- ne sic -- ut lac mul -- si -- sti me,
et sic -- ut ca -- se -- um me
co -- a -- gu -- la -- _ sti?
Pel -- le et car -- ni -- bus
ve -- sti -- _ _ sti me:
Vi -- tam et mi -- se -- ri -- cor -- di -- am,
et mi -- se -- ri -- cor -- di -- am
tri -- bu -- i -- sti mi -- hi,
et vi -- si -- ta -- ti -- o __ _ tu -- a
cu -- sto -- di -- vit spi -- ri -- tum
me -- _ _ um,
me -- _ _ _ _ um,
me -- _ um.
}


incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Cantus "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1"
		\key c \major
		\time 2/2
                gis'1.
		} 

	\layout { line-width=\incipitwidth indent = 0 }
	}
}

incipitaltus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Altus    "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c2"
		\key c \major
		\time 2/2
                e'1.
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}


incipittenor=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tenor   "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c4"
		\key c \major
		\time 2/2
                b1.
		} 
	\layout { line-width=\incipitwidth indent=0 }
	}
}

incipitbassus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Bassus "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-f3"
		\key c \major
		\time 2/2
                e1.
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}

%\layout {
%       \context {\Voice
%               \remove Ligature_bracket_engraver
%               \consists Mensural_ligature_engraver
%       }
%       line-width=\incipitwidth
%       indent = 0
%}

\score {\transpose c' c'{
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName=\incipitcantus
		\clef "treble"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	>>

	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName=\incipitaltus
		\clef "treble"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName=\incipittenor
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName=\incipitbassus
		\clef "bass"
		\bassus }
	\new Lyrics \lyricsto "v4" {\textobassus }
	>>
	
>>

	} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.2
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		%autoBeaming = ##f
	}
	\context {\Staff 
                %\RemoveEmptyStaves
                %\override VerticalAxisGroup.remove-first = ##t
		\override VerticalAxisGroup.staff-staff-spacing =
			#'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
		\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	%first-page-number = #21
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=20
	%page-count = 8
	ragged-last-bottom = ##f
	indent=3.4\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 10) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 14) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}