\version "2.18.0"

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

ss=\once \set suggestAccidentals = ##t
htitle="Pues a Dios humano vemos"
hcomposer="Anonimo"

\header {
	title=\markup{\fontsize #3 "Pues a Dios humano vemos" }
	subtitle="Cancionero de Belém"
        subsubtitle=\markup{\null \vspace #1 }
	composer="Anónimo (siglo XVI)"
        pdfauthor=\composer
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
	tagline=""
}

global={\key g \major \time 4/4 \skip 1*5 \time 3/4 \skip 2. \break 
				\time 4/4 \bar ".|:-||" \skip 1*4 \bar ":|." }


cantus={
	b4.^\markup{\smaller \smaller "(Esta voz en silencio la primera vez)"} b8 c'4 c'8 b |
	d'4 d'8 d' d' f' ~ f'16[ e' c' d'] |
	e'4. e'8 a4 e' |
	d' d'8 d' d' f' ~ f'16[ e' c' d'] |
%5
	e'4. e'8 a4 e' |
	d' d'8 d' r4
	\override Score.TimeSignature.break-visibility = ##(#f #t #t)
	\override Score.RehearsalMark.break-visibility = ##(#t #t #f)
        \override Score.RehearsalMark.self-alignment-X = #right
	\mark \markup{\center-column {"        FINE" \smaller \smaller \smaller \smaller "(y D.C. con tenor I)"}}
	R1*4/4 |
	R1*4/4 |
	R1*4/4 |
%10
	R1
	\mark \markup {"D.C."}
}

altus={
	g4. g8 g4 g8 g |
	a4 b8 b d'4 c' |
	c'8[ b16 a] b8. c'16 d'4 b8[ c'] |
	a4 g8 g d'4 c' |
%5
	c'8[ b16 a] b8. c'16 d'4 b8[ c'] |
	a4 g8 g r4 
	g a b4. b8 
	c'4 c'8 g a4 a 
	r8 d' d'4 e'8.[ d'16] c'8 b 
	a[ g] a4 g r 
}

tenor={
	d4. d8 e8. d16 e[ fis g8] ~ |
	g fis g g b a4 a8 ~ |
	a[ g16 fis] g8. e16 fis[ g a8] ~ a16[ g] g8 ~ |
	g fis g g b a4 a8 ~ |
%5
	a[ g16 fis] g8. e16 fis[ g a8] ~ a16[ g] g8 ~ |
	g fis g g r4 
	g4. fis8 g4. g8 
	e8.[ d16] e[ fis] g4 fis16[ e] fis4 
	r8 a b16[ c'8 b16] c'8.[ b16] a8 g 
	fis g4 fis8 g4 r   
}

bassus={
	g,4. g,8 c8. b,16 c[ d e8] |
	d4 g,8 g, g f4 f8 |
	e4. e8 d4 e8[ c] |
	d4 g,8 g, g f4 f8 |
%5
	e4. e8 d4 e8[ c] |
	d4 g,8 g, r4 
	g, d g,4. g,8 
	c4 c8 e d4 d 
	r8 d g4 c4. c8 
	d b, c[ d] g,4 r 
}


textocantus=\lyricmode{
Pues a Dios hu -- ma -- no ve -- mos,
ve -- nid __ _ _ _ _ _ 
a -- do -- rar -- le e -- mos,
ve -- nid __ _ _ _ _ _ 
a -- do -- rar -- le e -- mos.
}
textocantusb=\lyricmode{
I por Dios le con -- fes -- se -- mos,
}

textoaltus=\lyricmode{
Pues a Dios hu -- ma -- no ve -- mos,
ve -- nid,
ve -- _ _ nid a -- do -- rar -- _ le e -- mos,
ve -- nid,
ve -- _ _ nid a -- do -- rar -- _ le e -- mos.
Ve -- nid a -- do -- rar el chi -- qui -- to
i gram Dios __ _ de lo cri -- _ a -- do,
}
textoaltusb=\lyricmode{
I por Dios le con -- fes -- se -- mos,
"  " _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 
pues __ _ qui -- so ser hu -- ma -- na -- do
pera~a -- le -- grar __ _ nues -- tro spi -- _ ri -- to.
}

textotenor=\lyricmode{
Pues a Dios hu -- ma -- _ _ _ no ve -- mos,
ve -- nid,
ve -- _ _ _ nid a -- do -- _ _ _ _ rar -- _ le e -- mos,
ve -- nid,
ve -- _ _ _ nid a -- do -- _ _ _ _ rar -- _ le e -- mos.
Ve -- nid a -- do -- rar __ _ el __ _ chi -- qui -- _ to
i gram __ _ _ Dios __ _ de lo cri -- a -- _ do,
}
textotenorb=\lyricmode{
I por Dios __ _ le __ _ con -- _ fes -- se -- mos,
"  " _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 
pues __ _ qui -- so ser __ _ hu -- _ ma -- na -- _ do
pera~a -- le -- _ _ grar __ _ nues -- tro spi -- _ ri -- to.
}

textobassus=\lyricmode{
Pues a Dios hu -- ma -- _ _ no ve -- mos,
ve -- nid, ve -- nid 
a -- do -- rar -- _ le e -- mos,
ve -- nid,
ve -- nid a -- do -- rar -- _ le e -- mos.
Ve -- nid a -- do -- rar el chi -- qui -- to
i gram Dios de lo cri -- a -- _ do,
}
textobassusb=\lyricmode{
I por Dios __ _ le __ _ con -- fes -- se -- mos,
"  " _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 
pues __ _ qui -- so ser hu -- ma -- na -- do
pera~a -- le -- grar nues -- tro spi -- ri -- _ to.
}



\score {
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName="(Tenor I) " 
		\clef "G_8"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	\new Lyrics \lyricsto "v1" {\textocantusb }
	>>

	
	\new Staff << \global
	\new Voice="v2" {
		\set Staff.instrumentName="Tenor II "
		\clef "G_8" 
		\altus}
	\new Lyrics \lyricsto "v2" {\textoaltus }
	\new Lyrics \lyricsto "v2" {\textoaltusb }
	>>

	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName="Bajo I "
		\clef "bass"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	\new Lyrics \lyricsto "v3" {\textotenorb }
	>>
	

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

\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 . 12) (minimum-distance . 0) (padding . 1))
		\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\markup{\bold "Nota: " \smaller "La obra se ejecuta dos veces sin interrupción (al llegar a FINE se vuelve a empezar). El tenor I solo canta la segunda vez."} %notablet

\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 = 1
	ragged-last-bottom = ##f
	indent=1.8\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 . 6) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
       score-markup-spacing.basic-distance = #10
}