\version "2.11.45"

#(set-default-paper-size "a4")
#(set-global-staff-size 14.65)
#(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{\column{ " " " " " " \bigger \bigger \bigger \bigger "Quis dabit capiti meo"}}
	subtitle=\markup{\column{ " " "Dominica Palmarum"}}
	composer="Estêvão de Brito (1570-1641)"
	subsubtitle=\markup{\column{ " " " " " " " " " " " " " " " " " " " "}}
	%opus="(-)"
	%poet="Edición de "
	copyright=\markup{
		\fill-line {"Transcribed and edited by Nancho Alvarez" "Archivo de la Catedral de Málaga"}
	}
%	tagline=""
}

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


cantus=\relative c''{
	R1
	R
	R
	d2 b
	g4 c4. c8 b4
	a2. g4
	fis4 g2 fis4
	g g b2
	b4 c4. c8 g4
	d'2 d
	r2 g, ~
	g a
	a4 f4. f8 f4
	g4. f8 e4 d ~
	d cis d d' ~
	d c a2
	b4 c2 b4
	a4. a8 g2
	f2 r
	r r4 g
	a4. a8 g4 c ~
	c b g a
	b8 a16 b c2 b4
	a2 g 
	a c
	d c4 a 
	g2 r4 d' ~
	d8 c16 \ss bes a4 bes!2
	a2 r4 a ~
	a4 a b!2
	g4 g a4. g8
	f4 g2 fis4
	g1
	r2 r4 g
	g a4. b8 c4 ~
	c b c2
	R1
	r2 r4 a ~
	a d c b
	a2 b
	R1
	r4 d2 cis4
	d2 c4 b
	a4. a8 b4 a
	r4 b c2
	b4 a g e
	a2 r4 e
	a g f8 d g4 ~
	g4 fis g\breve*1/4
}

cantusdos=\relative c''{
	r2 g ~
	g g
	g4 a4. a8 g4 ~
	g fis g2
	R1
	R
	d'1
	b2 g ~
	g r4 c ~
	c8 \noBeam c b4 a a
	\[g2 c\]
	d2 r
	r4 d4. d8 c4
	\ss bes4 bes a4. f8 
	g2 r
	R1
	g2 f4 d
	e4 f2 e4
	f8 g a f g4. a8
	\ss bes4 a2 g4
	f2 r4 c
	g'4. a8 b!4 a ~
	a8 f g4 a g8 f
	e4 c'2 c4
	c2 a
	bes2 a4 c 
	c g bes4. a16 g
	f8 g a4. g8 g4 ~
	g fis8 e fis2
	R1
	R
	r2 r4 a
	b g4. a8 b c
	d b c2 b4
	c1
	r4 d g, c ~
	c8 b16 a g8[ a b g] c4 ~
	c b a2
	R1
	R
	r4 g2 fis4
	g2 f4 e
	d f4 r e4 %cotejar original
	c f e2
	r4 e c8 d e f
	g4 a b g
	r2 r4 g
	c2. b4 
	a2 b\breve*1/4
}

altus=\relative c'{
	r2 d ~
	d e
	e4 c4. c8 c4
	d2. b4
	c4. b8 a4 b
	c4 f,4. f8 g4
	a g d' d
	R1
	r4 c e e
	f d d d,
	g8[ a] b[ a16 b] c4 g ~
	g d'4. d8 cis4
	d4. c8 bes4 a
	g g a4. a8 
	g2 r
	r2 r4 d' ~
	d c a b
	c2 c
	R1
	R
	r4 f2 e4
	c4 d2 f4 ~
	f e d2
	c4 f4. f8 e4
	f4 f2 f4
	f bes, c2
	c4 c d bes
	d4. c8 bes4 g
	a2 r4 fis' ~
	fis4 fis g2
	d4 e f c
	d e d d
	d e4. f8 g4 ~
	g fis g2
	R1
	r4 d e c ~
	c8 d e f g4 f
	e d2 cis4
	d d a b
	c4 d4. c8 b4
	a4 g a2
	g r %cotejar original
	r4 a'2 gis4
	a2 g4 e
	e2. c4 
	d a e'2
	a, e'
	c4. b8 a4 b
	d2 d\breve*1/4
}

