\version "2.11.45"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.0)
#(ly:set-option 'point-and-click #f)

italicas=\override LyricText #'font-shape = #'italic
rectas=\override LyricText #'font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
incipitwidth = 20


\header {
	title=\markup{\bigger \bigger \bigger \bigger "Lamentaciones n°3"}
	subtitle="para el Jueves Santo"
	subsubtitle= " "
	composer="Estêvão de Brito (1570-1641)"
	%opus="(-)"
	poet=\markup{\smaller "(según una transcripción de 1935)" }
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" "Archivo de la Catedral de Málaga"}
	}
%	tagline=""
}

global={\key f \major \time 2/2 \skip 1*8 \bar "||"  %1
				\skip 1*4 \bar "||" \break %2
				\skip 1*18 \bar "||" %3
				\skip 1*5 \bar "||" \break %4
				\skip 1*30 \bar "||" %5
				\skip 1*7 \bar "||"  \break %6
				\skip 1*16 \bar "||" \break %7
				\skip 1*9 \bar "||"  %8
				\skip 1*11 \bar "|." %9
}


cantus=\relative c'{
	\override  TextScript #'padding = #2
	d2^\markup{\rounded-box 1} f g4 g g2 g4 g
	fis4 g8 \noBeam g a4. a8 g4 g r4 bes bes8 \noBeam bes a4 f g8 \noBeam g a2
	a2 fis fis\breve*1/2
	d2^\markup{\rounded-box 2} e f e d2. cis4 d\breve*1/2
	r2^\markup{\rounded-box 3} d2 d4 d f2 g4 g
	g4 g r2 g4 g ~ g4 <\parenthesize g>4 g2 fis4 g a2 ~ %cotejar
	a4 g2 fis4 g1 \break
	r4 f g2 a a4 a
	a4. a8 a2 bes4 a2 g4 a2 r4 a ~ a8 \noBeam a a4
	a4 a g2 f4 a ~ a a g2 f4 a2 g4 ~ g fis g\breve*1/4
	r2^\markup{\rounded-box 4} g2 a4 bes2 a4 g2.
	f8 e d1 ~ d\breve*1/2
	s4*0^\markup{\rounded-box 5} R1 R r4 a'2
	a4 a g2 f4 e d d cis d2 r4 a'
	bes2 bes a g r r4 g g fis
	g8 \noBeam g g4 ~ g fis8 e fis2 r2 a r4 g f d
	f4 g a4. bes8 c4 f, g2 ~ g4 fis r4 \ss f! f4. f8
	f4 bes a g g f f e d f ~ f e8 d e2
	r4 e2 e4 g g a2 g f4 a f g
	a2 f4^"sic" g2 fis4 g4 g8 \noBeam g g4. g8 f2. e4 %cotejar
	d4 g f8 \noBeam d g4 ~ g fis8 e fis2 g\breve*1/2
	d'4.^\markup{\rounded-box 6} c8[ bes a] g4 ~ g fis g2 r4 g
	a2 bes2. a4 f g2 fis4 g1 ~ g\breve*1/2
	a4^\markup{\rounded-box 7} a8 \noBeam a a4 a bes2 a
	r4 d4 d8 \noBeam d d4 c bes c2 c4 b8 a b2
	r4 d c a bes4. bes8 a4 f e d e2
	d1 r4 f2 g4 a2. a4 bes a2 g4
	a4 a8 \noBeam a r4 a8 \noBeam a a4 a8 \noBeam a g4 g8 \noBeam g f4 a a8 \noBeam a g4 ~ 
	g4 fis g\breve*1/4
	d2^\markup{\rounded-box 8} f4 fis g4 g g g g4. g8
	g4 g ~ g g a2 a4 f g2 a r4 a4 ~
	a8 \noBeam a g4 f a ~ a8 \noBeam g g2 fis4 g\breve*1/2
	r2^\markup{\rounded-box 9} a2 bes a
	g4 d' ees ees d2 r4 a bes g4. fis16 e fis4
	r4 d' d4. d8 c4 f, f2 f4 f2 e4 d4. e8
	f4 g a2 bes4 g ~ g fis8 e fis\breve*1/4
}

