\version "2.11.45"

#(set-default-paper-size "a4")
#(set-global-staff-size 16)
#(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 "Assumpsit Iesus"}
	subtitle="Dominica secunda Quadragesimæ"
	subsubtitle=\markup{\column{ " " " " " " }}
	composer="Estêvão de Brito (1570-1641)"
	%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*55 \bar "|." }


cantus=\relative c'{
	e2 a
	a4 b c2
	r4 c2 c4
	b4 g a8 g a b
	c4 d4. c8 c4 ~
	c b a a ~
	a8 \noBeam g g2 f8 e
	d4 d a'2
	a4 b c2
	r4 d2 d4
	c4. a8 b2
	c4 a2 gis4
	a4. g8 f4 f
	e2 e
	r4 e'2 d4
	e4. d8 c2
	a4 b a2 ~
	a1
	r2 r4 a 
	g f e2
	f4 d c8 d e f 
	g4 a8 \noBeam a b4 e,
	e'2 d ~
	d4 c2 b4 
	c2. b4 ~
	b8 \noBeam a a2 gis4
	a2 r4 a ~
	a a a a
	g2. g4
	g c2 b4
	a2. gis8 fis
	gis2 r
	r2 r4 e
	g4 a2 gis4
	a4 a2 f4
	e f g2
	a1
	g2 f4 d8 e
	f g a2 gis4
	a4 g8[ f e f] g4 ~
	g fis g2
	r4 e f a ~
	a g f e 
	d4. e8 f4 g ~
	g f8 e f4 e8 d
	c4 c f4. f8
	e4 a g b ~
	b8 a a2 gis4
	a2 r
	r r4 a ~
	a8 \noBeam a b4 c g
	a4. a8 e'2
	c2. b8 a
	g a b4. a8 a4 ~ |
	a gis8 fis gis\breve*1/4
}

altus=\relative c'{
	R1
	r2 a
	e'2 e4 f
	g2 r4 f ~
	f f e c
	d8 c d e f4 e ~
	e8 \noBeam d16 c b4 c2
	b a4 f' ~
	f f e c
	d8 c d e f4 d
	r4 a'2 gis4
	a4 f e2
	r4 e2 d4
	e4. d8 c2
	b a
	b4 e e2
	r2 c 
	d4 e f2
	e4 g a8 g f e 
	d c d2 cis4
	d4 a2 c4
	b4 a2 gis4
	a4 a'2 g4 ~
	g8 f e4 d g
	g e f2 
	e1 
	e2 r4 e ~
	e e f f
	d2. e4
	e2 d4. b8 
	e2 e
	r2 e 
	d c ~
	c b
	a4 a cis d ~
	d8 \noBeam d cis4 d e
	f c2 \ss bes8 a
	\ss bes4 g a2
	d b
	c g'4 e
	d2 d4 b
	c4 e2 d4
	c b a8 b c a
	b c d2 cis4
	d2 r
	a2 a4 b
	c2. g4
	a4. a8 e'2
	c4. d8 e c d e
	f4 g f d
	c8 a4 gis8 a4 e' ~
	e d8 c b4 b
	a e'4. c8 d4
	e4 b c4. c8 | 
	b\breve*1/2
}

tenor=\relative c'{
	R1
	R
	a2. a4
	g4 e f8 e f g
	a4 b c a
	g2 d'4 c
	\[b2. a4 ~ \]
	a8[ g] g4. f16[ e] f8[ g]
	a4 f g a
	d, g f g
	a2 r4 e
	a2 a4 b
	c2 r
	r4 a2 a4
	g e f2
	e2 r4 a ~
	a gis a4. \ss g8
	f4 e d8 \noBeam d d'4
	c b a2
	b r
	r a
	g4 f e e
	r4 e' f8 e d c
	b4 c d d
	e8 d c b a4 d
	c2 b 
	a r4 c ~
	c c c2 ~
	c4 b8 a b4 c
	c g2 g4
	c2 b
	e,2 gis4 a ~
	a gis a2
	e' d
	c r
	R1
	r4 a c d ~
	d cis d2
	d, e
	a4 c4. b8 g a
	b4 a b e ~
	e8 d c b a4 a
	e' e, f a ~
	a g f e 
	d8 e f g a b c4 ~
	c8 d e4. d8 d4
	e e4. e8 d4
	c2 b
	r4 a4. a8 b4
	c4 g a4. a8
	e'2 c4. c8 
	c4 a2 gis4
	\[a2 f\]
	e1 |
	e\breve*1/2
}

bassus=\relative c{
	R1*5
	r2 r4 a
	e'2 e4 f 
	g2 d ~
	d4 d c a
	b8 a b c d4 b
	a2 e'
	r2 r4 e
	a2 a4 b 
	c2 r
	r r4 a ~
	a gis a4. \ss g8
	f4 e f4. e8 
	d4 cis d2
	a4 e' f2
	g a 
	d, r
	r r4 b'
	c8 b a g f4 g ~
	g c, g'2
	c, d
	e1
	a,2 r4 a' ~
	a a f f
	g2. c,4
	c2 g4 g
	a2 e'
	r4 e2 c4
	b4. b8 a2
	R1
	r2 a'2 ~
	a g 
	f1
	e2 d
	R1
	r2 c
	d g 
	a f 
	e r
	R1
	r4 d4. d8 e4
	f c d4. d8
	a'2 r
	r e f4 a2 g4 
	f e d d
	a e' a, c ~
	c8 \noBeam c d4 e2
	a,4 a4. a8 b4 
	c4 g a4. a8 |
	e'\breve*1/2
}