altusdos=\relative c'{
	R1
	R
	R
	r2 d
	e e ~
	e4 c4. c8 c4
	d b a2
	g4 g' e2 ~
	e c
	r4 g'4. g8 f4
	e2 e
	\[d2 e\]
	f r4 c
	d4. d8 c4 f
	e4 g2 f4
	d e f2 ~
	f4 e d2
	r2 r4 g,
	a4. a8 g4 d'
	d4 f2 e4
	c c c4. d8
	e f g2 c,4
	d c8 b a4 b
	c2 r4 c ~
	c c c2
	bes4 f' f c
	e2 f ~ 
	f4 f d2
	d r4 d ~
	d4 d d2
	b4 c c16 b a g a4
	a1
	R1
	r2 d
	e4 c4. d8 e f 
	g4 f e2
	r2 r4 c
	g'2 f4 e 
	d8 e f d e f g4 ~
	g fis g2
	R1
	R
	a,2 e' ~
	e4 d2 c4
	b2 a
	r r4 g' ~
	g fis g2
	f4 e d4. d8 
	d2 b\breve*1/4
}

tenor=\relative c'{
	g1
	b2. b4
	c8 b a g f4 g
	a a g2
	r4 a4. a8 gis4
	a4. g8 f4 e
	d2 r
	R1
	R
	d'1
	b4 g2 c4 ~
	c8 \noBeam c \ss bes4 a2
	d,2 r
	R1
	r4 g a4. a8 
	g4 c d d,
	g2 r
	R1
	c2. b4
	g4 a \ss bes2
	a2 r
	r4 g2 f4
	d e f g
	a f c2
	f2 r4 f ~
	f f f f
	g4. f16 e d8 e f4
	d d d2 
	d1
	R1
	R
	r2 r4 d' 
	g, c4. b16[ a] g8[ a]
	b4 a g2
	R1
	r2 r4 g
	c2 b4 a
	\[g2 a\] 
	d,2 r
	r2 r4 d' ~
	d cis d2
	c4 b a2 ~
	a4 d, e2
	a4 f g a
	e2 a
	r4 d2 cis4
	d2 c4 b
	a e f g 
	a2 g\breve*1/4
}

bassus=\relative c'{
	r2 g ~
	g e
	c4 f4. f8 e4
	d2 g,
	R1
	R
	d'1
	e2 e ~
	e4 c4. c8 c4
	d2 d 
	\[e2 c\]
	g2 r
	R1
	r2 r4 d'
	e4. e8 d2
	R1
	r4 c d4. d8
	c1 
	f2 e4 g ~
	g f d e 
	f2 c
	R1
	R
	R
	r4 f2 f4 
	bes,2 f
	c' bes ~
	bes4 f g2
	d' r4 d ~
	d4 d g2
	g4 c, f4. e8 
	d4 c d2
	R1
	r2 r4 g
	c, f4. e16[ d] c8[ d]
	e4 d c2 ~
	c r
	R1
	R
	r4 d g2
	f4 e d d
	e g a a, 
	d2 r
	r r4 a' ~
	a gis a2
	g4 f e2
	d e
	f4 c d2 ~
	d g,\breve*1/4
}


textocantus=\lyricmode{
Quis da -- bit ca -- pi -- ti me -- o a -- _ _ quam,
quis da -- bit ca -- pi -- ti me -- o
quis _ da -- bit ca -- pi -- ti me -- o a -- _ _ _ quam,
fon -- _ tem la -- cry -- ma -- rum,
la -- cry -- ma -- rum
et o -- cu -- lis me -- _ is fon -- tem la -- _ _ _ cry -- ma -- rum,
et plo -- ra -- bo di -- e
ac __ _ _ _ _ no -- cte
qui -- _ a fra -- ter pro -- pin -- _ _ _ _ quus
sup -- plan -- ta -- _ _ _ vit me
et _ o -- mnes a -- mi -- cus
frau -- du -- len -- ter in -- ces -- sit in me
et o -- mnis a -- mi -- _ cus
in -- ces -- sit in __ _ _ _ _ me.
}

textocantusdos=\lyricmode{
Quis _ da -- bit ca -- pi -- ti _ me -- o
quis da -- bit _
ca -- _ pi -- ti me -- o 
a -- _ quam
ca -- pi -- ti me -- o a -- _ quam
fon -- tem la -- cry -- ma -- _ _ _ _ _ _ _ _ _ _ rum
la -- cry -- _ _ ma -- _ _ _ _ _ _ rum,
et plo -- ra -- bo di -- e,
di -- e ac no -- _ _ _ _ _ _ _ _ _ _ cte
sup -- plan -- ta -- _ _ _ _ _ _ vit me
sup -- plan -- ta -- _ _ _ _ _ _ _ _ _ vit me
frau -- du -- len -- ter in -- ces -- sit,
frau -- du -- len -- ter
in -- ces -- _ _ _ _ sit in me
in -- ces -- sit in me.
}

