\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="HIC VIR DESPICIENS MUNDUM"
	subtitle="in festis Confessorum non Pontificum"
	footer="Editado con LilyPond"
	tagline="Copia: Nancho Alvarez"
	poet = "Transcripción: Samuel Rubio \\\\ (original en claves altas)"
}





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

global=\notes{\key c \major \time 2/2  \skip 1*20
					\time 3/4 \skip 4*3*4
					\time 2/2 \skip 1*10 
					\time 3/4 \skip 4*3*4 \time 2/2
					\skip 1*11  \bar "|."
}

cantus=\notes{
	d'1 |
	e'2 r4 e' |
	f'2 f'4 f' |
	e'2 e' |
%5
	r a' ~ |
	a'4 gis'8 fis' gis'2 |
	a' r4 e' |
	f'2 f'4 f' |
	e'1 |
%10
	e'2 r4 e' ~ |
	\property Staff.noAutoBeaming=##t
	e'8 e' g'4 e' fis' |
	\property Staff.noAutoBeaming=##f
	g' a' f'? e' |
	f'2 e' ~ |
	e' r |
%15
	r4 e'4. e'8 g'4 |
	e'2 r4 e' |
	c'8 d' e' f' g' e' a'4 ~ |
	a' g' a'2 |
	r r4 a' |
%20
	g' f'8 e' f'4 g' |
	a'2 a'4 |
	a'4. a'8 a'4 |
	bes'2 a'4 |
	a'2 g'4 |
%25
	e' a' f' g' |
	a'2. g'8 f' |
	e'4 d' e'2 |
	d' r4 d'' |
	c'' a' b'2 |
%30
	c''4 a' f' g' |
	a'2. g'8 f' |
	e'2 f' |
	e'4 a' f' g' |
	a'1 |
%35
	a'2 a'4 |
	a'4. a'8 a'4 |
	bes'2 a'4 |
	a'2 g'4 |
	e' a' f' g' |
%40
	a'2. g'8 f' |
	e'4 d' e'2 |
	d'2. d''4 |
	c'' a' b'2 |
	c''4 a' f' g' |
%45
	a'2. g'8 f' |
	e'2 f' |
	e'4 a' f' g' |
	a'1 |
	a'
}

altus=\notes{
	r2 d' ~ |
	d'4 cis'8 b cis'2 |
	d' r4 a |
	c' b8 a b4 b |
%5
	a c'2 d'4 |
	e'2 r4 e' |
	e'8 d' c' b a2 |
	f4 d a4. b8 |
	c'2 b |
%10
	r a4. a8 |
	c'4 g a2 |
	b4 c' d' e' ~ |
	e' d' e'8 d' c' b |
	a4 g f2 |
%15
	e1 ~ |
	e |
	r4 e'4. e'8 f'4 |
	d' e' f'2 ~ |
	f' e' |
%20
	r4 d' d'2 |
	e' f'4 |
	e'4. e'8 e'4 |
	g'2 e'4 |
	f'2 d'4 |
%25
	cis' e' d' e' |
	f' e' d'2 |
	r r4 a |
	fis g a bes ~ |
	bes8 a a2 gis4 |
%30
	a2 r |
	R1*4/4 |
	r4 a f8 g a b |
	c' d' e' c' d'4 d' |
	f'2 e' |
%35
	d' f'4 |
	e'4. e'8 e'4 |
	g'2 e'4 |
	f'2 d'4 |
	cis' e' d' e' |
%40
	f' e' d'2 |
	r r4 a |
	fis g a bes ~ |
	bes8 a a2 gis4 |
	a2 r |
%45
	R1*4/4 |
	r4 a f8 g a b |
	c' d' e' c' d'4 d' |
	f'2 e' |
	fis'1
}

