\version "2.10.10"

\paper{
%  paper-width = 2\cm
%  top-margin = 3\cm
%  bottom-margin = 3\cm
%  ragged-last-bottom = ##t
	between-system-padding = 1\cm
}

LigaGlobal = {
		\override LigatureBracket #'edge-height = #'(0 . 0)
		\override LigatureBracket #'staff-padding = #3.0
		\override LigatureBracket #'style = #'dashed-line
%		\override LigatureBracket #'thickness = #2 			% o padrão é 2 
		\override LigatureBracket #'dash-fraction = #0.3
		\override LigatureBracket  #'dash-period = #1
		\override LigatureBracket #'shorten-pair = #'(0.5 . 1.0)
		\override LigatureBracket #'bracket-flare = #'( 0 . 0 )
}

AnalysisLiga = {
		\override Staff.HorizontalBracket #'bracket-flare = #'( 0 . 0 )
		\override Staff.HorizontalBracket #'staff-padding = #3.0
		\override Staff.HorizontalBracket #'thickness = #1.6
		\override Staff.HorizontalBracket #'edge-height = #'(0.7 . 0.7)
}

AnalysisSpannerDown = {
	\override TextSpanner  #'staff-padding = #3.0
	\override TextSpanner  #'thickness = #1.6
	\override TextSpanner  #'edge-height = #'(0 . 0)
	\override TextSpanner  #'dash-fraction 	= #0.3
	\override TextSpanner  #'dash-period = #1
   \override TextSpanner  #'direction = #DOWN
}

%LigaDown = {
%		\override LigatureBracket #'direction = #DOWN
%}

bracketUp = {
       \override Staff.HorizontalBracket #'direction = #UP
}


%bracketRevert = {
%       \revert Staff.HorizontalBracket #'direction
%} 

%AnalysisSpannerUp = {
%	\override TextSpanner  #'edge-height = #'(1 . 1)
%	\override TextSpanner  #'thickness = #2
%	\override TextSpanner  #'dash-fraction = #0.9
%	\override TextSpanner  #'staff-padding = #3.0
%}

%AnalysisSpannerRevert = {
%	\revert TextSpanner  #'edge-height
%	\revert TextSpanner  #'thickness
%	\revert TextSpanner  #'dash-fraction
%	\revert TextSpanner  #'staff-padding
%}



TrillSpannerDown = {
		\override TrillSpanner  #'direction = #DOWN
		\override TrillSpanner  #'edge-text = #'("" . "")
		\override TrillSpanner  #'edge-height = #'(0 . 4)
		\override TrillSpanner  #'staff-padding = #3.3
}

%TrillSpannerRevert = {
%		 \revert TrillSpanner  #'direction
%}

