\version "2.11.32"

#(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=50

\header {
	title=\markup{\bigger \bigger \bigger "Precamur sancte Domine" }
	subtitle="(Christe qui lux est)"
	composer="Robert White (c.1535-1574)"
	%opus="(-)"
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={\key f \major \time 2/2 \skip 1*17 \bar "||" \break
				\skip 1*18 \bar "||" \break
				\skip 1*18 \bar "|." 
}


cantus=\relative c''{
	e2 e
	d c
	d e
	f d
	d d 
	d f
	e c
	d f
	e f
	g f
	e d
	f d
	d e
	e d
	c d
	e f
	d d\breve*1/4
	e2 e
	d c
	d e
	f d
	d d 
	d f
	e c
	d f
	e f
	g f
	e d
	f d
	d e
	e d
	c d
	e f
	d d ~
	d\breve*1/2
	e2 e
	d c
	d e
	f d
	d d 
	d f %\break
	e c
	d f
	e f
	g f
	e d
	f d
	d e
	e d
	c d
	e f
	d d ~
	d\breve*1/2
		
}

altus=\relative c''{
	R1
	R
	r4 a a4. g8
	f4 bes a g ~
	g8 a fis4 g a
	r d, d4. d8
	a'4 c4. bes8 a4
	a1
	r2 d4 c ~
	c8 \noBeam bes g[ a] bes4 a ~
	a8 \noBeam g e4 r2
	bes'4 a4. d,8 g4 ~
	g8[ f] e[ d] cis4. d8
	e2 a,
	r4 e'4 a a
	c4. c8 bes4 a ~
	a8 \noBeam bes g4 fis\breve*1/4
%
	R1
	R
	R
	d'4. c8 bes4 a ~
	a g f4. e8
	d4 a' a a
	c4. bes8 a4 a
	a2 r4 a ~
	a8 \noBeam a g4 a a 
	g e f4. g8
	a8 g e4 f bes ~
	bes8 \noBeam bes a4 bes g
	f4 e8 d cis4 cis ~
	cis8 d e4 f2
	r2 r4 a ~
	a8 \noBeam bes c4 bes8 a d4 ~
	d8 \noBeam c8 b2 a4 
	a\breve*1/2
%
	R1
	R
	R
	r4 a bes4. c8 
	a4 a g4. g8
	f4. e8 d2
	cis2 r
	r4 a'4 d4. a8 
	b4 a a4. a8
	g4 e f4. g8 
	a1
	r4 a bes4. a8
	g4 d c8 d \ss b4
	c2 d
	r4 a' a a
	b c d4. c8
	\ss b4 a8 g b!4 a
	a\breve*1/2
}

altusdos=\relative d'{
	R1
	R
	R
	r2 r4 d
	d4. c8 bes4 f'
	d bes a a
	a4. a8 e'4 f ~
	f8 \noBeam e d4 d r
	a'4 g4. f8 f4 ~
	f8 \noBeam d \noBeam e \noBeam e f2
	a4 g4. f8 \noBeam f \noBeam f
	f4. c8 d2 ~
	d4 a r a
	c c f4. f8
	f4 e4. d8 d4 ~
	d c4 r a
	d2 d\breve *1/4
%
	r2 a'4. g8
	f4 f2 e4 ~
	e8 d d2 c4
	bes4 a f'2
	r4 d d d
	f4. e8 d4 d
	c e e e 
	f4. e8 d4 c
	e2 r4 d ~
	d8 \noBeam d cis4 d2
	a2. f'4 ~
	f f f d ~
	d a r a ~
	a8 \noBeam bes c4 bes8 a a'4 ~
	a4 g4. a8 f4 
	e2 r4 d ~
	d2 d2 ~
	d\breve*1/2
%
	r2 r4 e
	f4. g8 e4 e ~
	e8 d d2 \ss cis4
	d1
	d2. g,4
	d'2 r4 d
	a'4. e8 f4 e
	d2. d4 ~
	d cis r d ~
	d \ss cis d2
	r4 e f4. e8
	d4 c d d
	d2 r4 e
	e4 e f g
	a4. g8[ f e] f4
	e2 d4 a'
	g2. fis8 e 
	\ss fis\breve*1/2
}

tenor=\relative c'{
	R1
	R
	r2 r4 a
	a4. g8 f4 bes
	a4 d, g f
	g2 d
	r4 a' a4. a8
	d4 f4. e8 d4
	c2 d4 f
	bes, c f,2
	c2 d
	d'4 c4. bes8 \noBeam g a
	bes a f4 e2
	a2 r4 a
	c c f4. f8
	e2 d4. c8
	bes2 a\breve*1/4
%
	R1
	R
	R
	r2 d4. c8
	bes2 a4 a
	a4. a8 d,4 a'
	a a c4. bes8
	a4 d, d f 
	c2 f4 a 
	bes g a2
	r2 r4 d ~
	d8 \noBeam d c4 d bes
	a g8 f e2
	a2 r4 a ~
	a8 \noBeam bes c4 bes8 a d4 ~
	d4 c d4. c8
	b a g4 d2 ~
	d\breve*1/2