tenor=\notes{
	R1*4/4 |
	R1*4/4 |
	r2 a ~ |
	a4 gis8 fis gis2 |
%5
	a r4 a |
	c' b8 a b4 b |
	a e'4. d'8 c' b |
	a2 f |
	g4 a2 gis4 |
%10
	a8 b c' d' e'2 |
	R1*4/4 |
	r4 a4. a8 c'4 |
	a b c' a8 b |
	c' d' e'2 d'4 |
%15
	e' c'2 b8 a |
	b4 c' b2 |
	a4 c'4. c'8 d'4 |
	b c' f d8 e |
	f d d'2 cis'4 |
%20
	d'1 |
	cis'2 d'4 |
	cis'4. cis'8 cis'4 |
	d'2 cis'4 |
	d' c' bes |
%25
	a2 r |
	r4 c' a b |
	cis' d'2 cis'4 |
	d'1 |
	r2 r4 e' ~ |
%30
	e' c' d' e' ~ |
	e'8 d' c' b c' a d'4 ~ |
	d' cis' d'2 |
	r4 c' a b |
	c' d'2 cis'4 |
%35
	d'2 d'4 |
	cis'4. cis'8 cis'4 |
	d'2 cis'4 |
	d' c' bes |
	a2 r |
%40
	r4 c' a b |
	cis' d'2 cis'4 |
	d'1 |
	r2 r4 e' ~ |
	e' c' d' e' ~ |
%45
	e'8 d' c' b c' a d'4 ~ |
	d' cis' d'2 |
	r4 c' a b |
	c' d'2 cis'4 |
	d'1
}

bassus=\notes{
	R1*4/4 |
	R1*4/4 |
	d1 |
	e2 r4 e |
%5
	f2 f4 f |
	e1 |
	a,2 r4 a, |
	d2 d4 d |
	c4. d8 e2 |
%10
	a,4 a4. a8 c'4 |
	a b c'4. b16 a |
	g4 f8 e d4 a, |
	r2 r4 a, ~ |
	\property Staff.noAutoBeaming=##t
	a,8 a, c4 a, b, |
	\property Staff.noAutoBeaming=##f
%15
	c a,8 b, c d e f |
	g e a2 gis4 |
	a2 r |
	r r4 a ~ |
	\property Staff.noAutoBeaming=##t
	a8 a bes4 g a |
	\property Staff.noAutoBeaming=##f
%20
	bes1 |
	a2 d4 |
	a4. a8 a4 |
	g2 a4 |
	d f g |
%25
	a2 r |
	r4 a f g |
	a bes a2 |
	d4 g fis g |
	a f e2 |
%30
	a, r |
	a f4 g |
	a2 d |
	r4 a d g |
	f4. g8 a2 |
%35
	d d4 |
	a4. a8 a4 |
	g2 a4 |
	d f g |
	a2 r |
%40
	r4 a f g |
	a bes a2 |
	d4 g fis g |
	a f e2 |
	a, r |
%45
	a f4 g |
	a2 d |
	r4 a d g |
	f4. g8 a2 |
	d1
}

textocantus=\lyrics{
Hic vir, de -- spi -- ci -- ens mun -- dum,
hic _ _ _ _ vir,
de -- spi -- ci -- ens
mun -- dum
et _ ter -- re -- na,
tri -- um -- _ _ _ _ phans, _
et ter -- re -- na,
tri -- um -- _ _ _ _ _ _ _ _ phans,
tri -- um -- _ _ _ _ phans,
di -- vi -- ti -- as cae -- lo con -- fi -- dit
o -- re et ma -- _ _ _ _ _ nu,
o -- re et ma -- nu,
o -- re et ma -- _ _ _ _ nu,
o -- re et ma -- nu,
di -- vi -- ti -- as cae -- lo con -- di -- dit
o -- re et ma -- _ _ _ _ _ nu,
\italicas
o -- re et ma -- nu,
\rectas
o -- re et ma -- _ _ _ _ nu,
\italicas
o -- re et ma -- nu.
}

