\version "2.11.45"

#(set-default-paper-size "a4")
#(set-global-staff-size 15.8)
#(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 = 15


\header {
	title=\markup{\column{ \bigger \bigger \bigger \bigger "Honor, virtus et potestas" }}
	composer="Thomas Tallis (c.1505-1585)"
	subtitle="Domingo de Trinidad"
	subsubtitle=\markup{\column{"(sexto responsorio de maitines)" " " " " " " " " " " " "}}
	%opus="(-)"
	poet="Cantiones... (1575), n°15"
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}


\score {\transpose c' g{
<<
         \new Voice = "canto" {
                 \override Staff.TimeSignature #'stencil = #'()
                 \override Stem   #'transparent = ##t
                 \set Score.timing = ##f
                 \override NoteHead   #'style = #'neomensural         
                 \clef "G_8" 
                 \key c \major
                 c' d' d' c' d' e' c' d' d' c' \bar "|"
         }
         \new Lyrics \lyricsto "canto" {
                 Ho -- _ nor __ _ _ _ _ _ _ _  
         }
>>
	}%transpose
\layout {
        ragged-right = ##f
        line-width=13.5\cm 
        indent=5.6\cm
}
}


global={\key c \major \time 2/2 \skip 1*41 \break
	\repeat volta 2 { \skip 1*22 } \alternative {{\skip 1}{\skip 1}} \bar "|." }


cantus=\relative c''{
	r2 \[c d\] c4 c ~
	c b c c c d4. c8 c4 ~
	c4 b c2 r c
	d \[e f\] e ~
	e d r2
	c2 d1
	e4. f8 g2 ~ g
	f2 e2. e4 ~ e d4 c8 b e4 ~ e d4 
	e2 R1
	r4 g4. f8 d4 e8 d e f
	g2 \[c, d\] 
	e r r4 f4.
	e8 c4 d8 e f2 e4 f2 r4 g a4. g8 \[f2
	e2\] d R1
	r4 g a4. g8 f2 e
	r2 r4 b e4. d8 \[c2 b\] a2 ~ a r2 r
	r4 e'8 \noBeam e a4. g8 f2 
	e4 e f4. e8 d a d2 cis4
	d1 r4 e g4. f8 e4 g f2
	e2 r R1
	c2 d2 ~ d e2 ~ e4 e4. d8 f4 ~ f e4 c e
	d2 c R1 r2 c2 d2 e4 e4 ~ e8
	d8 f2 e8 d e2 r2 R1
	c2 d2 ~ d e2 ~ e4 e4. d8 f4 e c2 e4
	d2 r4 c4 d2 e4. d8 
	f4 e2 d4 ~ d8 c8 e4 d8 c d4 ~ d8 \noBeam c8 c2 b?4
	c1 ~ c1
	c\breve*1/2\repeatTie
}

altus=\relative c''{
	\[g2 a\] g4 g2 fis4
	g2 r4 g g a2 g4
	g4. f8[ e d] c4 ~ c b4 c f4 ~ f d4 g a4 ~ a d,4 g2 
	r4 c2 b4 c g
	a4 g4 ~ g g4 d a'4 ~ a
	g2 g4 g c2 a4 c2 g
	r2 r4 g a4. b8
	c4 g4 ~ g b4 a a
	g2 r r4 c4.
	b8 g4 a8 b c2 b4
	c c4. b8 g4 a8 b c2
	g4 a d, e8 c c'4 ~ c
	b4 c c4 ~ c8 \noBeam b8 a2 f4
	g2 g4 g a4. g8 f4 d
	g2 r r4 a c4. b8
	a2 g r4 e
	g2 ~ g4 d4 f2
	e r r4 d8 \noBeam d
	g4. g8 a4 c4. c8 b4
	c2 r4 f,8 \noBeam f a2 g4 e
	fis4 fis g d e c
	r4 g' g e a2 
	g2 r R1
	R1
	r2 r4 g4 ~ g
	a4 b4. a8 c4 c, e4. f8 
	g1 R1
	g2 a4 c4 ~ c b4 a g
	f1 g4 g \[a2 b2.\] b4 ~ b8
	a8 c4 b a4 ~ a8 g8 a b c4 c,4 ~ c8
	d8 e f g4 f8 a8 ~ a g8 e2 e4
	f4 g c,2 r2 r4 g'
	a2 b4. a8 c4 b a2 ~ a4 a4 g2
	e4. f8[ g e] a4 ~ a4 g4 g2
	a4\repeatTie g g\breve*1/4
}