%
	R1
	r2 r4 e4
	f4. g8 e2
	d g 
	fis g
	d1
	r4 e a4. e8 
	f4. e8 d4 f
	g a d, f
	e2 d
	cis r4 a'
	bes4. a8 g4 fis
	g4. f8 e2
	r4 a a bes
	c a d4. d8
	g,4 a d,2
	g d ~
	d\breve*1/2
}

bassus=\relative c'{
	r4 a a4. g8 
	f4 bes a4. g8 
	f e d4 cis2
	d2. bes4
	d d'4 d4. c8
	bes4 g f d
	cis4 a a2
	r4 d d4. d8
	a'4 c bes a
	g c, d'4 c4 ~
	c8 \noBeam bes \noBeam g a bes4 a
	d,4 f bes,2
	d2 a
	r4 a d d
	a'4. g8 f4 d
	a'2 d,4 f
	bes,2 d\breve*1/4
%
	R1
	r2 a'4. g8 
	f2 e4 e
	d2. f4
	bes,2 d ~
	d1
	a
	d4 a' a a 
	c4. bes8 a4 f 
	e2 d4 d ~
	d8 \noBeam d cis4 d bes8 \noBeam \ss c
	d\noBeam e f4 bes,2
	d2 a ~
	a d4. e8
	f4 e d2
	a'4. a8 d,2
	g2. fis8 e 
	fis\breve*1/2
%
	R1
	R
	R
	R
	r4 a4 bes4. c8
	a4 a f d
	a1
	d2 r
	r4 a' d4. a8
	b4 g a2 ~
	a4 a d,2 ~
	d4 f r a
	bes4. a8 g4 g
	a a, d bes
	f'4. e8 d2
	r4 a'4 a a
	b c d4. d8 
	a\breve*1/2
}

textocantus=\lyricmode{
\set stanza = "2. " 
Pre -- ca -- mur __ _ san -- cte Do -- mi -- ne,
de -- fen -- de nos in hac no -- cte,
sit no -- bis in te re -- qui -- es,
qui -- e -- tam __ _ no -- ctem tri -- bu -- e.
\set stanza = "4. " 
O -- cu -- li __ _ som -- num ca -- pi -- ant,
cor ad te sem -- per vi -- gi -- let,
dex -- te -- ra tu -- a pro -- te -- gat,
fa -- mu -- los __ _ qui te di -- li -- gunt. _
\set stanza = "6. "
Me -- men -- to __ _ no -- stri Do -- mi -- ne
in gra -- vi i -- sto cor -- po -- re,
qui es de -- fen -- sor a -- ni -- mæ,
ad -- e -- sto __ _ no -- bis Do -- mi -- ne. _
}

textoaltus=\lyricmode{
Pre -- ca -- mur san -- cte Do -- mi -- _ _ _ _ ne
de -- fen -- de nos in hac no -- cte
sit no -- _ bis in __ _ te re -- _ qui -- es
\italicas
sit no -- bis in __ _ _ te __ _ re -- qui -- _ es
\rectas
qui -- e -- tam no -- ctem tri -- _ _ bu -- _ e.
O -- cu -- li som -- _ num ca -- pi -- ant,
cor ad te sem -- per vi -- gi -- let
dex -- _ te -- ra tu -- a pro -- _ te -- _ _ _ _ gat,
\italicas
dex -- _ te -- ra tu -- a pro -- _ _ _ te -- _ _ _ gat
\rectas
fa -- _ mu -- los qui __ _ te _ di -- _ li -- gunt.
Me -- men -- to no -- stri Do -- mi -- _ _ _ ne
in gra -- vi i -- sto cor -- po -- _ _ _ _ re
qui es de -- fen -- sor a -- _ ni -- _ mæ
ad -- e -- sto no -- bis Do -- mi -- _ _ _ _ _ ne. 
}

textoaltusdos=\lyricmode{
Pre -- ca -- mur san -- cte Do -- mi -- ne,
de -- fen -- de nos in _ hac no -- cte
sit no -- bis in _ te re -- qui -- es,
\italicas
sit no -- bis in te re -- qui -- _ _ es.
\rectas
qui -- e -- tam no -- ctem tri -- bu -- _ _ _ e
tri -- bu -- e.
O -- cu -- li som -- num __ _ _ ca -- pi -- _ _ ant
cor ad te sem -- per vi -- gi -- let,
\italicas
cor ad te sem -- per vi -- gi -- let
\rectas
dex -- _ te -- ra tu -- a pro -- _ te -- gat __ _ _ _ 
fa -- _ mu -- los qui __ _  te _ di -- li -- _ _ _ _ gunt. _
Me -- men -- to no -- stri __ _ _ Do -- mi -- ne, Do -- mi -- ne
in gra -- vi i -- sto cor -- po -- _ re
cor -- _ po -- re
qui es de -- fen -- sor a -- ni -- mæ
ad -- e -- sto no -- bis Do -- mi -- _ _ _ _ _ 
\italicas
ne, Do -- mi -- _ 
\rectas
ne.
}