textoaltus=\lyrics{
Hic _ _ _ _ vir,
de -- spi -- _ _ _ ci -- ens mun -- _ dum,
de -- spi -- _ _ _ _ ci -- ens mun -- _ _ dum
et ter -- re -- na,
tri -- um -- _ _ _ _ _ phans, _ _ _ _ tri -- um -- phans, _
et ter -- re -- na,
tri -- um -- _ phans,
tri -- um -- phans,
di -- vi -- ti -- as cae -- lo con -- di -- dit o -- re et ma -- _ nu,
o -- re et ma -- _ _ _ _ _ nu,
o -- re _ _ _ _ _ _ _ _ et ma -- _ nu,
di -- vi -- ti -- as cae -- lo con -- di -- dit
o -- re et ma -- _ nu,
o -- re et ma -- _ _ _ _ _ nu,
o -- re _ _ _ _ _ _ _ _ et ma -- _ nu.
}

textotenor=\lyrics{
Hic _ _ _ _ vir,
de -- spi -- _ _ _ ci -- ens mun -- _ _ _ _ _ _ _ _ dum _ _ _ _ 
et ter -- re -- na,
tri -- um -- _ _ _ _ _ _ phans,
tri -- _ _ _ _ um -- phans,
et ter -- re -- na,
tri -- um -- _ _ _ _ _ _ _ phans,
di -- vi -- ti -- as cae -- lo con -- _ di -- dit
o -- re et ma -- _ _ nu,
o -- _ re et ma -- _ _ _ _ _ _ _ _ _ nu,
o -- re et ma -- _ _ nu,
di -- vi -- ti -- as cae -- lo con -- _ di -- dit
o -- re et ma -- _ _ nu,
o -- _ re et ma -- _ _ _ _ _ _ _ _ _ nu,
o -- re et ma -- _ _ nu.
}

textobassus=\lyrics{
Hic vir,
de -- spi -- ci -- ens mun -- dum,
\italicas
de -- spi -- ci -- ens mun -- _ _ dum
\rectas
et ter -- re -- na,
tri -- um -- _ _ _ _ _ _ phans,
et _ ter -- re -- na,
tri -- um -- _ _ _ _ _ _ _ _ _ _ phans,
\italicas
et _ ter -- re -- na, tri -- um -- phans,
\rectas
di -- vi -- ti -- as cae -- lo con -- _ di -- dit
o -- re et ma -- _ _ nu,
o -- re et ma -- _ _ nu,
o -- re et ma -- nu,
\italicas
o -- re et ma -- _ _ nu,
\rectas
di -- vi -- ti -- as cae -- lo con -- _ di -- dit
o -- re et ma -- _ _ nu,
\italicas
o -- re et ma -- _ _ nu,
\rectas
o -- re et ma -- nu,
o -- re et ma -- _ _ nu.
}


\score{
	\context ChoirStaff <
		\addlyrics
		\context Staff = "v1"<
			\property Staff.instrument="Cantus  "
			\global
			\clef	treble
			\cantus
		>
		\context Lyrics="l1" \textocantus

		\addlyrics
		\context Staff = "v2"<
			\property Staff.VerticalExtent = #'(0 . 0)
			\property Staff.instrument="Altus  "
			\global
			\clef "G_8"
			\altus
		>
		\context Lyrics="l2" \textoaltus


		\addlyrics
		\context Staff = "v3"<
			\property Staff.VerticalExtent = #'(0 . 0)
			\property Staff.instrument="Tenor  "
			\global
			\clef "G_8"	
			\tenor
		>
		\context Lyrics="l3" \textotenor


		\addlyrics
		\context Staff ="v4"<
			\property Staff.instrument="Bassus  "
			\global
			\clef bass
			\bassus
		>
		\context Lyrics="l4" \textobassus
	>



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

}



%\midi {\tempo 4 = 120}


}