tenor=\relative c'{
	R1 r2 \[c
	d\] c4. d8 e4 f2 e4
	d4 g2 fis4 g2 a4. g8
	f2 e4 c'4 ~ c b4 c g
	a g4. f8 g4 c,2
	r4 c'4 ~ c b4 a4. b8 c4 c2 b4 c g
	a f g2 e4 e 
	a2 g4 c4 ~ c8 \noBeam b8 a4 
	g2 r r4 c4 ~ c8 \noBeam b8 g4 a b c c,4. 
	d8 e4 f a2 g8 f
	g4 c, e2 r4 a4. g8 c4 ~ c b4 c c,
	d4 d c2 r4 c' c b
	c g8[ a b c] d4 ~ d8 c8 c2 b4
	c2. b4 a2. e4
	a,2 b4 e g4. f8 e2 d r
	r4 e8 \noBeam e a4. g8 f2
	e4 c'4 ~ c8 \noBeam b8 a2 f4
	g e a4. g8 f4 d r4 a'4 ~ a
	a4 b2 g4 c 
	c b c2. a4
	c2 r2 r2
	g2 a2 b4 b4 ~ b a4 c c,
	e4. f8 g4 r r g2 a4
	b4. a8 c2 b4 a2 g8 f
	e2 c4 c f2 e4 c'4 ~ c b8 a b2 c4 g2 \ss fis4 g1
	a4. g8 f2 ~ f4 d4 g g
	a2 b4. a8 c4. b8 g4 a4 ~ a
	g4 a4. g8 f4 d g2
	r4 e g a g2 r4 f4 ~ f8 g8 a4 bes8. \noBeam a16[ g8 \ss bes!8]
	a4 \[g2 f4 ~ \] f e8 d e2
	f4\repeatTie e8 d e\breve*1/4
}

tenordos=\relative c'{
	R1 R R
	r2 c \[d c\] d \[a
	b\] \[c d\] c c \[d e\] e d f e d \[e
	c\] c \[c d\] e f e \[d f\] \[e f\] g
	g f \[d c\] c \[c e\] f g f \[e f\] d
	\[c b\] d \[d e\] d \[d c\] d e c c g 
	\[a c\] \[c d\] \[c f\] d c d \[d e\]
	d d c \[d e\] c c c d e \[e d\] f \[e c\] d c \[c
	g\] c d \[e c\] a \[b c\] d1 c2 c \[d e\] \[e d\] f \[e c\] d c \[c
	bes\] \[a \ss bes\] c \[c d\] e f2 ~ f \[d2 c\] c2 ~ c c2 c\breve*1/2\repeatTie
}

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


textocantus=\lyricmode{
Vir -- _ _ _ _ tus, ho -- nor,
vir -- _ _ _ tus
vir -- tus, ho -- _ _ nor
et po -- te -- _ _ _ stas,
et im -- pe -- _ _ ri -- um
et im -- _ pe -- _ _ _ _ ri -- _ um
et im -- _ pe -- _ _ ri -- um
sit Tri -- ni -- ta -- _ ti
in U -- ni -- ta -- te
in U -- ni -- ta -- _ te
U -- ni -- ta -- _ _ ti in Tri -- ni -- ta -- _ _ _ te
in Tri -- ni -- ta -- _ _ te
in per -- en -- _ _ _ _ _ _ _ ni
in per -- _ en -- _ _ _ _ ni
sæ -- cu -- lo -- _ _ _ _ _ _ rum
tem -- _ _ _ _ _ _ _ _ _ _ _ po -- _ _ re
"(-re.)"
}

textoaltus=\lyricmode{
Vir -- _ _ _ _ tus
ho -- nor,
vir -- _ _ _ _ _ _ _ tus,
vir -- tus,
ho -- _ _ nor
et po -- te -- _ _ stas,
et po -- te -- stas,
et po -- te -- _ _ stas
et im -- pe -- _ _ _ _ ri -- um
et im -- _ pe -- _ _ ri -- um,
et im -- _ pe -- _ _ _ _ _ _ _ _ ri -- um
sit Tri -- _ ni -- ta -- ti,
sit Tri -- ni -- ta -- _ ti
in U -- ni -- ta -- te
in U -- ni -- ta -- te
U -- ni -- ta -- ti in Tri -- ni -- ta -- te
U -- ni -- ta -- ti in Tri -- ni -- ta -- _ _ te
in Tri -- ni -- ta -- te
in per -- _ en -- _ _ _ ni __ _ 
\italicas
in per -- en -- _ _ _ _ ni 
\rectas
sæ -- cu -- _ lo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ rum,
sæ -- cu -- lo -- rum
tem -- _ _ _ _ _ _ po -- re,
tem -- _ _ _ _ po -- re
_ _ -re.
}