altus=\relative c'{
	r2 d2 d4 d e2 d4 d
	d4 d8 \noBeam d f2 f4 e d2 r4 f f8 \noBeam f e4 c d
	d4 cis d2 d\breve*1/2
	d2 a r4 d2 cis4 d bes a2 ~ a\breve*1/2
	R1 a2 a4 a8 \noBeam a c4 c
	d2 d r d d4. d8 d2 cis4 d
	e4. e8 d2 d1 r4 f2 e4 f4 f2 f4
	f4. f8 e4 c d8 e f2 e8 d e2 r4 f4 ~ f8 \noBeam f f4
	f4 f d2. f4 c4 f2 e4 d2 c d\breve*1/2
	r4 d2 e4 f4. e8 d4 c bes g2
	a4 bes2 a b\breve*1/2
	R1 R a2
	a4 a cis2 d \ss c!4 d e2 d r4 d
	d2 d4 d d2 d d4 d d2 d2.
	c4 d1 bes2 c4 d d2 d2
	d4 d d2 ees4 d2 c4 d2 r4 d d4. d8
	d2 c4 bes d2 d4 c2 b4 c2 c
	r4 g2 g4 b4 b c2 c2. c4 d bes
	c4 d ~ d c d2 r4 <\parenthesize d>4 d4. d8 d2. c4
	bes4 d2 c4 bes a8 g a2 g\breve*1/2
	r4 g'4. f8 \ss ees d c4 d g,2 r
	r4 d' ~ d8 c bes a g4 a bes2 a g4 d' ees2 d\breve*1/2
	d4 d8 \noBeam d fis4 fis g2. fis8 e 
	fis4 f f8 \noBeam f f4 e8 \noBeam f g4 g fis g2 r4 g
	f! d e fis g g, a bes c d2 \ss cis4
	d1 r4 d2 g4 ~ g f8 e fis4 fis g c, d2
	e4 e8 \noBeam e d4 f f8 \noBeam f f4 d d8 \noBeam d d4 d c bes8 \noBeam bes
	a2 g\breve*1/4
	r2 a2 \ss b4 \ss bes bes! c d2
	c4 e e d f2 e4 d2 e4 f2 r4 f ~
	f8 \noBeam f e4 d2 d4 d d2 d\breve*1/2
	r2 d d4 d d2
	r4 g g g ~ g fis r4 d d d d2
	r4 f4 f4. f8 e4 d c2 c4 c c2 a4 f'
	d2 e4 d d2 ~ d\breve*1/2
}

tenor=\relative c'{
	r4 a2 a4 b b c c c bes!8 \noBeam bes
	a4 bes c2 c r4 g g8 \noBeam g f4 d e f2
	e2 d d\breve*1/2
	r4 d'2 cis4 d2 r4 a f4 g e2 d\breve*1/2
	g2 g4 g f2 d4 f f e
	d4 d' ~ d8 \noBeam c bes4 g c ~ c bes8 a bes4 bes a g2 f4
	c'4. bes8 a2 g1 d'2 c f,4 c'2 c4
	d4. d8 c2 bes4 c d2 ~ d4 cis d d ~ d8 \noBeam d d4
	c4 c bes2 a4 f ~ f f c'2 a4 f2 g4 a2 g\breve*1/4
	d'4. c8 bes4 c f, bes4. a8 f4 g bes2
	a4 ~ a8 g g2 \ss fis4 g\breve*1/2
	a2 a4 a cis2 d4 d ~ d8 \noBeam d d4
	c2 f,4 g a2 ~ a4 f g a d,2 r4 f
	f4. f8 d4 g ~ g \ss fis g bes ~ bes a bes2 a
	g4. a8 bes4 a8 g a2 r4 bes a f a bes a2
	d,4 g g f g bes2 a8 g a2 r4 a a4. a8
	bes4 bes r bes a2 g f4. g8 a4 g8 f g2
	r4 c2 c4 d e f2 ~ f4 e f f, bes g
	f4 a bes g a2 g4 bes4 bes4. bes8 a2 bes4 g
	g2 d'4 e d1 b\breve*1/2
	R1 r4 d4. c8 bes a g2. 
	fis4 g d'2 c4 d2 r4 d ~ d8 c bes a g4 c ~ c \ss b8 a b!\breve*1/4
	d4 d8 \noBeam d d4 d g,2 d'
	r4 bes bes8 \noBeam bes bes4 c g8 \noBeam g a4 a g2 r4 g
	a4 bes c d g,2 r4 d e f g a
	d,1 r4 bes'2 g4 d'2. d4 g,4 a bes2
	a4 a8 \noBeam a r4 f8 \noBeam f f4 f8 \noBeam f r8 g \noBeam g \noBeam g d4 d f g8 \noBeam g
	d2 g\breve*1/4
	g2 d' d g,4 c ~ c b 
	c4 c c bes! c f, c' d8 \noBeam d bes2 c r4 c ~
	c8 \noBeam c c4 a4 f bes2 a g\breve*1/2
	d2 f4 fis g2. fis4
	g2 r a f4 fis g2 a
	r4 a a4. a8 a4 a a2 a4 a g2 f4 a
	a4 g ~ g \ss fis g bes a\breve*1/2
}

