\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.4)
#(ly:set-option 'point-and-click #f)
%mobile -s15.5 -i1.5 -ball

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

htitle="Missa pro defunctis: Benedictus"
hcomposer="Guerrero"

\header {
	title=\markup{\fontsize #3 "7" \smaller \smaller "(alt)." \fontsize #3 "Benedictus"}
	subtitle="de la Missa pro defunctis"
	subsubtitle=\markup{\null \vspace #2 }
	composer="Francisco Guerrero (1528-1599)"
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{\smaller "Liber primus missarum 1566"}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
	tagline=""
}

\score {\transpose c d {
<<
         \new Voice = "canto" {
                 \override Staff.TimeSignature.stencil = #'()
                 \override Stem.transparent = ##t
                 \set Score.timing = ##f
                 \override NoteHead.style = #'neomensural         
                 \clef "G" 
                 \key a \minor
                 c'4 d' \[d' e'\] d' \bar "|"
         }
         \new Lyrics \lyricsto "canto" {
                 Be -- ne -- di -- _ ctus 
         }
>>
        }%transpose

\layout {
         line-width=13\cm 
         %tablet line-width=12\cm
        indent=5.6\cm
        %tablet indent = 4\cm
        ragged-right = ##f
        \override LigatureBracket.padding = #0
}
}

%tablet \pageBreak

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


cantus=\relative c''{
	a1
	\[a g\]
	f1 ~
	f2 e ~
	e d
	e1
	r2 d ~
	d c
	d2. e4
	f2 g4 f ~
	f e8 d e4 e
	d2 r
	d \[f 
	g\] a ~
	a g ~
	g \[f
	e\] d ~
	d4 \ss cis8 b cis2
	r2 e2 ~
	e f
	e2. d4 ~
	d \ss cis8 b cis2
	d\breve*1/2
}

altus=\relative c'{
	e1
	f2 d ~
	d \ss cis2
	d1 ~
	d2 c
	a2. b4
	c4. b8 a4 g8 f
	e4 \ss fis g2
	e4 a a e
	f4. g8 a4 b
	c4 d2 c8 b
	c4 d2 \ss cis4
	d2 d,4. e8
	f8 g a4 d, f ~
	f4 e f4. g8
	a8 b c a b4 c
	d2. a4
	c2 \ss bes4 a8 g
	a1
	r2 r4 a
	b4 b d2
	c4 b8 a b2
	a1 ~
	a\breve*1/2
}

tenor=\relative c'{
	c1
	d
	g,
	\[a
	g\]
	f
	e2 c'
	\[c b\]
	a r4 a
	a d, f g
	a \ss bes2 a8 g
	a2. a4
	d,2 d'
	d2. c4
	bes2 a ~
	a4 f g4. a8
	\ss bes4 a8 g a2 ~ 
	a4 g f2
	e1
	a2. a4
	g2 a4 d,
	e4 e g2
	f4 e8 d e2
	d\breve*1/2
}

bassus=\relative c'{
	a1
	\[d,2 f\]
	e1
	d
	\ss bes2 c
	d1
	a1 ~
	a2 g
	a1
	d2 r
	R1
	r2 a'
	a4. g8 f4. e8
	d4. c8 bes4 a
	g2 f4 f'
	f4 f e2
	d1
	c2 d
	a1
	a
	e'2 d
	a g
	a1
	d\breve*1/2
}

textocantus=\lyricmode{
Qui ve -- _ _ _ _ nit
in no -- _ mi -- ne Do -- _ _ _ _ mi -- ni.
Ho -- san -- _ na in ex -- _ cel -- _ _ sis
in ex -- cel -- _ _ _ _ sis.
}

textoaltus=\lyricmode{
Qui ve -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ nit
in no -- mi -- ne __ _ _ _ _ Do -- _ _ _ _ mi -- ni.
Ho -- _ _ _ san -- na in ex -- cel -- _ _ _ _ _ _ _ _ _ _ _ _ _ sis
ho -- san -- na in ex -- _ _ cel -- sis.
}

textotenor=\lyricmode{
Qui ve -- nit,
qui __ _ ve -- nit,
qui ve -- _ nit
in no -- mi -- ne __ _ _ _ _ _ Do -- mi -- ni.
Ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ _ sis,
in ex -- cel -- sis,
ho -- san -- na in ex -- _ _ cel -- sis.
}

textobassus=\lyricmode{
Qui ve -- _ nit
in no -- mi -- ne Do -- _ mi -- ni.
Ho -- san -- na in ex -- cel -- _ _ _ _ sis,
ho -- san -- na in ex -- cel -- _ sis,
ho -- san -- na in ex -- cel -- sis.
}



\score {\transpose c' d'{
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName="Superius "
		\clef "treble"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	>>

	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName="Altus      "
		\clef "G_8"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName="Tenor     "
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName="Bassus     "
		\clef "bass"
		\bassus }
	\new Lyrics \lyricsto "v4" {\textobassus }
	>>
	
>>

	}%transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.2
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		%autoBeaming = ##f
	}
	\context {\Staff 
                %\RemoveEmptyStaves
                %\override VerticalAxisGroup.remove-first = ##t
		\override VerticalAxisGroup.staff-staff-spacing =
			#'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
		\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=20
	%page-count = 8
	ragged-last-bottom = ##f
	indent=2.0\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 9) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 12) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
        score-system-spacing.basic-distance=#15
}