textotenor=\lyricmode{
Vir -- _ _ _ _ _ _ tus,
ho -- nor,
vir -- _ _ _ tus,
vir -- tus,
ho -- _ nor,
vir -- _ _ tus
et po -- te -- stas, __ _
et po -- te -- _ _ _ stas,
et im -- pe -- _ _ ri -- _ um
et im -- _ pe -- ri -- um,
et im -- _ pe -- _ _ _ _ ri -- um
et im -- _ pe -- _ _ _ ri -- um
sit Tri -- ni -- ta -- _ _ _ _ _ _ _ _ ti 
in U -- ni -- ta -- te,
in U -- ni -- ta -- te
U -- ni -- ta -- _ _ ti
in Tri -- _ ni -- ta -- _ _ _ _ te
U -- ni -- ta -- ti in Tri -- ni -- ta -- _ te
in per -- _ en -- _ _ _ _ ni __ _ 
in per -- _ en -- _ _ _ _ _ ni,
in per -- en -- _ _ _ _ _ _ _ _ _ _ _ _ _ ni 
sæ -- cu -- lo -- _ _ _ _ _ _ _ _ _ _ rum
sæ -- cu -- lo -- rum
tem -- _ _ _ po -- _ _ _ _ _ _ _ re
_ _ _ -re.
}

textotenordos=\lyricmode{
Vir -- _ _ _ _ _ _ _ tus,
et po -- _ te -- _ _ _ _ _ _ stas,
et __ _ _ _ _ im -- _ pe -- _ _ _ _ ri -- _ um
sit __ _ _ _ Tri -- ni -- _ ta -- ti __ _ _ 
in __ _ U -- ni -- _ ta -- _ _ te,
U -- ni -- _ ta -- _ _ _ ti __ _ _ in __ _ 
Tri -- ni -- _ ta -- _ _ te
in per -- _ en -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ni
sæ -- cu -- _ lo -- _ _ _ _ _ _ _ _ rum __ _ _ 
tem -- _ _ _ po -- _ re, in
"(-re.)"
}

textobassus=\lyricmode{
Vir -- _ tus
ho -- nor, vir -- _ _ _ _ tus
et po -- te -- stas
et po -- te -- stas
et po -- te -- stas,
et po -- te -- _ stas,
et im -- pe -- ri -- um
et im -- _ pe -- _ _ _ _ _ _ ri -- um
et im -- _ pe -- _ _ _ _ _ _ ri -- um
sit Tri -- ni -- ta -- _ _ _ _ _ _ ti in U -- ni -- ta -- te
U -- ni -- ta -- ti in Tri -- ni -- ta -- te
in Tri -- ni -- ta -- _ te,
U -- ni -- ta -- _ _ _ ti in Tri -- ni -- ta -- _ te
in per -- en -- _ _ _ _ _ _ _ _ _ _ ni
in per -- en -- _ _ _ ni,
in per -- _ en -- _ _ ni
sæ -- cu -- _ lo -- _ _ rum,
sæ -- cu -- lo -- _ _ _ _ rum
sæ -- cu -- _ lo -- _ _ _ _ _ _ _ _ _ rum tem -- po -- _ _ _ re,
tem -- po -- _ _ re,
-re.
}


incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Superius   "
		\override NoteHead   #'style = #'neomensural
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-g"
		\key c \major
		\time 2/2
		\[c''1 d''\]
		} 
	\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-c1"
		\key c \major
		\time 2/2
		\[g'1 a'\]
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}


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


incipittenordos=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tenor          "
		\override NoteHead   #'style = #'neomensural 
		\override Rest #'style = #'neomensural
		\override Staff.TimeSignature #'style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c3"
		\key c \major
		\time 2/2
		c'1
		} 
	\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-c4"
		\key c \major
		\time 2/2
		\[g1 a\]
		} 
	\layout {
		\context {\Voice
			\remove Ligature_bracket_engraver
			\consists Mensural_ligature_engraver
		}
		line-width=\incipitwidth
		indent = 0
	}
	}
}


\score {\transpose c' g{
\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="v5" {
		\set Staff.instrumentName=\incipittenordos
		\clef "G_8"
		\tenordos }
	\new Lyrics \lyricsto "v5" {\textotenordos }
	>>
	
	
	\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 
		\override LyricHyphen #'minimum-distance = #0.33
	}
	\context {\Voice 
		%melismaBusyProperties = #'() 
	}
	%\context { \RemoveEmptyStaffContext }
	\context {\Staff 
		\consists Ambitus_engraver 
		\override LigatureBracket #'padding = #1
	}
}

%\midi {}

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string "Honor, virtus et potestas" "Tallis" }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page "Tallis" \on-the-fly #not-first-page "Honor, virtus et potestas" \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=5
	indent=3.8\cm
	line-width=19.0\cm
	between-system-padding = 0
	ragged-last-bottom = ##f
	foot-separation=4\mm
	head-separation=0\mm
}