\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="Ralph Vaugham Williams (1872-1958) \\\\ Arr. E. Harold Geer"
	title="THE CALL \\\\ \\ "
	subtitle=""
	footer="Editado con LilyPond"
	tagline="Copia: Nancho Alvarez"
	poet = "Texto: George Herbert (1593-1633)"
}





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

global=\notes{\key f \major \time 6/4  \skip 1*6/4*10 \bar "|."
}

cantus=\notes{
	r2 r4 f'2 a'4 |
	c''2 c''4 d''( )c'' bes' |
	c''2. f'2 a'4 |
	c''2 c''4 d''( )c'' bes' |
%5
	c''2. <c''2 ees''> <c''4 ees''> |
	<bes'2 d''> <bes'4 d''> <g'2 c''> <g'4 bes'> |
	c''2. bes'2 bes'4 |
	a'2 a'4 g'( a' bes' |
	a' g' f' )g'2 g'4 |
%10
	f'1.
}

altus=\notes{
	r2 r4 d'2 d'4 |
	ees'2 ees'4 f'2 f'4 |
	f'2( )ees'4 d'2 d'4 |
	ees'2 ees'4 f'2 f'4 |
%5
	f'2( )ees'4 aes'2 g'4 |
	g'2 f'4 f'( )ees' d' |
	f'2. g'2 g'4 |
	f'2 f'4 d'2.( ~ |
	d' )ees'2 d'4 |
%10
	c'1.
}

tenor=\notes{
	r2 r4 f2 f4 |
	g2 g4 bes2 bes4 |
	g2. f2 f4 |
	g2 g4 bes2 bes4 |
%5
	g2. c'2 c'4 |
	d'2 d'4 g2 g4 |
	a2. ees'2 d'4 |
	c'2 c'4 bes2. ~ |
	bes c' |
%10
	bes2. a 
}

bassus=\notes{
	r2 r4 d2 d4 |
	c2 c4 bes,2 bes,4 |
	c2. d2 d4 |
	c2 c4 bes,2 bes,4 |
%5
	c2. aes,2 aes,4 |
	bes,2 bes,4 c2 g4 |
	f2. ees2 ees4 |
	f2 f4 g2. ~ |
	g c |
%10
	f1.
}

textocantus=\lyrics{
<
{
Come, my Way, my Truth, my Life:
Such a way as gives us breath,
Such a truth as ends all strife,
Such a life as kil -- leth death.
}
\context Lyrics \lyrics{
Come, my Light, my Feast, my Strength:
Such a light as shows a feast,
Such a feast as mends in length,
Such a strength as makes his guest.
}
\context Lyrics \lyrics{
Come, my Joy, my Love, my Heart:
Such a joy as none can move,
Such a love as none can part,
Such a heart as joys in love.
}
>
}

textoaltus=\lyrics{
<
{
Come, my Way, my Truth, my Life:
Such a way as gives us breath,
Such a truth as ends all strife,
Such a life as kil -- leth death.
}
\context Lyrics \lyrics{
Come, my Light, my Feast, my Strength:
Such a light as shows a feast,
Such a feast as mends in length,
Such a strength as makes his guest.
}
\context Lyrics \lyrics{
Come, my Joy, my Love, my Heart:
Such a joy as none can move,
Such a love as none can part,
Such a heart as joys in love.
}
>

}

textotenor=\lyrics{
<
{
Come, my Way, my Truth, my Life:
Such a way as gives us breath,
Such a truth as ends all strife,
Such a life as kil -- leth death.
}
\context Lyrics \lyrics{
Come, my Light, my Feast, my Strength:
Such a light as shows a feast,
Such a feast as mends in length,
Such a strength as makes his guest.
}
\context Lyrics \lyrics{
Come, my Joy, my Love, my Heart:
Such a joy as none can move,
Such a love as none can part,
Such a heart as joys in love.
}
>

}

textobassus=\lyrics{
<
{
Come, my Way, my Truth, my Life:
Such a way as gives us breath,
Such a truth as ends all strife,
Such a life as kil -- leth death.
}
\context Lyrics \lyrics{
Come, my Light, my Feast, my Strength:
Such a light as shows a feast,
Such a feast as mends in length,
Such a strength as makes his guest.
}
\context Lyrics \lyrics{
Come, my Joy, my Love, my Heart:
Such a joy as none can move,
Such a love as none can part,
Such a heart as joys in love.
}
>
}


\score{
	\context ChoirStaff <
		\property Score.automaticMelismata=##t
		\addlyrics
		\context Staff = "v1"<
			\property Staff.instrument="Soprano   "
			\global
			\clef	treble
			\cantus
		>
		\context Lyrics="l1" \textocantus


		\addlyrics
		\context Staff = "v2"<
			\property Staff.instrument="Contralto   "
			\global
			\clef treble	
			\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="Bajo  "
			\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}


}