\version "2.18.0"

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

ss=\once \set suggestAccidentals = ##t

htitle="Sancta Maria"
hcomposer="Dunstable"

\header {
	title=\markup{\larger \larger \larger \larger "Sancta Maria" }
	composer="John Dunstable (c.1390-1453)"
        pdfauthor=\composer
	%subtitle = " " 
	subsubtitle=\markup{\null \vspace #3 }
	%opus="(-)"
	%poet="(original una cuarta más alto)"
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={\key g \major \time 3/4 \skip 1*3/4*60 \bar "|." }


cantus=\relative c'{
	g2. 
	b4. c8 d4
	e d b8 a 
	a4 e'4. d8 
	d4. cis16 d cis8. b16
	d2 r4
	b2. c4. b8 a g
	g4 fis8 d4 fis8
	g8 a8. g16 g4 fis8
	g4 r4 e
	e2 g4
	g a4. g8
	b4. c8 d[ e]
	d4 b2
	R1*3/4
	R
	R
	R
	b2 c4 
	d c8 a d e
	fis e8. d16 d4 cis8
	d2.
	e2.
	r4 c c 
	e2 d4 
	c b4. a8
	a4 e' fis8 e
	e4. dis8 dis[ cis]
	e4 r4 c
	e4 d16 c b4 g8
	c b4 a b8
	a8 g16 a b8 gis4 fis8
	a4 r c
	c2 e4 ~
	e d b
	c8 d4 c8 a4
	b8. g16 b8 c d4
	r4 e8 d16 e f4
	e8 d c c4 b8
	c4 r4 e
	e c8 d b4
	a8 c8. b16 g8 b8 c
	d e8. d16 d4 cis8
	d2 r4
	b4. b8 b4
	b4 g a8 b
	c4 b8 a4 g8
	g2 fis4 
	g4 r b ~
	b4 d e
	c2 a4
	c b8 g a4
	g8 b c d4 c8
	a8 d e d4 cis8
	d4 r4 b
	e d8 c a b
	c[ d8.] c16[ b a] g8[ a]
	c8 b8. a16 a4 gis8
	a\breve*3/8
}

altus=\relative c{
	g2. ~
	g 
	c4 r4 e
	fis e g
	d g2
	fis4 d b
	g2.
	r4 r c
	c d fis8 d ~
	d8 e4 d c8
	d2 c4
	c2. ~
	c4 e2
	g2. ~
	g4 d r
	e4. g8 fis4
	g4 a8 b4 g8
	fis8 a4 g fis8
	g2. ~
	g2 e4
	d4 e8 fis4 g8
	a g4 fis8 e4
	d2.
	R1*3/4
	R
	r4 r4 b
	a d e 
	fis r a
	b2 a4
	b2 a4 
	g4 d2
	r4 r fis
	e2 dis4
	e2 a4
	a2. 
	g
	fis
	g2 fis4
	g4. fis8 d4
	g8 f4 e8 d4
	c2 r4
	g'4 e8 fis g4
	a4 g8 e4 c8
	f8 g4 d8 e4
	d2 fis4
	g2 d4 
	e2. 
	g4 fis e
	d2 cis4
	d2.
	g,2 c4
	a2 d4
	g4. e8 d4 
	e4 r r
	fis4 e8 fis g4
	a4 fis g
	a4. g8 fis g
	e fis r8 fis e d
	g4 fis8 e4 dis8
	e\breve*3/8
}

tenor=\relative c'{
	g2. ~
	g
	g
	a4 g2 
	fis4 e2
	d2. 
	g
	e2. ~
	e4 d b
	g8 c4 b8 a4
	g2 r4
	g'2 e4 ~
	e c2
	g2. ~
	g
	c2 d4 
	e d b
	c4 a2 
	g2. 
	R1*3/4
	R
	R
	R
	c2.  
	e 
	g
	a2 g4 
	a2. 
	g4 fis2
	e2 r4
	c4 b g
	a8 b4 c8 d4 
	c4 b2 
	a2.
	R1*3/4
	R
	R
	R
	R
	R
	R
	R
	R
	R
	r4 r d
	g,2. ~
	g4 c2
	e4 d c 
	b a2 
	g2.
	g'2.
	a
	e2 fis4
	g fis g
	a g8 fis e4
	d2 r4
	a4 d8 e fis e ~
	e d fis4 g8 fis
	e8 d4 c8 b4
	a\breve*3/8
}


textocantus=\lyricmode{
San -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ cta
Ma -- ri -- _ _ _ _ _ _ _ _ _ _ _ _ a
non est ti -- bi __ _ _ si -- _ mi -- _ _ lis
or -- ta in mun -- _ _ _ _ _ _ _ _ do,
in mu -- li -- e -- _ _ _ _ _ _ _ _ _ _ ri -- _ bus.
Flo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ rens ut
ro -- _ _ _ _ _ _ _ _ _ _ _ _ sa
fra -- _ _ _ _ _ _ _ _ grans
sic -- ut li -- _ _ _ _ _ _ _ _ _ _ _ _ li -- um
o -- ra pro no -- _ _ _ _ _ _ _ _ _ bis
san -- _ cta De -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ i
ge -- ni -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ trix.
}

textoaltus=\lyricmode{
San -- _ _ cta __ _ _ _ _ _ _ _ _ _ 
Ma -- ri -- _ _ _ _ _ _ _ a
non est __ _ _ _ _ _ 
ti -- _ bi si -- _ _ _ _ mi -- _ _ lis, _
or -- ta __ _ _ in mun -- _ _ _ do
in __ _ _ _ _ mu -- _ li -- e -- ri -- bus. __ _ 
Flo -- _ _ rens ut
ro -- _ _ _ sa, fra -- _ _ _ _ _ _ grans
sic -- ut __ _ li -- _ _ _ _ _ _ _ li -- um,
o -- ra pro no -- _ _ _ _ _ bis,
san -- cta De -- _ _ _ _ i
ge -- _ _ _ _ ni -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ trix.
}

textotenor=\lyricmode{
San -- _ cta Ma -- ri -- _ _ _ _ _ _ _ _ _ _ _ _ a
non __ _ _ _ est _
ti -- bi si -- _ _ _ mi -- lis
in __ _ _ mu -- li -- e -- ri -- _ bus.
Flo -- rens ut ro -- _ _ _ _ _ sa.
o -- ra _ pro no -- _ _ _ _ bis,
san -- cta De -- _ _ _ _ _ _ _ _ i
ge -- ni -- _ _ _ _ _ _ _ _ _ _ _ _ trix.
}


\score {\transpose c f {
\new ChoirStaff<<

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

	
	\new Staff << \global
	\new Voice="v2" {
		\set Staff.instrumentName=\markup{\column {"Counter" "  tenor"}}
		\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 }
	>>
	

>>

	}%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=1.5\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
}