\version "2.12.3"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.5)
#(ly:set-option 'point-and-click #f)

ss=\once \set suggestAccidentals = ##t
cresc=\markup{\italic "cresc."}
dim=\markup{\italic "dim."}
rit=\markup{\italic "rit."}
italicas=\override LyricText #'font-shape = #'italic
rectas=\override LyricText #'font-shape = #'upright


htitle="Epitafio para la sepultura de Dulcinea"
hcomposer="Halffter"

\header {
	title=\markup{\fontsize #3 "Tres epitafios" }
	subtitle="2. Para la sepultura de Dulcinea"
	composer="Rodolfo Halffter (1900-1987)"
	poet="Miguel de Cervantes"
	opus="Op. 17" % 1957
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

#(define ((custom-time-signature one two three four) grob)
   (grob-interpret-markup grob
                          (markup #:override '(baseline-skip . 0) #:number
                                  (#:line ((#:column (one two))
                                           (#:column (three four)))))))



global={\key f \major 
	\override Score.TimeSignature #'stencil = #(custom-time-signature "6" "8" "3" "4")
	\time 6/8 \partial 8 \skip 8 \skip 1*3/4*11 
	\revert Score.TimeSignature #'stencil
	\time 2/4
	\skip 2 \time 3/4
	\skip 2. \bar "||" 
	\override Score.TimeSignature #'stencil = #(custom-time-signature "6" "8" "3" "4")
	\time 6/8 
	\skip 1*3/4*11 \time 2/4
	\revert Score.TimeSignature #'stencil
	\skip 2 \time 3/4
	\skip 2 \skip 8 \bar ":|" }


cantus=\relative c'{
	\dynamicUp
	\once \override Score.MetronomeMark #'X-offset = #-10
	\once \override Score.MetronomeMark #'padding = #4
	\tempo \markup{\fontsize #-1.5 \raise #.4 \note #"8" #1 "= 160  (" \fontsize #-1.5 \raise #.4 \note #"8" #1 "=" \raise #.4 \fontsize #-1.5 \note #"8" #1 " sempre)"}
	f8^\p
	a a a4 g8 f
	g4 f r8 f
	g\< g e a a f
	bes4^\mf a \breathe a8\< a
	d^\f d d4 c8 c
	bes8[ ~ \times 2/3{bes16 c bes]} a4 r8 a^\p
	f f f f4 f8
	f8[ e] f4 r8 a
	f f f f4 f8
	f8[ e] f4 r
	r2 a8^\f a
	g2^\markup{\italic "senza rit."}
	fis2^\fermata r4 
	\override Score.RehearsalMark #'self-alignment-X = #right
	\override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
	\override Score.RehearsalMark #'padding = #1.5
	\mark \markup{"Fine"}
	d'8^\markup{\column{\large "Soprano solo" \dynamic mf}} e d cis b cis
	d8[ ~ \times 2/3{d16 e d]} cis4 r8 cis
	b4 b8 a a a
	g8[ ~ \times 2/3{g16 a g]} fis4 r
	r4. d'4.^\markup{\column{\large "Tutti" \concat {"(" \dynamic "p" ")"}}}
	b4 a? \breathe d8^\f b!
	cis4 e4 d8 cis
	b4 a \breathe d8 b!
	cis4 e4 d8 cis
	b4 a r
	r2 cis8^\f cis
	b2^\markup{\italic "senza rit."}
	a2^\fermata r8 
}

altus=\relative c'{
	\dynamicUp
	d8^\p
	f8 f f4 ees8 c
	f8[ e?] d4 r8 d
	d\< d c e e d
	a'8[^\mf g] e4 \breathe e8\< e
	d^\f a' g4 g8 f
	f4 e r8 a,^\p
	d d d ees4 d8
	c4 c r8 a
	d d d ees4 d8
	c4 c r
	r2 f8^\f f
	f4( e?)
	d2^\fermata r4
	<<
	{\voiceOne
	\once \override TextScript #'extra-offset = #'(0 . -2)
	fis'4.^\markup{\dynamic p \italic " (accompagnando)"} e
	fis4 e r
	d4. cis
	b4 ais
	}
	\new Voice {\voiceTwo
	\once \override TextScript #'extra-offset = #'(3.1 . -3.0)
	b4.^\markup{\smaller "(sopranos)"} fis
	b4 fis r
	g4. d
	e4 fis
	}
	>>
	\oneVoice
	r4
	r4. fis4.^\markup{\concat {"(" \dynamic "p" ")"}}
	gis4 a \breathe fis8^\f gis!
	a4 fis4 fis8 fis
	a[ gis] a4 \breathe fis8 gis!
	a4 fis4 fis8 fis
	a[ gis] a4 r
	r2 a8^\f a
	a4( gis)
	e2^\fermata r8
}

tenor=\relative c'{
	\dynamicUp
	d8^\p
	d d d4 bes8 a
	c4 a r8 a
	b8\< b a c c bes
	d4^\mf cis \breathe cis8\< cis
	d^\f f f4 e8 e
	d4 cis r8 a^\p
	a a a a4 bes8
	g4 a r8 a
	a a a a4 bes8
	g4 a \breathe f8^\markup{\concat {"(" \dynamic "p" ")"}} f
	f4 f c'8^\f c
	c2
	a2^\fermata r4
	R1*3/4*3
	\once \override TextScript #'padding = #1.5
	r2^\markup{\large "            Tenor solo"} r8 fis^\mf
	b8 b b4 cis8 d
	e8[ \times 2/3{d16 e d]} cis4 \breathe d8^\markup{\column{\large "Tutti" \dynamic f }} e
	a,4 ais4 b8 d
	e4 cis \breathe d8 e
	a,4 ais b8 d
	e4 cis \breathe a8^\p a
	a4 a \breathe e'8^\f e
	e2 
	cis2^\fermata r8
}

bassus=\relative c{
	\dynamicUp
	d^\p
	d c bes4 ees8 f
	c4 d r8 d
	g\< g a a a bes
	g4^\mf a4 \breathe a8\< a
	f^\f bes c4 a8 bes
	g4 a r8 cis,^\p
	d8 d d c?4 bes8
	c4 f, r8 cis'
	d8 d d c?4 bes8
	c4 f, \breathe f8^\markup{\concat {"(" \dynamic "p" ")"}} f
	f4 f f'8^\f f
	c2
	d2^\fermata r4
	R1*3/4*9
	r2 a8^\p a
	a4 a \breathe a'8^\f a
	e2
	a^\fermata r8
}


textocantus=\lyricmode{
Re -- po -- sa~a -- quí Dul -- ci -- ne -- a;
y, aun -- que de car -- nes ro -- lli -- za,
la vol -- vió en pol -- voy~y ce -- ni -- za
la muer -- te~es -- pan -- ta -- ble~y
fe -- a,
la muer -- te~es -- pan -- ta -- ble~y fe -- a.
¡Dul -- ci -- ne -- a!
Fue de cas -- ti -- za ra -- le -- a,
y tu -- vo~a -- so -- mos de da -- ma.
¡Ah, ah, ah!
y fue glo -- ria de su~al -- de -- a,
y fue glo -- ria de su~al -- de -- a.
¡Dul -- ci -- ne -- a!
}

textoaltus=\lyricmode{
Re -- po -- sa~a -- quí Dul -- ci -- ne -- a;
y, aun -- que de car -- nes ro -- lli -- za,
la vol -- vió en pol -- voy~y ce -- ni -- za
la muer -- te~es -- pan -- ta -- ble~y
fe -- a,
la muer -- te~es -- pan -- ta -- ble~y fe -- a.
¡Dul -- ci -- ne -- a!
¡Ah, ah, ah, ah!
¡Ah, ah, ah, ah!
¡Ah, ah, ah!
y fue glo -- ria de su~al -- de -- a,
y fue glo -- ria de su~al -- de -- a.
¡Dul -- ci -- ne -- a!
}

textotenor=\lyricmode{
Re -- po -- sa~a -- quí Dul -- ci -- ne -- a;
y, aun -- que de car -- nes ro -- lli -- za,
la vol -- vió en pol -- voy~y ce -- ni -- za
la muer -- te~es -- pan -- ta -- ble~y
fe -- a,
la muer -- te~es -- pan -- ta -- ble~y fe -- a.
¡Dul -- ci -- ne -- a!
¡Dul -- ci -- ne -- a!
Del gran Qui -- jo -- te fue lla -- ma, 
y fue glo -- ria de su~al -- de -- a,
y fue glo -- ria de su~al -- de -- a.
¡Dul -- ci -- ne -- a!
¡Dul -- ci -- ne -- a!
}

textobassus=\lyricmode{
Re -- po -- sa~a -- quí Dul -- ci -- ne -- a;
y, aun -- que de car -- nes ro -- lli -- za,
la vol -- vió en pol -- voy~y ce -- ni -- za
la muer -- te~es -- pan -- ta -- ble~y
fe -- a,
la muer -- te~es -- pan -- ta -- ble~y fe -- a.
¡Dul -- ci -- ne -- a!
¡Dul -- ci -- ne -- a!
¡Dul -- ci -- ne -- a!
¡Dul -- ci -- ne -- a!	
}



\score {
\new ChoirStaff<<

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

	
	\new Staff << \global
	\new Voice="v2" {
		\set Staff.instrumentName="Alto "
		\clef "treble" 
		\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 }
	>>
	

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

\layout{ 
	\context {\Lyrics \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 0) }
	\context {\Score 
		\override BarNumber #'padding = #2 
		\override TimeSignature #'break-visibility = ##(#f #t #t)
	}
	\context {\Lyrics 
		%\override LyricText #'font-size = #2 
		\override LyricHyphen #'minimum-distance = #0.51
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		autoBeaming = ##f
	}
	%\context { \RemoveEmptyStaffContext }
	\context {\Staff 
		\consists Ambitus_engraver 
		\override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 5)
	}
}

%\midi {}

}


\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=6
	line-width=19.0\cm
	between-system-padding = 0
	ragged-last-bottom = ##f
	foot-separation = 5\mm
	%head-separation = 4\mm
}