\version "2.18.0"

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

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
mtempo={\tempo 4 = 90}
mtempob={\tempo 4 = 45}
mtempoc={\tempo 4 = 180}
pf=\markup{\hspace #-2 \fontsize #-2 \line{"(" \dynamic{"f"} ")"}}
parp=\markup{\hspace #-2 \fontsize #-2 \line{"(" \dynamic{"p"} \hspace #-0.3 ")"}}

htitle="4. Gratia agimus - 5. Propter magnam"
hcomposer="Vivaldi"

\header {
	title=\markup{\fontsize #2 \center-column{"4. Gratias agimus tibi" "5. Propter magnam gloriam"}}
	subtitle=\markup{\vspace #2 "del Gloria RV 589"}
%	subsubtitle=\markup{\null \vspace #1 }
	composer="Antonio Vivaldi (1678-1741)"
        pdfauthor=\composer
	%opus="(-)"
	%poet=\markup{}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={
 %\set Score.currentBarNumber = #290
 \compressFullBarRests
 \override Score.TimeSignature.break-visibility=#end-of-line-invisible
 \key g \major \time 4/4 \skip 1*6 \bar "||" \break
 \set Score.currentBarNumber = #1
               \time 4/2 \skip 1*4/2*19 \bar "|."
}


cantus=\relative c''{
	\dynamicUp
	\override Score.MetronomeMark.X-offset = #4
	\tempo \markup{"Adagio"} 4=90
	b2^\pf b4 b
	c2 c4 c
	cis2 \mtempob cis^\fermata
	\mtempo
	dis2 dis4 dis
	e2 e4 e
	dis2 \mtempob dis^\fermata
	\tempo \markup{"Allegro"} 4 = 180
	\once \override TextScript.X-offset = #-3.3
	s4*0^\markup{\fontsize #-4 \musicglyph #"timesig.C22"}
	b4
	\once \override TextScript.X-offset = #-4
	 b^\pf b b e2 ~ e8 d e fis % d!
	e8 d e fis e g fis e dis4. cis8 b2
	R1*4/2*2
	b4 b b b e2 ~ e8 d e f 
	e d e f e d c b c4. b8 a2
	R1*4/2
	cis4 cis cis cis d2 ~ d8 cis d e 
	d cis d e d cis b ais b4. b8 b2
	b4 b b b \ss a!1
	g2 g fis fis
	R1*4/2
	r1 e'4 e e e
	dis4 b8 cis d2 cis4 a8 b c4 b
	a4 b cis dis e1
	dis2 e dis e
	dis1 e2 e
	\slurDashed
	e1( dis)
	e\breve^\fermata
}

altus=\relative c''{
	\dynamicUp
	g2^\pf g4 g
	g2 g4 g
	g2 g^\fermata
	fis2 fis4 fis
	fis2 fis4 fis
	fis2 fis^\fermata
	R1*4/2
	e4^\pf e e e b'2 ~ b8 a b c
	b a b c b a g fis g4. fis8 e2
	g4 g g g fis4. fis8 fis2
	fis2 fis r1
	gis4 gis gis gis e4. e8 e2
	e4 e e e a2 ~ a8 g a b 
	a g a b a g fis e fis4. e8 d2
	r1 fis4 fis fis fis 
	g1 ~ g2 fis ~
	fis e e dis
	r1 b'4 b b b
	ais4 fis8 gis a2 gis4 e8 fis g2
	fis!4 d8 e f2 e1 ~
	e4 dis e fis g1
	fis2 g fis g
	fis b g \slurDashed fis4( e)
	fis\breve
	gis\breve^\fermata
	
}

tenor=\relative c'{
	\dynamicUp
	b2^\pf b4 b
	e2 e4 e
	e2 e^\fermata
	b2 b4 b
	cis2 cis4 cis
	b2 b^\fermata
	R1*4/2*2
	b4^\pf b b b e2 ~ e8 d e fis
	e d e fis e g fis e dis4. cis8 b2
	dis4 dis dis dis b4. b8 b2
	b4 b b e c2 ~ c8 b c d
	c b c d c b a g a4. g8 fis2
	e'4 e \ss cis cis \ss ais4. ais8 ais2 % ricordi: la natural
	ais2 ais4 ais fis2 fis
	d'4 d d d \slurDashed e2( fis)
	d e c b
	e4 e e e dis4 b8 cis d2
	cis4 a8 b c2 b cis
	fis, b e, a4 b
	c2 a b1
	b1 b
	b\breve ~
	b
	b^\fermata
}

bassus=\relative c{
	\dynamicUp
	e2^\pf e4 e
	e2 e4 e
	a2 a^\fermata
	a2 a4 a
	ais2 ais4 ais
	b2 b^\fermata
	R1*4/2*3
	e,4^\pf e e e b'2 ~ b8 a b c
	b8 a b c b a g fis g4. fis8 e2
	e4 e e e a2 ~ a8 g a b
	a g a b a g fis e fis4. e8 d2
	a4 a a a fis'2 ~ fis8 e fis g
	fis8 e fis g fis e d \ss cis d4. cis8 b2
	b4 b b b \slurDashed c!2( d)
	b c a b
	r2 e4 e b2 b
	fis'2 dis2 e ais,
	b gis a a'4 \ss g!
	fis1 e4 fis g a
	b,\breve
	b1 b
	b\breve
	e\breve^\fermata
}

textocantus=\lyricmode{
Gra -- ti -- as a -- gi -- mus ti -- bi,
gra -- ti -- as a -- gi -- mus ti -- bi.
Pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- ri -- am tu -- am
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ri -- am tu -- am.
}

textoaltus=\lyricmode{
Gra -- ti -- as a -- gi -- mus ti -- bi,
gra -- ti -- as a -- gi -- mus ti -- bi.
Pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am
pro -- pter ma -- gnam glo -- ri -- am tu -- am
pro -- pter ma -- gnam glo -- ri -- am,
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am
pro -- pter ma -- gnam glo -- ri -- am tu -- am
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ri -- am __ tu -- am.
}

textotenor=\lyricmode{
Gra -- ti -- as a -- gi -- mus ti -- bi,
gra -- ti -- as a -- gi -- mus ti -- bi.
Pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- ri -- am,
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- ri -- am,
glo -- ri -- am tu -- am,
pro -- pter ma -- gnam glo -- ri -- am tu -- am,
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ri -- am tu -- am.
}

textobassus=\lyricmode{
Gra -- ti -- as a -- gi -- mus ti -- bi,
gra -- ti -- as a -- gi -- mus ti -- bi.
Pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ ri -- am,
pro -- pter ma -- gnam glo -- ri -- am tu -- am
pro -- pter ma -- gnam glo -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ ri -- am tu -- am.
}



\score {\transpose c' c'{
 <<
\new ChoirStaff<<

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

	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName="A. "
		\clef "treble"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName="T. "
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName="B. "
		\clef "bass"
		\bassus }
	\new Lyrics \lyricsto "v4" {\textobassus }
	>>
>>
%{  \new Staff \with{ 
      \remove Ambitus_engraver
      fontSize = #-3
      \override StaffSymbol #'staff-space = #(magstep -4)
  }<< \global
      \new Voice = "v5" {
        \clef "treble"
        \guia }
  >>
%}
 >>
	} % transpose

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

%\midi { \mtempo }

}


\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 \fromproperty #'page:page-number-string }
	%system-count=7
	%page-count = 2
	ragged-last-bottom = ##f
	indent=0.5\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 8) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 13) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
	first-page-number = 7
}