textotenor=\lyricmode{
Pre -- ca -- mur san -- cte Do -- mi -- _ _ _ ne
de -- fen -- de nos in hac __ _ no -- _ _ _ _ _ _ cte
sit no -- bis in __ _ te __ _ re -- qui -- es
qui -- e -- tam no -- ctem tri -- bu -- _ _ e.
O -- cu -- li som -- num ca -- pi -- ant,
cor ad te sem -- per vi -- _ gi -- _ _ _ _ _ _ let
dex -- _ te -- ra tu -- a pro -- te -- _ _ gat
fa -- _ mu -- los qui __ _ te _ di -- _ li -- _ _ _ gunt. _
Me -- men -- to no -- stri Do -- mi -- _ ne
in gra -- vi i -- sto cor -- po -- _ _ _ _ _ _ re
qui es de -- fen -- sor a -- ni -- mæ
ad -- e -- sto no -- bis Do -- mi -- _ _ _ _ ne. _
}

textobassus=\lyricmode{
Pre -- ca -- mur san -- cte Do -- _ mi -- _ _ ne,
Do -- mi -- ne,
\italicas
pre -- ca -- mur san -- cte Do -- mi -- _ _ ne
\rectas
de -- fen -- de nos in hac no -- _ cte,
sit no -- _ bis in __ _ te re -- qui -- _ _ _ es
qui -- e -- tam no -- ctem tri -- bu -- _ _ _ _ e.
O -- cu -- li som -- num ca -- pi -- 
\italicas
ant, ca -- _ pi -- 
\rectas
ant,
cor ad te sem -- per vi -- gi -- _ let,
dex -- _ te -- ra tu -- a pro -- _ te -- _ _ _ gat, _
fa -- mu -- los qui te di -- li -- gunt,
di -- li -- _ gunt.
Me -- men -- to no -- stri Do -- mi -- _ ne
in gra -- vi i -- sto cor -- _ po -- _ _ re
qui es de -- fen -- sor __ _ a -- ni -- _ _ _ mæ
ad -- e -- sto no -- bis Do -- mi -- ne.
}




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


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



incipitaltusdos=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Altus      "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c3"
		\key f \major
		\time 2/2
		d'2
		} 
	\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
		a2
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent=0
	}
	}
}


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



\score {\transpose c' a{
\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="v5" {
		\set Staff.instrumentName=\incipitaltusdos
		\clef "G_8" 
		\altusdos}
	\new Lyrics \lyricsto "v5" {\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}
	>>
	
>>

	}%\transpose


\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup #'minimum-Y-extent = #'(-0 . 0) 
	}
	\context {\Score \override BarNumber #'padding = #2 }
	%\context {\Lyrics \override LyricText #'font-size = #2 }
	\context {\Voice melismaBusyProperties = #'() }
	%\context { \RemoveEmptyStaffContext }
	\context {\Staff \consists Ambitus_engraver }
	indent=3.7\cm
}

%\midi {}

}


\score{\transpose c' a{
	<<
\new Voice=greg \relative c''{
	\override Staff.TimeSignature #'stencil = #'()
        \override Stem   #'transparent = ##t
        \override NoteHead   #'style = #'neomensural   
	\cadenzaOn
	\key f \major
	e4 e d c d e f d d \bar "|"
	d d f e c d f e \bar "|"
	f g f e d <\parenthesize e > f d d \bar "|"
	e e d c d e f d d \bar "||"
	d e d c d \bar "||"
}

\new Lyrics \lyricsto greg \lyricmode {
\set stanza = "1. " Chri -- ste qui __ _ lux es et di -- es,
no -- ctis te -- ne -- bras de -- te -- gis,
lu -- cis -- que lu -- men _ cre -- de -- ris,
lu -- men be -- _ a -- tum pre -- di -- cans.
}
\new Lyrics \lyricsto greg \lyricmode {
\set stanza = "3. " Ne gra -- vis __ _ som -- nus ir -- ru -- at,
nec ho -- stis nos sur -- ri -- pi -- at,
nec ca -- ro il -- li con -- sen -- ti -- ens,
nos ti -- bi __ _ re -- os sta -- tu -- at.
}
\new Lyrics \lyricsto greg \lyricmode {
\set stanza = "5. " De -- fen -- sor __ _ no -- ster a -- spi -- ce,
in -- si -- di -- an -- tes re -- pri -- me,
gu -- ber -- na tu -- os _ fa -- mu -- los,
quos san -- gui -- _ ne mer -- ca -- tus es. A -- _ men. __ _ _ 
}
>>
	}%transpose

\header{piece=\markup{"Versos del himno" \italic "Christe qui lux es" "(rito Sarum) para ser cantados en alternancia con la polifonía"} }
\layout {
	#(layout-set-staff-size 15)
}
}



\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string "Precamur sancte Domine" "White" }
        oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page "White" \on-the-fly #not-first-page "Precamur sancte Domine" \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=8
	line-width=19.0\cm
	between-system-padding = 0
	ragged-last-bottom = ##f
	head-separation=1\mm
	foot-separation=2.5\mm
}