\version "1.4.12"
\include "paper16.ly"

italicas=\property Lyrics . LyricText \override #'font-shape = #'italic
rectas=\property Lyrics . LyricText \override #'font-shape = #'upright


\header{
	composer="Tomás Luis de Victoria\\\\ \\ \\\\ \\ "
	title="FALSOBORDONE QUARTI TONI\\\\ \\ "
	subtitle="Munich. Bayerische Staatsbibliothek, \\emph{Mus. Ms. 89} \\\\ \\ \\\\ \\ \\\\ \\ \\\\ \\ "
	footer="Editado con LilyPond"
	tagline="Copia: Nancho Alvarez"
	poet = "Transcripción: Eugene C. Cramer"
}





%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%5

global=\notes{\key c \major \time 2/2  \skip 4*8 \bar "|" 
					\skip 4*10 \bar "||"
					\skip 4*8 \bar "|"
					\skip 4*16 \bar "|."
}

cantus=\notes{
	<a'\breve 
	{s1.  c''2}>
	b'2 e'4 a'2
	gis'?4 a'1 
%5
	a'\breve 
	a'2
	b' c''4 a'
	d''4. c''16 b' c''8 b' b'2
%10
	a'4 b'1
}

altus=\notes{
	e'\breve 
	e'2 e'
	e' e'1
%5
	f'\breve 
	e'2
	e'2. f'4
	d'2 e'4. d'8
%10
	c'2 b1
}

tenor=\notes{
	a\breve
	gis2 a
	b a1
%5
	a\breve 
	a2
	g a 
	b g 
%10
	e2 ~ 
	e1
}

tenordos=\notes{
	<c'\breve 
	{s1. a2}> 
	b2 a4 
	e'4. d'8 b4 cis'1 
%5
	d'\breve
	c'2
	b a
	g2. e4
%10
	a2 gis1 
	
}

bassus=\notes{
	a,\breve ~
%	a,
	e4. d8 c4 a,
	e2 a,1 
%5
	d\breve 
	a,2
	e4. d8 c a, d4
	g, g e2
%10
	a, e1
}


\score{
	\context ChoirStaff <
		\context Staff = "v1"<
			\property Staff.TimeSignature \override #'molecule-callback = #'()
			\property Score.timing = ##f

			\property Staff.instrument="Cantus   "
			\global
			\clef	treble
			\cantus
		>



		\context Staff = "v2"<
			\property Staff.TimeSignature \override #'molecule-callback = #'()
			\property Score.timing = ##f

			\property Staff.instrument="Altus   "
			\global
			\clef treble	
			\altus
		>




		\context Staff = "v3"<
			\property Staff.TimeSignature \override #'molecule-callback = #'()
			\property Score.timing = ##f

			\property Staff.instrument="Tenor I  "
			\global
			\clef "G_8"	
			\tenor
		>


		\context Staff = "v5"<
			\property Staff.TimeSignature \override #'molecule-callback = #'()
			\property Score.timing = ##f

			\property Staff.instrument="Tenor II  "
			\global
			\clef "G_8"	
			\tenordos
		>



		\context Staff ="v4"<
			\property Staff.TimeSignature \override #'molecule-callback = #'()
			\property Score.timing = ##f

			\property Staff.instrument="Bassus  "
			\global
			\clef bass
			\bassus
		>
	>



\paper {
	linewidth=19.0 \cm
	interscoreline= 0.0 \cm
	interscorelinefill= 1.0
	textheight= 23.0 \cm
	pagenumber=no
%	\translator { \LyricsContext LyricText \override #'font-relative-size = #1 }
%	\translator { \HaraKiriStaffContext }
	\translator { \ScoreContext BarNumber \override #'padding = #2 }

}



%\midi {\tempo 4 = 120}


}