bassus=\relative c{
	 r4 d2 d4 g, g c2 g'4. g8
	 d4 g8 \noBeam g f4 f c2 g' r4 d4 d8 \noBeam d c4 f,4. g8
	 a4 a d2 d\breve*1/2
	 R1 d2 a bes g4 a d\breve*1/2
	 R1 d2 d4 d c2
	 g4 g g'4. f8 ees4 c g'2. g4 d bes a d
	 c2 d g,1 R1 r4 f'2 f4
	 d4. d8 a4 a' g f bes2 a r4 d,4 ~ d8 \noBeam d d4
	 f4 f g g d2 r r4 c d2 f4 e d2 g,\breve*1/4
	 R1 R g'4. f8
	 e4 f bes,4. c8 d2 g,\breve*1/2
	 r2 a'2 a4 a g2 f4 d
	 f4 f f e d2 R1 r2 d
	 bes2 bes4 g d'2 g,4 g'4 ~ g fis4 g2 d
	 \ss ees4 ees d2 d r4 g f d fis g d4. c8
	 bes4 g d'2 c4 d \ss ees2 d r4 d4 d4. d8
	 bes4 bes f' g d d bes c d2 c1
	 r4 c2 c4 g'4 g f2 c f r
	 r4 d8 \noBeam d g4 e d2 g,4 g' g4. g8 d2 bes4 c
	 g4. a8 bes4 c d1 g,\breve*1/2
	 R1 r2 r4 g' ~ g8 f ees d
	 c4 d g,2 r r d' g4. f8[ ees d] c4 g\breve*1/2
	 R1*16
	 r2 d'2 g4 g ees c g'4. g8
	 c,4 c r4 g' f d a' bes g2 f r4 f ~
	 f8 \noBeam f c4 d2 bes4 c d2 g,\breve*1/2
	 r2 d' g,4 g d'2
	 r4 g4 c, c d2 r4 d g, g d'2
	 r4 d d4. d8 a4 d f2 f4 f c2 d2. 
	 bes4 c4 d g,2 d'\breve*1/4
}


textocantus=\lyricmode{
A -- leph. E -- go vir vi -- dens
pa -- u -- per -- ta -- tem me -- am
in vir -- ga in -- di -- gna -- ti -- o -- nis e -- ius. 
A -- _ _ _ _ _ leph.
Me mi -- na -- vit et ad -- du -- xit
in te -- ne -- bras, et __ _ non
in  lu -- cem.
A -- _ leph, a -- leph.
Tan -- tum in me ver -- _ tit et con -- ver -- tit ma -- num su -- am,
su -- am to -- ta di -- _ e.
Beth, __ _ _ _ beth. __ _ _ _
Ve -- tus -- tam fe -- _ cit pel -- lem me -- am 
et car -- nem me -- am 
con -- tri -- vit
os -- sa me -- _ _ a.
Beth.
Æ -- di -- fi -- ca -- vit in __ _ gy -- ro me -- o
et cir -- cum -- de -- dit me __ _ fel -- le et la -- bo -- _ _ _ re.
Beth. 
In te -- ne -- bro -- sis col -- lo -- ca -- vit me,
qua -- _ si mor -- tu -- os,
qua -- si mor -- tu -- os sem -- _ pi -- ter -- _ _ _ nos.
Ghi -- _ _ _ _ _ mel
ghi -- _ _ _ mel,
ghi -- _ mel.
Cir -- cum -- æ -- di -- fi -- ca -- vit
ad -- ver -- sum me, ut non e -- gre -- di -- _ ar: 
ag -- _ gra -- va -- vit com -- _ pe -- dem me -- um.
Ghi -- _ mel. 
Sed et, cum cla -- ma -- ve -- ro
et ro -- ga -- ve -- ro,
ex -- clu -- sit o -- ra -- tio -- nem me -- _ am.
Ghi -- _ _ mel.
Con -- clu -- sit vi -- as
me -- as la -- pi -- bi -- bus qua -- dris 
se -- mi -- tas me -- as sub -- ver -- _ tit.
Ie -- ru -- sa -- lem,
Ie -- ru -- sa -- lem
Ie -- ru -- sa -- _ _ lem
con -- ver -- te -- re ad Do -- mi -- num De -- _ _ _ um tu -- _ _ _ _ um. 
}