textocantus=\lyricmode{
As -- sum -- psit Ie -- sus
Pe -- trum et Ja -- co -- _ _ _ _ _ _ _ _ _ bum,
et _ Ia -- co -- _ _ bum,
as -- sum -- psit Ie -- sus
Pe -- trum
et Ia -- co -- bum,
et Io -- an -- nem fra -- trem e -- ius
et Io -- an -- nem fra -- trem e -- ius _
et du -- xit il -- los in mon -- _ _ _ _ tem ex -- cel -- sum,
in mon -- _ tem ex -- cel -- sum _ se -- or -- _ sum.
Et _ trans -- fi -- gu -- ra -- tus est an -- te e -- _ _ os
et re -- splen -- du -- it,
et re -- splen -- du -- it fa -- ci -- es
e -- _ _ _ _ _ ius
sic -- _ _ _ _ _ ut sol
ve -- sti -- men -- _ ta au -- tem e -- _ _ _ _ _ _ _ _ _ _ ius
fa -- cta sunt al -- ba sic -- _ _ _ ut nix
fa -- _ cta sunt al -- ba sic -- ut nix,
sic -- _ _ _ _ _ _ _ _ 
\italicas
cut __ _ 
\rectas
nix.
}

textoaltus=\lyricmode{
As -- sum -- psit Ie -- sus
Pe -- _ trum et Ia -- co -- _ _ _ _ bum, _
et __ _ _ Ia -- co -- bum,
Pe -- _ trum et Ia -- co -- _ _ _ _ bum
et Io -- an -- _ nem
et Io -- an -- nem fra -- trem e -- ius,
e -- ius
et du -- xit il -- los in mon -- _ _ _ _ _ _ _ tem
ex -- cel -- sum se -- or -- sum,
in mon -- _ _ _ tem ex -- cel -- sum se -- or -- sum.
Et _ trans -- fi -- gu -- ra -- tus est an -- te e -- os
fa -- ci -- es _ e -- ius
et re -- splen -- _ du -- it fa -- ci -- es e -- _ _ ius sic -- ut sol,
sic -- ut sol,
sic -- ut sol,
ve -- sti -- men -- ta au -- tem e -- _ _ _ _ _ _ _ ius
fa -- cta sunt al -- ba sic -- ut nix,
fa -- _ _ _ _ _ _ cta sunt al -- ba sic -- ut nix,
sic -- _ _ _ _ ut nix,
fa -- cta sunt al -- ba sic -- ut nix.
}

textotenor=\lyricmode{
Pe -- trum et Ia -- co -- _ _ _ _ _ _ _ bum,
et Ia -- co -- _ _ _ _ _ _ _ _ _ _ _ _ bum,
Ia -- co -- _ bum
as -- sum -- psit Ie -- sus
Pe -- trum et Ia -- co -- bum
et _ Io -- an -- nem fra -- trem e -- ius et du -- xit il -- los
et du -- xit il -- los
in mon -- _ _ _ _ _ tem ex -- cel -- _ _ _ _ sum se -- or -- sum.
Et _ trans -- fi -- _ gu -- _ ra -- tus est an -- te e -- os,
et re -- splen -- _ du -- it fa -- ci -- es
fa -- ci -- es _ e -- ius 
sic -- ut sol,
sic -- _ _ _ _ ut sol,
sic -- _ _ _ _ _ ut sol,
ve -- sti -- men -- _ ta au -- tem e -- _ _ _ _ _ _ _ _ _ _ _ ius 
fa -- cta sunt al -- ba
fa -- cta sunt al -- ba sic -- ut nix,
fa -- cta sunt al -- ba sic -- _ ut nix.
}

textobassus=\lyricmode{
As -- sum -- psit Ie -- sus Pe -- _ trum et Ia -- co -- _ _ _ _ _ _ bum
as -- sum -- psit Ie -- sus
et _ Io -- an -- nem fra -- trem e -- ius,
fra -- trem e -- ius
et du -- xit il -- los
in mon -- _ _ _ _ tem _ ex -- cel -- sum se -- or -- sum.
Et _ trans -- fi -- gu -- ra -- tus est an -- te e -- os
et re -- splen -- du -- it
fa -- _ ci -- es e -- ius
sic -- ut sol,
sic -- ut sol
fa -- cta sunt
al -- ba sic -- ut nix
ve -- sti -- men -- ta au -- tem e -- ius 
fa -- cta sunt,
fa -- _ cta sunt al -- ba,
fa -- cta sunt al -- ba sic -- ut nix.
}



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 c \major
		\time 4/4
		e'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 c \major
		\time 4/4
		a1
		} 
	\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
		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 c \major
		\time 4/4
		a,2
		} 
	\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 . 1.2) 
		%\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 
		\override VerticalAxisGroup #'minimum-Y-extent = #'(1 . 6)
		\consists Ambitus_engraver 
		\override LigatureBracket #'padding = #1
	}
}

%\midi {}

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string "Assumpsit Iesus" "Brito" }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page "Brito" \on-the-fly #not-first-page "Assumpsit Iesus" \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
}