UpArrow = \markup { \postscript #"
  0.2     setlinewidth
  0.5 0.8   moveto
  0.5 2   lineto
  0.2 1.4 lineto
  0.5 2   moveto
  0.8 1.4 lineto
  stroke
"}

DownArrow = \markup { \postscript #"
   0.2     setlinewidth
  -0.5 -1.4   moveto
  -0.5 -3   lineto
  -0.2 -2.4 lineto
  -0.5 -3   moveto
  -0.8 -2.4 lineto
  stroke
"}


voiceone =  \relative c'' {
  \set Staff.midiInstrument = "harpsichord"
  \key e \minor
  \time 4/4
\LigaGlobal
\bracketUp
\AnalysisLiga
\AnalysisSpannerDown

% \startGroup e \stopGroup para analise normal 
% \[ e \] para linha tracejada superior 
% \startTextSpan e \stopTextSpan para linha tracejada inferior 

% exemplo: c16 \startGroup b a g\stopGroup 		f\[ e d f 			g \startTextSpan a b c\stopTextSpan e g b d \]


% Measure 01
  r8 b16\startGroup [    a]  g[ fis g e]  b'8\stopGroup [\mordent  b]  e8.\mordent [ fis16]

% Measure 02
   dis8\prall [ fis16\startGroup e]  dis  [  cis dis b] b'8\stopGroup [    a16 g] fis8.[\prall e32 fis]

%\break 

% Measure 03
   g8[ b16_"Episodio"\startGroup  a]  g[ fis g e]  c'8.\stopGroup [  b16]  a[ g fis e]

% Measure 04
   fis8[ a16 \startGroup g]  fis[ e fis d]  b'8.[  \stopGroup  a16]  g[ fis e d] |

%\break 

% Measure 05
   e[ fis e d]  c[ b a g]  c[ b a b]  c[ d e fis] |

% Measure 06 
   g[ fis e d]  g8.[\mordent g16_"Cad. rel. maior"] g[ fis e fis]  fis8.[\prall g16] |

%\break 

% Measure 07
   g8[ d16 \startGroup c]  b[ a b g] d'2\prallprall  \stopGroup  ~ |

% Measure 08 
  d1 ~ |

%\break 

% Measure 09 
   d8.[ e16]  cis8.[\prall d16]  d8[ a16 \startGroup g]  fis[ e fis d] | % 09

% Measure 10
   c'8.[  \stopGroup  b16]  c8.[ d16]  b8[\mordent b]  e8.[\mordent e16] | % 10 

%\break 

% Measure 11
   e[ g fis \startGroup e]  d[ cis d b]  ais8[  \stopGroup  fis'16 \startGroup e]  d[ cis d b] | % 11

% Measure 12
   e8[  \stopGroup  b'16 \startGroup a!]  g[ fis g e]  ais8[  \stopGroup  cis, fis ais,] | % 12

%\break 

% Measure 13
   b8.[ cis16]  cis8.[ b16]  b8[ 
   \once \override TextScript #'extra-offset = #'(0 . -3.3) d_\UpArrow \startTextSpan e, d'] | % 13

% Measure 14
	\once \override TextScript #'extra-offset = #'(0 . -3.4) c_\UpArrow [ a d, c'] 
	\once \override TextScript #'extra-offset = #'(0 . -2.2) b_\UpArrow [ d  \[ g b,] | % 14

%\break 

% Measure 15
   \once \override TextScript #'extra-offset = #'(0 . -1.6) a_\UpArrow [ fis' 
   \once \override TextScript #'extra-offset = #'(0 . -1.6) g,_\UpArrow \stopTextSpan e']  dis[ \]    fis16 e]  dis[ cis b a] |

% Measure 16
   \once \override TextScript #'extra-offset = #'(0 . -3.3) g_\UpArrow\startTextSpan fis g b  \[ e  b a g
   \once \override TextScript #'extra-offset = #'(0 . -3.3) fis_\UpArrow [ e fis a]  dis[ a g fis] |

%\break 

% Measure 17
   \once \override TextScript #'extra-offset = #'(0 . -2.8) e_\UpArrow [ dis e g]  c[ g fis e]  
   \once \override TextScript #'extra-offset = #'(0 . -2.3) dis_\UpArrow \stopTextSpan [ cis dis fis]  b8 \]  b |

% Measure 18
  \once \override TextScript #'extra-offset = #'(0 . -2.5) b4_\UpArrow\startTextSpan ~ b16 [ dis e  \[g ]  
  \once \override TextScript #'extra-offset = #'(0 . -3.3) a,4_\UpArrow ~  a16[ cis dis fis] |

%\break 

% Measure 19
  \once \override TextScript #'extra-offset = #'(0 . -3.3) g,4_\UpArrow ~ g16 [ b dis e]  
  \once \override TextScript #'extra-offset = #'(0 . -3.3) fis,_\UpArrow \stopTextSpan [ a b c]  dis,\]  fis g a |

% Measure 20
   b,8[ a'] ~  a16[ fis b fis]  g8[ e]  c'8.[\mordent c16] |

%\break 


% Measure 21
   c8[\prall b] 
   \once \override TextScript #'extra-offset = #'(0 . -3.3) g'8._\UpArrow\startTextSpan [ g16 ]  g[ a g fis] 
   \once \override TextScript #'extra-offset = #'(0 . -3.3) fis8._\UpArrow [\prall e16] |

% Measure 22
  \once \override TextScript #'extra-offset = #'(0 . -3.3) e_\UpArrow [ d c \startGroup b]  a[ g a fis]  
  \once \override TextScript #'extra-offset = #'(0 . -3.3) dis'8_\UpArrow \stopTextSpan [  \stopGroup  fis,]  
  \once \override TextScript #'extra-offset = #'(0 . -1.9)	b8._\UpArrow \startTextSpan [ c16 ] |

% Measure 23
 \once \override TextScript #'extra-offset = #'(0 . -3.2) a8._\UpArrow \prall  
 \once \override TextScript #'extra-offset = #'(0 . -3.3) g16_\UpArrow  
 \once \override TextScript #'extra-offset = #'(0 . -3.3) fis8._\UpArrow \prall[ e16 ]  
 \once \override TextScript #'extra-offset = #'(0 . -2.5) e2_\UpArrow\stopTextSpan \fermata \bar "|."
}














voicetwo =  \relative c {
  \set Staff.midiInstrument = "harpsichord"
  \key e \minor
  \time 4/4
  \clef "bass"
	\LigaGlobal
	\AnalysisLiga
	\AnalysisSpannerDown
	\override TextSpanner  #'staff-padding = #4.0
	\TrillSpannerDown

% Measure 01 
    e8[ \mordent e,] r4 r8  b''16\startGroup   [ a]  g[ fis g e]

% Measure 02 
    b'8[  \stopGroup  b,] r4 r8   fis''16  [ e]  dis[ cis dis b ] 

% Measure 03 
    e8[   e,] r4 r8  e'16[ \startGroup d]  c[ b c a] 

% Measure 04 
   d8[  \stopGroup  d,] r4 r8  d'16[ \startGroup c]  b[ a b g] | % 4

% Measure 05 
   c8.[  \stopGroup  b16]  a[ g fis e]  a8.[ g16]  fis[ e d c] | % 5

% Measure 06 
   b8.[ c16]  b[ a g fis]  e8[ c' d d,] | % 6

% Measure 07 
  g4 r4 r8  g16^"(variado)"[ \startGroup a]  b[ a b g] | % 7
 
% Measure 08 
  d'[  \stopGroup  cis d \startGroup e]  fis[ e fis d]  g[  \stopGroup  fis g \startGroup a]  b[ a b fis] | % 8

% Measure 09 
   g^\markup {Cad.} \startTrillSpan fis g e\stopTrillSpan   a8^\markup {V do rel. maior}[  \stopGroup  a,]  d[ d,] r4 | % 9

% Measure 10 
  r8  a''16[ \startGroup g]  fis[ e fis d]  g[  \stopGroup  a g \startGroup fis]  e[ d e cis] | % 10

% Measure 11 
   fis8[  \stopGroup  ais, b g] fis4  r8^\markup {Stretto}  b'16[ \startGroup a!] | % 11

% Measure 12 
   g[ fis g e]  d'8.[  \stopGroup  e16]  cis8[  g'16 \startGroup fis]  e d e cis | % 12

% Measure 13 
    d  \startTrillSpan cis d b \stopTrillSpan  fis'8^\markup { \column {\smaller Cad. dom.}} \stopGroup  fis,  b16[ c \startGroup b  a^\markup {\smaller Episodio}]  gis[ fis gis e] | % 13

% Measure 14 
   a[  \stopGroup  b a \startGroup g!]  fis[ e fis d]  g[  \stopGroup  a g \startGroup fis]  e d e cis \startTrillSpan | % 14

% Measure 15 
	dis     [ cis  dis^\markup { } b]  e dis e e, \stopTrillSpan  b'2\trill \stopGroup ~ | % 15

% Measure 16 
     \once \override TextScript #'extra-offset = #'(0 . 10) b1^\markup { "" } ~ |

% Measure 17 
   b2^\markup { } ~ b4 ~  b16[ c' b a] | % 17

% Measure 18 
  g  \startTextSpan  fis g b \[ 
  \once \override TextScript #'extra-offset = #'(1 . 3.3) e^\DownArrow  b a g  fis e fis a 
  \once \override TextScript #'extra-offset = #'(1 . 3.9) dis^\DownArrow  a g fis |

% Measure 19 
   e^\markup { } [ dis e g] 
   \once \override TextScript #'extra-offset = #'(1 . 4.4) c^\DownArrow [ g fis e]  dis8  \stopTextSpan  
   \once \override TextScript #'extra-offset = #'(1 . 5.5) b^\DownArrow \] r4 |

% Measure 20 
  r16  g'[ fis \startGroup e]  dis[ cis dis b]  e[  \stopGroup  d c \startGroup b]  a[ g a fis] |

% Measure 21 
   g \stopGroup  a  g \startGroup fis e d e c \startTrillSpan  a' g a fis  b a b g |

% Measure 22 
  c2  ~  c16 \stopTrillSpan \stopGroup   c' b \startGroup a  g fis g e |

% Measure 23 
 dis8 \stopGroup e b' b,_\markup {Cad. ton.} e,2 \bar "|."
}



SetaCima = \lyricmode {	\override VerticalAxisGroup #'minimum-Y-extent = #'(0 . -6.0)
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 % Measure 01 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \DownArrow \skip1
      \skip1 \DownArrow \skip1 \DownArrow \DownArrow
		\skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
		\DownArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
		\DownArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
		\DownArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
		\DownArrow \skip1 \skip1 \skip1 \skip1
		\DownArrow \skip1 \skip1 \skip1
		\DownArrow \skip1 \skip1 \skip1
		\DownArrow \skip1 \skip1 \skip1 \skip1
		\DownArrow
     }

SetaBaixo = \lyricmode {	\override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 0.6)
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 % Measure 01 
      \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 
      \skip1 \skip1 \skip1 \skip1 \skip1 
		\UpArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
		\UpArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
		\UpArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
		\UpArrow \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
	     }



\score {
       \new ChoirStaff <<
       \set ChoirStaff.systemStartDelimiter = #'SystemStartBrace
				<<
					\new Lyrics = sopranos { s1 }
					\new Staff = women << \new Voice = "sopranos" { \voiceone }	>>
         	>>
         	<<
					\new Staff = men << \new Voice = "bass" { \voicetwo }	>>
					\new Lyrics = bass { s1 }
				>>
         \context Lyrics = sopranos \lyricsto sopranos \SetaCima
         \context Lyrics = bass \lyricsto bass \SetaBaixo
       >>
	\layout{
		\context {
			\Voice
			\consists "Horizontal_bracket_engraver"
		}
	}
	\midi {
		\context {
			\Score
      	tempoWholesPerMinute = #(ly:make-moment 90 4)
		}
	}
}