textoaltus=\lyricmode{
A -- leph. 
E -- go vir vi -- dens pau -- per -- ta -- tem me -- am
in vir -- ga in -- di -- gna -- tio -- nis e -- ius:
A -- leph
a -- _ _ _ leph.
Me mi -- na -- vit et ad -- du -- xit
in te -- ne -- bras et __ _
non in lu -- cem.
A -- _ leph, a -- leph.
Tan -- tum in __ _ me __ _ ver -- _ _ tit
et con -- ver -- tit ma -- num su -- am
to -- ta di -- _ e. 
Beth, __ _ _ _ _ _ beth. __ _ _ _ _ _  
Ve -- tus -- tam fe -- cit pel -- lem me -- am 
et car -- nem me -- am, 
con -- tri -- vit os -- sa me -- a.
Beth. __ _ 
Æ -- di -- fi -- ca -- vit in gy -- ro me -- o
et cir -- cum -- de -- dit me fel -- le et la -- bo -- re. 
Beth. 
In te -- ne -- bro -- sis col -- _ lo -- ca -- _ vit me
\italicas me, \rectas qua -- si mor -- tu -- os sem -- pi -- ter -- _ _ _ nos.
Ghi -- _ _ _ _ _ mel
ghi -- _ _ _ _ _ mel,
ghi -- _ _ _ mel. 
Cir -- cum -- æ -- di -- fi -- ca -- _ _ vit,
ad -- ver -- sum me, ut non e -- gre -- di -- ar:
ag -- _ gra -- va -- _ vit com -- pe -- _ dem me -- _ um.
Ghi -- _ _ _ mel.
Sed et,
cum cla -- ma -- ve -- ro et ro -- ga -- ve -- ro,
ex -- clu -- sit o -- ra -- ti -- o -- nem me -- am.
Ghi -- mel.
Con -- clu -- sit vi -- as
me -- as la -- pi -- di -- bus qua -- dris
se -- mi -- tas me -- as sub -- ver -- tit.
Ie -- ru -- sa -- lem
Ie -- ru -- sa -- lem
Ie -- ru -- sa -- lem
con -- ver -- te -- re ad Do -- mi -- num De -- _ um
tu -- _ _ um.
}

