%----------------------------------------------------------------
%     _     _ _                             _ 
%    | |   (_) |_   _ _ __   ___  _ __   __| |
%    | |   | | | | | | '_ \ / _ \| '_ \ / _` |
%    | |___| | | |_| | |_) | (_) | | | | (_| |
%    |_____|_|_\\__, | .__/ \___/|_| |_|\__,_|
%               |___/|_|                      
%
%    This is a Lilypond source code file. For more information 
%    about the Lilypond music typesetting program, visit 
%    
%         http://lilypond.org 
%    
%    The code in this source file is released under
%    a GPLv3 license. For licensing information visit 
%
%         http://www.gnu.org/licenses/quick-guide-gplv3
%
%----------------------------------------------------------------

\version "2.18.0" 


%\include "style.ily" 

\header { 
 tagline = ""  % removed 
} 

\paper { 
  #(set-paper-size "letter") 
  ragged-right = ##f
  ragged-bottom = ##t 
  ragged-last-bottom = ##f
} 

#(ly:set-option 'point-and-click #f) 
#(set-global-staff-size 28)


nct = \finger \markup \teeny {\fontsize #-3 "x"}

global = { 
  \time 2/2
  \override Staff.BarLine.allow-span-bar = ##f 
  \numericTimeSignature
  \key f \minor
  \set Staff.midiInstrument = "piano" 
  %\override Score.MetronomeMark #'padding = #3.8 
  %\override Staff.TimeSignature #'stencil = ##f
% \set Timing.beamExceptions = #'()
% \set Timing.baseMoment = #(ly:make-moment 1/4)
% \set Timing.beatStructure = #'(1 1 1 1)
\override Glissando.thickness = #4
\override TupletBracket.stencil = ##f
\showStaffSwitch
\override VoiceFollower.thickness = #3
} 

sop = \relative c' { 
\global
\voiceOne
\override TextSpanner.bound-details.left.text = #"V"
\override TextSpanner.bound-details.right.text = #"I"
\override TextSpanner.font-shape = #'upright
\override TextSpanner.style = #'solid-line
%\override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
%\override TextSpanner.bound-details.right.stencil-align-dir-y = #CENTER
\textSpannerDown
\partial 2 f4^\markup \italic \bold {"Larghetto."} g
aes1
a4 b g^\nct fis
g1^\markup \tiny {"Sequence."} ~
g4 a f e
f2 e ~
e4 d^\markup \tiny {"Like measures 1, 2, 3."} c2
cis4 dis b ais
b1 ~
b4 d cis b' ~ 
b^\markup \tiny {"S."} b ais\startTextSpan fis' 
r4\stopTextSpan g,^\nct fis d'
r4 f,!^\nct e ais(
bes) e, f g
aes2 ~ aes4 g
e4^\nct f ~ f e
f1
\bar "||"
}

alto = \relative c' { 
\global
\voiceTwo
\partial 2 aes4 c
\override TextSpanner.bound-details.left.text = #"V"
\override TextSpanner.bound-details.right.text = #"I"
\override TextSpanner.font-shape = #'upright
\override TextSpanner.style = #'solid-line
%\override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
%\override TextSpanner.bound-details.right.stencil-align-dir-y = #CENTER
\textSpannerDown
f2 ~ f4 e_\nct
dis1(
es4) f! es d
cis1 ~
cis4 d c_\nct b
c4\change Staff = "down" \voiceOne b4 a gis
fisis1(
g4) a g fis
eis1 
e2 e'
dis d
cis1(
des4) c d \change Staff = "up" \voiceTwo e\startTextSpan
f\stopTextSpan es des2 ~
des4_\nct c b bes ~
bes g aes2
}

tenor = \relative c { 
\global
\textSpannerDown
%\override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
%\override TextSpanner.bound-details.right.stencil-align-dir-y = #CENTER
\override Voice.TextScript.padding = #2
\override Voice.TextSpanner.padding = #2
\clef "bass"
\oneVoice
\override TextScript.extra-offset = #'(-1.0 . 0.0)
\partial 2 r2
r4_\markup \tiny { "fac"} c des_\markup \tiny { "dfa"} c
b1_\markup \tiny { "bdfa"} 
bes2_\markup \tiny {"egb"} g'4 f
e2_\markup \tiny {"ace"} f4 g
gis2_\markup \tiny {"gdf"} gis,_\markup \tiny {"egb"}
\voiceTwo
a4_\markup \tiny {"ace"} e' f_\markup \tiny {"fac"} e
dis1_\markup \tiny {"dfac"}
d2_\markup \tiny {"gbd"} b4 a
gis2_\markup \tiny {"egbd"} g^\markup \tiny {"raised 4."}_\markup \tiny {"cegb"}
fis1_\markup \tiny {"fae"}
b2_\markup \tiny {"bdf"} b'4 bes_\nct
a2_\markup \tiny {"ace"} gis_\markup \tiny {"ceg(a)"}
g!2_\markup \tiny {"egbd"} c,_\markup \tiny {"ceg"}
\oneVoice
r4_\markup \tiny {"fac"} c4 b2_\markup \tiny {"gbd"}
a4_\markup \tiny {"fac"} aes g_\markup \tiny {"cegb"} c,
f1
}

bass = \relative c { 
\global
\clef "bass"
%\voiceTwo
\override Voice.TextScript.padding = #1
%\override TextSpanner.outside-staff-priority = #5

}


\score {
  \new PianoStaff << 
  \set PianoStaff.instrumentName = \markup \center-column { Ex. "149-3." }
    \new Staff = "up" << 
        \context Voice = "soprano" \sop 
        \context Voice = "alto"  \alto
    >> 
    \new Staff = "down" << 
        \context Voice = "tenor"  \tenor 
        \context Voice = "bass"  \bass
    >> 
  >> 
  \layout { 
	\context {
	    \Score
	    \remove "Bar_number_engraver"
	  }
  }
  \midi {\tempo 2 = 60}
}