textoaltus=\lyricmode{
Quis _ da -- bit ca -- pi -- ti me -- o 
a -- _ _ _ quam,
ca -- pi -- ti me -- o a -- quam
quis da -- bit ca -- pi -- ti,
quis da -- _ _ _ _ _ bit _
ca -- pi -- ti me -- o a -- _ quam,
et o -- cu -- lis
fon -- _ tem la -- cry -- ma -- rum
fon -- tem la -- cry -- ma -- _ rum,
fon -- tem la -- cry -- ma -- rum,
et plo -- ra -- bo di -- e ac no -- cte,
no -- _ _ _ cte
qui -- _ a fra -- ter pro -- pin -- _ _ _ quus 
sup -- plan -- ta -- _ _ _ vit me
sup -- plan -- ta -- _ _ _ _ _ _ _ _ vit me,
et o -- mnes a -- mi -- cus frau -- _ du -- len -- ter
frau -- du -- len -- ter in -- ces -- sit in me,
in me,
in -- ces -- _ _ sit in me.
}

textoaltusdos=\lyricmode{
Quis da -- bit _ ca -- pi -- ti me -- o a -- quam,
quis da -- _ bit
ca -- pi -- ti me -- o a -- _ quam
et o -- cu -- lis me -- is fon -- tem la -- cry -- ma -- _ _ rum
et o -- cu -- lis me -- is fon -- tem la -- cry -- ma -- _ _ _ _ rum,
la -- cry -- _ ma -- _ rum
et _ plo -- ra -- bo di -- e ac no -- cte, _
ac no -- cte
qui -- _ a fra -- ter pro -- pin -- _ _ _ _ quus
sup -- plan -- ta -- _ _ _ _ vit me
et o -- mnis a -- mi -- _ _ _ _ _ _ _ _ cus
et o -- _ mnes a -- mi -- cus
frau -- _ du -- len -- ter in -- ces -- sit in me.
}

textotenor=\lyricmode{
Quis da -- bit ca -- _ _ _ _ pi -- ti me -- o
ca -- pi -- ti me -- o a -- _ quam
quis da -- bit ca -- _ pi -- ti me -- o
et o -- cu -- lis me -- is,
me -- is
fon -- tem la -- cry -- ma -- rum
fon -- tem la -- cry -- ma -- rum,
la -- cry -- ma -- rum
et _ plo -- ra -- bo
di -- _ _ _ _ _ e ac no -- cte
sup -- plan -- ta -- _ _ _ _ _ vit me
et o -- mnis a -- mi -- _ cus
frau -- _ du -- len -- ter in -- ces -- _ sit in me,
in -- ces -- sit in me
frau -- du -- len -- ter in -- ces -- sit in __ _ _ me.
}

textobassus=\lyricmode{
Quis _ da -- bit ca -- pi -- ti me -- o
quis da -- bit _ ca -- pi -- ti me -- o
a -- _ quam
et o -- cu -- lis
et o -- cu -- lis me -- is
fon -- _ tem la -- cry -- ma -- rum
et plo -- ra -- bo di -- e _ ac no -- cte
qui -- _ a fra -- ter pro -- pin -- _ _ _ quus
sup -- plan -- ta -- _ _ _ _ _ vit me _
et o -- mnis a -- mi -- cus frau -- du -- len -- _ ter
frau -- _ du -- len -- ter in -- ces -- sit,
in -- ces -- sit in _ me.
}



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


incipitcantusdos=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tiple II "
		\override NoteHead   #'style = #'neomensural
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1"
		\key c \major
		\time 4/4
		g'\breve
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}


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


incipitaltusdos=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Alto II    "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c3"
		\key c \major
		\time 4/4
		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 c \major
		\time 4/4
		g\breve
		} 
	\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 c \major
		\time 4/4
		g\breve
		} 
	\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="v5" {
		\set Staff.instrumentName=\incipitcantusdos
		\clef "treble"
		\cantusdos }
	\new Lyrics \lyricsto "v5" {\textocantusdos }
	>>

	
	\new Staff << \global
	\new Voice="v2" {
		\set Staff.instrumentName=\incipitaltus
		\clef "G_8" 
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	
	\new Staff << \global
	\new Voice="v6" {
		\set Staff.instrumentName=\incipitaltusdos
		\clef "G_8" 
		\altusdos }
	\new Lyrics \lyricsto "v6" {\textoaltusdos }
	>>

	
	\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 . 1.0) 
		\override LyricText #'font-size = #1.2
		\override LyricHyphen #'minimum-distance = #0.44
	}
	\context {\Score 
		\override BarNumber #'padding = #2 
	}
	\context {\Voice 
		melismaBusyProperties = #'() 
	}
	%\context { \RemoveEmptyStaffContext }
	\context {\Staff 
		\override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 4.2)
		\consists Ambitus_engraver 
		\override LigatureBracket #'padding = #1
	}
}

%\midi {}

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string "Quis dabit capiti meo" "Brito" }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page "Brito" \on-the-fly #not-first-page "Quis dabit capiti meo" \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=3\mm
	head-separation=.5\mm
}