textotenor=\lyricmode{
A -- leph. 
E -- go vir vi -- dens pau -- per -- ta -- tem me -- am
in vir -- ga in -- di -- gna -- tio -- nis e -- ius.
A -- _ leph
a -- _ _ _ leph.
Me mi -- na -- vit et ad -- du -- xit
in te -- ne -- bras, 
et non in __ _ lu -- cem,
et non in lu -- _ _ cem.
A -- _ leph, a -- leph.
Tan -- tum in me __ _ ver -- _ tit,
et con -- ver -- tit ma -- num su -- am,
su -- am
to -- _ ta di -- e.
Beth, __ _ _ _ _ _ _ _ beth. __ _ _ _ _ _ _ 
Ve -- tus -- tam fe -- cit pel -- lem me -- am
et __ _ car -- nem me -- _ am
con -- tri -- vit os -- _ sa me -- _ a, 
os -- sa me -- _ _ _ _ a.
Beth. __ _ 
Æ -- di -- fi -- ca -- vit in gy -- ro me -- _ _ _ o
et cir -- cum -- de -- dit me fel -- le et la -- bo -- _ _ re.
Beth. 
In te -- ne -- bro -- _ sis col -- _ lo -- ca -- _ _ vit me,
qua -- si, qua -- si mor -- _ tu -- os sem -- pi -- ter -- nos.
Ghi -- _ _ _ _ _ mel,
ghi -- _ mel
ghi -- _ _ _ _ _ _ _ mel.
Cir -- cum -- æ -- di -- fi -- ca -- vit
ad -- ver -- sum me, ut non e -- gre -- di -- ar:
ag -- gra -- _ va -- _ vit
com -- pe -- dem me -- _ um.
Ghi -- _ mel. 
Sed et, cum cla -- ma -- ve -- ro
et ro -- ga -- ve -- ro
ex -- clu -- sit o -- ra -- ti -- o -- nem
me -- am.
Ghi -- _ mel.
Con -- clu -- sit vi -- as
me -- as la -- _ pi -- di -- bus qua -- dris
se -- mi -- tas me -- as sub -- ver -- tit.
Ie -- ru -- _ _ sa -- lem
Ie -- ru -- sa -- lem __ _ 
con -- ver -- te -- re ad Do -- mi -- num De -- um tu -- um,
De -- um tu -- _ um.
}


textobassus=\lyricmode{
A -- leph. 
E -- go vir vi -- dens
pa -- u -- per -- ta -- tem me -- am
in vir -- ga in -- di -- gna -- tio -- nis e -- ius.
A -- _ _ _ _ leph.
Me mi -- na -- vit
et ad -- du -- _ xit in te -- ne -- bras,
et non in lu -- _ cem.
A -- leph.
Tan -- tum in __ _ me __ _ ver -- tit
et con -- ver -- tit ma -- num su -- am
to -- _ ta __ _ di -- e.
Beth. __ _ _ _ _ _ _ _ 
Ve -- tus -- tam fe -- cit pel -- _ lem me -- _ am
et car -- nem me -- am, 
con -- _ _ tri -- vit
os -- sa me -- a.
Beht. __ _ 
Æ -- di -- fi -- ca -- vit
in __ _ gy -- ro __ _ me -- o 
et cir -- cum -- de -- dit me __ _ fel -- le et la -- bo -- re.
Beth.
In te -- ne -- bro -- _ sis 
col -- lo -- ca -- vit me, qua -- si,
qua -- si mor -- _ tu -- os __ _ sem -- pi -- ter -- nos.
Ghi -- _ _ _ _ _ mel
ghi -- _ _ _ _ _ mel.
Ghi -- mel.
Con -- clu -- sit vi -- as me -- as
la -- pi -- _ di -- bus qua -- dris
se -- mi -- tas me -- as sub -- ver -- tit.
Ie -- ru -- sa -- lem
Ie -- ru -- sa -- lem
Ie -- ru -- sa -- lem
con -- ver -- te -- re ad Do -- mi -- num De -- um __ _
tu -- _ _ um. 
}



incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tiple "
		\override NoteHead   #'style = #'neomensural
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1"
		\key f \major
		\time 2/2
		d'1
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}


incipitaltus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Alto  "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c3"
		\key f \major
		\time 2/2
		d'1
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}


incipittenor=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tenor "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c4"
		\key f \major
		\time 2/2
		a1
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent=0
	}
	}
}


incipitbassus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Baxo "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-f4"
		\key f \major
		\time 2/2
		d1
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}





\score {
\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 "G_8" 
		\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}
	>>
	
>>

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 0) 
		%\override LyricText #'font-size = #1.2
		\override LyricHyphen #'minimum-distance = #0.33
	}
	\context {\Score 
		\override BarNumber #'padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'() 
	}
	\context { \RemoveEmptyStaffContext }
	\context {\Staff 
		%autoBeaming = ##f
		\override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 6)
		\consists Ambitus_engraver 
		\override LigatureBracket #'padding = #1
	}
}

%\midi {}

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string "Lamentaciones n°3 para el Jueves Santo" "Brito" }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page "Brito" \on-the-fly #not-first-page "Lamentaciones n°3 para el Jueves Santo" \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=8
	%line-width=19.0\cm
	ragged-last-bottom = ##f
	indent=3.3\cm
	between-system-padding = 0
	foot-separation=6\mm
	%head-separation=1\mm
}