% Set up a header.

\header
{
	title		=	"Montréal No. 1" ;
	composer	=	"Peter Schaffter" ;
	opus		=	"©1990 Peter Schaffter" ;
	instrument	=	"Piano Solo" ;
	tagline		=	"" ;
}

tempi = \context Voice = tempi \notes
{
	\property Voice.TextScript \push #'padding = #10
	\property Voice.TextScript \push #'style = #"bold"
	s1^"Fast 4 in a bar"
}

%======================================================================

% IDENTIFIERS

% Stem direction

stemsUp		= \property Voice.Stem \push #'direction = #1
stemsDown	= \property Voice.Stem \push #'direction = #-1
stemsBoth	= \property Voice.Stem \push #'direction = #0
stemsPop	= \property Voice.Stem \pop #'direction

% Slur placement

slursUp		= \property Voice.Slur \push #'direction = #1
slursDown	= \property Voice.Slur \push #'direction = #-1
slursBoth	= \property Voice.Slur \push #'direction = #0
slursPop	= \property Voice.Slur \pop #'direction

% Tie direction

tiesUp		= \property Voice.Tie \push #'direction = #1
tiesDown	= \property Voice.Tie \push #'direction = #-1
tiesBoth	= \property Voice.Tie \push #'direction = #0
tiesPop		= \property Voice.Tie \pop #'direction

% Dynamic placement

dynsUp		= \property Voice.Dynamic \push #'direction = #1
dynsDown	= \property Voice.Dynamic \push #'direction = #-1
dynsBoth	= \property Voice.Dynamic \push #'direction = #0
dynsPop		= \property Voice.Dynamic \pop #'direction

% Articulation placement

artsUp		= \property Voice.ArticulationScript \push #'direction = #1
artsDown	= \property Voice.ArticulationScript \push #'direction = #-1
artsBoth	= \property Voice.ArticulationScript \push #'direction = #0
artsPop		= \property Voice.ArticulationScript \pop #'direction

% Dot placement

dotsUp		= \property Voice.Dots \push #'direction = #1
dotsDown	= \property Voice.Dots \push #'direction = #-1
dotsBoth	= \property Voice.Dots \push #'direction = #0
dotsPop		= \property Voice.Dots \pop #'direction

% Slur attachment; either stem or note

slurstem =
{
	\property Voice.slurBeginAttachment = #'stem
	\property Voice.slurEndAttachment = #'stem
}

slurnote =
{
	\property Voice.slurBeginAttachment = ##f
	\property Voice.slurEndAttachment = ##f
}

% Switch a voice from one staff to the other, and allows crossbeaming

staffUp		= { \translator Staff = top \stemsPop \stemsDown }
staffDown	= { \translator Staff = bottom \stemsPop \stemsUp }

% Dynamic padding
% 5 is more or less the system default; use it as the
% basis for slight adjustments up and down

dpadi		= \property Voice.DynamicLineSpanner \push #'padding = #1
dpadii		= \property Voice.DynamicLineSpanner \push #'padding = #2
dpadiii		= \property Voice.DynamicLineSpanner \push #'padding = #3
dpadiv		= \property Voice.DynamicLineSpanner \push #'padding = #4
dpadv		= \property Voice.DynamicLineSpanner \push #'padding = #5
dpadvi		= \property Voice.DynamicLineSpanner \push #'padding = #6
dpadvii		= \property Voice.DynamicLineSpanner \push #'padding = #7
dpadviii	= \property Voice.DynamicLineSpanner \push #'padding = #8
dpadix		= \property Voice.DynamicLineSpanner \push #'padding = #9
dpadx		= \property Voice.DynamicLineSpanner \push #'padding = #10
dpadxi		= \property Voice.DynamicLineSpanner \push #'padding = #11
dpadxii		= \property Voice.DynamicLineSpanner \push #'padding = #12
dpadxiii	= \property Voice.DynamicLineSpanner \push #'padding = #13
dpadxiv		= \property Voice.DynamicLineSpanner \push #'padding = #14
dpadxv		= \property Voice.DynamicLineSpanner \push #'padding = #15
dpadxvi		= \property Voice.DynamicLineSpanner \push #'padding = #16
dpadxvii	= \property Voice.DynamicLineSpanner \push #'padding = #17
dpadxviii	= \property Voice.DynamicLineSpanner \push #'padding = #18
dpadxix		= \property Voice.DynamicLineSpanner \push #'padding = #19
dpadxx		= \property Voice.DynamicLineSpanner \push #'padding = #20
dpadPop		= \property Voice.DynamicLineSpanner \pop #'padding

%======================================================================

% PARTS

% Soprano

RondoAsopranoonevoice = \notes
{
	\relative c'
	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. c~c bes4. |
	<c1 g> |

	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. g~g a4. |
	c1 |

	es8( d c g~g f4 g8 |
	\stemsDown
	bes4. c8~c bes4 )c8 |
	\stemsPop
	es8( d c g~g f4. |
	)g1 |

	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. c~c bes4. |
}

RondoAsopranoonevoiceAlt = \notes
{
	\relative c'
	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. c~c bes4. |
	<c1 g> |

	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. g~g a4. |
	c1 |

	es8( d c )g~g f4 g8 |
	\stemsDown
	bes4. c8~c bes4 c8 |
	\stemsPop
	es8( d c )g~g f4. |
	g1 |

	e8( )d-. e-. c~c e( d )e |
	f( g )a-. g~g f( e )d |
	e( )d-. e-. c~c f4. |
}

RondoAsopranotwovoice = \notes
{
	<
		{
			\relative c''
			e8( )d e c~c e( d )e |
			f( g )a_. g~g f( e )d |
			e( )d e c~c bes4. |
		}
		{
			\relative c''
			c8 g_. c_. e,~e c' g c |
			s1 |
			c8 g_. c_. e,~e d4. |
		}
	>
	<g1 c, g>

	<
		{
			\relative c''
			e8( )d e c~c e( d )e |
			f( g )a_. g~g f( e )d |
			e( )d e g~g a4. |
		}
		{
			\relative c''
			c8 g_. c_. e,~e c' g c |
			s1 |
			c8 g_. c_. e~e e4. |
		}
	>
	\relative c'''
	<c1 g c,>

	<
		{	\stemsDown
			\relative c'''
			es8( d c g~g f4 g8 |
			bes4. c8~c bes4 )c8 |
			es8( d c g~g f4. |
			)g1 |
			\stemsPop
		}
		{	\stemsDown
			\relative c'''
			g8 f es bes~bes bes4 bes8 |
			f'4. g8~g8 f4 g8 |
			g8 f es bes~bes bes4. |
			c1 |
			\stemsPop
		}
		{	\stemsDown
			\relative c''
			es8 d c g~g f4 g8 |
			bes4. c8~c bes4 c8 |
			es8 d c g~g f4. |
			g1 |
			\stemsPop
		}
	>

	<
		{
			\relative c''
			e8( )d e c~c e( d )e |
			f( g )a_. g~g f( e )d |
			e( )d e c~c bes4. |
		}
		{
			\relative c''
			c8 g_. c_. e,~e c' g c |
			s1 |
			c8 g_. c_. e,~e d4. |
		}
	>
}

soprano = \notes \relative c''
{
	\slursUp \tiesUp \dotsUp \stemsUp
%1-4
	R1*4
%5-8
	R1*4
%9-12
	r2 r8 g4. | r2 r8 g4. |
	r2 r8 g4. | r2 r8 g4. |

%13-29
	\RondoAsopranoonevoice
	r2 r8 g'8^> g,4 |
	\time 6/8 ;
	es'4.( )d4. |
%30-33
	\time 4/4 ;
	r2 r8 g4. | r2 r8 g4. |
	r2 r8 g4. | r2 r8 g4. |
%34-51
	\RondoAsopranotwovoice
	\relative c''
%	{ <g1 c,> <s2.-\cr s8 \! s8> } |
	<g1 c,> |
	\time 7/8 ; 
	\stemsDown
	\relative c'''
	<es4.( g, es> <)d2 f, d> |
	<es4.( g, es> <)d2 f, d> |
%52-55
	\time 4/4 ;
	\stemsPop
	<c1 g c,> |
	\time 6/8 ;
	\relative c'
	r8 <d( fis,> )es r8 <d( c g> )es |
	\time 4/4 ;
	r8 es( d es f es d )es |
	\time 6/8 ;
	<aes4. d, c(> <g4. d )b> |
%56-63
	\time 4/4 ;
	\relative c''
	r8 es( d es f es d )es |
	\time 7/8 ;
	<aes4.( es c ges> <)g2 d b f> |
	\stemsDown
	\relative c'''
	<es4.( c ges c,> <)d2 b f b,> |
	\stemsPop
	\time 4/4 ;
	<aes'1 es c es,> | <g d b f> |
	<es c fis, c> | <d c g d> | <d g, b,> |
%64-67
	\relative c'''
	c4.( bes g4 | )c,1 |
	c'4.( bes d4 | )c1 |
%68-72
	c4.( bes g4 | )c,1 |
	c4.( c~c4 | )d1 |
%	{ < <d'4 g,> r4 r2 > < s8 s8-\decr s2 s8 \! s8 > } |
	<d'4 g,> r4 r2 |
%73-91
	\RondoAsopranoonevoiceAlt
	g2~g8 c c,4 | g''2~g8 c, c,4 |
%	{ < g'2~g8 c c,4 | g''2~g8 c,8 c,4 | > < s1-\cr | s2. \! s4 | > }
	g'2~g8 c c,4 | g''2~g8 c,8 c,4 |
%92-95
	\slurstem
	\time 7/8 ;
	es4.( )d2 | bes4.( )c2 | g4.( )bes2 | 
	\time 6/8 ;
	a4.( f8 d' )c |
%96-100
	\time 7/8 ;
	es4.( )d2 | bes4.( )c2 | bes4.( )g2 |
	\time 3/8 ; a4. |
	\time 4/4 ;
	g8( g' f g bes g c )d |
%101-104
	\time 7/8 ;
	\relative c''
	f4.( )e2 | g,4( a8 )d2 | c4.( )a2 | 
	\time 6/8 ; b4.( c4 )d8 |
%105-108
	\time 7/8 ;
	\property Voice.TextScript \pop #'style
	\property Voice.TextScript \pop #'padding
	\property Voice.TextScript \push #'style = #"italic"
	\property Voice.TextScript \push #'padding = #10
	<f4.(^"poco a poco crescendo" a,> <)g2 b,> |
	\time 9/8 ;
	<g4.( d> )a2. |
	\time 7/8 ;
	<b4.( e,> <)c2 f,> |
	\time 3/8 ;
	<c4( f, c> <b8 b,> |
%109-112
	\slurnote
	\time 4/4 ;
	<)a2 e a,> r2 |
	<d,2 f,> r2 |
%	{ < <e2 g,> r2 > < s8 s8-\cr s2 s8 \! s8 > } |
	<e2 g,> r2 |
	\time 6/8 ;
	<f4.( bes,> <g c,> |
%113-116
	\time 4/4 ;
	<)d2 a> r2 |
	e,2.( f8 )g |
	\time 6/8 ;
	<a4. d,(> <d4. )g,> |
	\time 4/4 ;
	<f4^^ bes, f> <a4^- d, a>~<a8 d, a> <g( c, g> <e e,> <)f f,> |
%117-121
	\time 6/8 ;
	<d4. a>~<d4. a> |
	<bes4. f>~<bes4. f> |
	a,8 a'4~a4. |
	<g4. d c> <g' d c> |
%	{ < <g' d c> <g, d> > < s4. s4-\cr \! s8 > } |
	<g' d c> <g, d> |
%122-137
	\time 4/4 ;
	\RondoAsopranotwovoice
	\relative c'' g1 |
%138-141
	R1 |
	<
		{
			\relative c'''
			\stemsDown e8( d )e c~c bes4. \stemsPop |
		}
		{
			\relative c'''
			\stemsDown c8 g c^. e,~e d4. \stemsPop |
		}
	>
	\relative c''' g1 |
	R1 |
%142-144
	\stemsDown
	\relative c'''
	fis8( e )fis^. d~d fis( e )fis |
	g( a )b4^. r2 |
	g,8( a )b4^. r2 \bar "||" ; |
	\stemsPop
%145-148
	R1*4 |
%149-153
	\relative c''
	des2.( f4 | des2. f,4 | a2. des,4 | )f1~ | f |
%154-158
	des'2.( f4 | des2. f,4 | a2. des,4 | <)f1 b,>~ | <f b,> |
%159-162
	des1( | f2. )aes4 | \slurstem g8( )f4-. f f f8 | g8( )f4-. f f f8 |
%163-166
	\slurnote
	des1( | f2~ f4 aes8 des | )f1~ | f |
%167-171
	<f2.( des a f> <a4 a,> |
	<f2. des a f> <a,4 f> |
	<des2. a f des> <f,4 des> |
	<)a1 f des>~ | <a f des> |
%172-176
	<f'2.( des a f> <a4 a,> |
	<f2. des  a f> <a,4 f> |
	<des2. a f des> <des,4 a> |
	<)f1 des b>~ | <f des b> |
%177-180
	<f( des> | <aes2. f des> <)des4 aes f des> |
	g,8( )f4-. f8~f [aes'( g, )des'] |
	g,8( )f4-. f8~f4 g |
%181-184
	<f1( des> |
	< { <)aes f des> }
	  { \context Voice = high \notes
	    { \stemsUp \slursUp \relative c''' s2 r8 aes(  des, <)es es,> \slursPop \stemsPop }
	  }
	> |
	<f'1 c>~ | <f c> |
%185-188
	<f4.--( c a f> <c,8-- g d>~<c4 g d> <a4-- e> |
	<bes4.-- f c> <es8-- bes f>~<es4 bes f> <)f4-- c g> |
	<g4.--( d b g> <d8-- a e>~<d4 a e> <b4-- fis> |
	<c4.-- g d> <f8-- c g>~<f4 c g> <)g4-- d a> |
%189-191
	<a4.-- e cis> <e8-- b fis>~<e b fis> <cis( gis dis> <d a e> <)aes' es bes> |
	<a4.-- e cis> <e8-- b fis>~<e b fis> <cis( gis dis> <d a e> <)aes' es bes> |
	< { \relative c'' a( bes c d des d f )fis }
	  { \relative c' d f g ges aes a c b }
	  { \relative c' bes b des es d es s4 } > |
%192-195
	\relative c'''
	a1( | )e | g( | )d |
%196-201
	d2.( c4 | d2. )c4 |
	<c1 g f d> | <g' d c g> |
	<g' d c g> | <g,2 d g,> r2 |
%202-217
	\RondoAsopranotwovoice
	<
		{
			\stemsDown
			\relative c''
			fis'8( e )fis^. d~d c4. |
			\stemsPop
		}
		{
			\stemsDown
			\relative c''
			d'8 c d bes~bes aes4. |
			\stemsPop
		}
	>
%218-223
	< { \relative c'' a8 g a-. f~f es4. }
	  { \relative c' f8( es )f c~c g4. } > |
	\relative c'
	< f1 c1 > |
	\relative c'
	r4 f8( )bes f( g c )es |
	< { <c1 g> }
	  { \context Voice = high \notes
	    { \relative c''' \stemsUp s2 r4 c4 \stemsPop }
	  }
	> |
	\relative c''
	<d2^"rit" bes f> <bes8^> f d> <bes'4^> f bes,> <a8^> a,> |
	\property Voice.Script \push #'padding = #5
	<g1-\fermata e c g> \bar "||" ;
}

% Alto

alto = \notes \relative c'
{
	\stemsDown \tiesDown \dotsDown \slursDown
%1-24
	s1*24
%25-29
	s1*3 |
	c1 |
	\time 6/8 ; s2. |
%30-33
	\time 4/4 ;
	c1 | c1 | c1 | c1 |
%34-37
	\relative c''
	s1 | d2 bes4 g8 f |
	s1 | s1 |
%38-41
	s1 | d'2 bes4 g8 f |
	s1 | s1 |
%42-45
	s1*3 | s1 |
%46-51
	s1 | d'2 bes4 g8 f |
	\slursUp
	R1 | r2 c8( g' c )c' |
	\slursPop
	\time 7/8 ;
	s4. s2 | s4. s2
%52-55
	\time 4/4 ; s1 |
	\time 6/8 ; s2. |
	\time 4/4 ; s1 |
	\time 6/8 ; s2. |
%56-63
	\time 4/4 ;
	\relative c'' 
	<c1 g es> |
	\time 7/8 ;
	s4. s2 | s4. s2 |
	\time 4/4 ;
	\relative c'''
	\tiesUp
	r8 <f4 aes,> <f8 aes,>~<f4 aes,> <es4 aes, c,> |
	r8 <d4 g, d> <d8 g, d>~<d4 g, d> <b4 g d g,> |
	\tiesPop
	\relative c''
	\slursUp
	r8 es( d es f fis )gis4 |
	\slursPop
	s1*2 |
%64-67
	\relative c'''
	[aes8 c, f] [g bes, es] [es g,] |
	aes1 |
	[aes'8 c, f] [g bes, d] [g d] |
	<g1 es> |
%68-72
	\relative c'''
	[aes8 c, f] [g bes, es] [es g,] |
	aes1 |
	[aes8 c, f] [aes c, f] [aes c] |
	g8 d4 d8~d g( \staffDown g, \staffUp )d' |
	d'8 g,4 g8~g( \staffDown g, b \staffUp )d |
%73-76
	s1*4 |
%77-80
	s1*4 |
%81-84
	s1*4 |
%85-91
	\relative c'
	s1*3 |
	r8 c4 c8~c2 | r8 g'4 g8~g2 |
	r8 c,4 c8~c2 | r8 g'4 g8~g2 |
%92-95
	\time 7/8 ;
	s4. s2 | s4. s2 | s4. s2 |
	\time 6/8 ;
	s2. |
%96-100
	\time 7/8 ;
	s4. s2 | s4. s2 | s4. s2 |
	\time 3/8 ;
	s4. |
	\time 4/4 ;
	\relative c'
	g4 c8 d es4 f |
%101-104
	\time 7/8 ;
	r8 [g16( a )c8] r8 [g( c )b] |
	r8 [c,16( d )a'8] g4( )f |
	r8 [d16( e )g8] r8 [c,( f )e] |
	\time 6/8 ;
	r8 [d16( e )g8~] <c,4. g'> |
%105-108
	\time 7/8 ;
	r8 [f16( g )a8] r8 [e( b' )c] |
	\time 9/8 ;
	r8 [g16( a )c8] e8( d4 a )c8 |
	\time 7/8 ;
	r8 [g16( a )b8] r8 [a( e' )d] |
	\time 3/8 ;
	r8 [g,16( a )b8] |
%109-112
	\time 4/4 ;
	\relative c'
	\slursUp
	r8 e( e e a e b' )c |
	r4 a( d e8 )f |
	r8 c,16( d e8 )g c( g d' )e |
	\time 6/8 ;
	r8 d d r8 e e |
%113-116
	\slursPop
	\time 4/4 ;
	s1*2 |
	\time 6/8 ;
	s2. |
	\time 4/4 ;
	s1 |
%117-121
	\time 6/8 ;
	\relative c''
	g4( f8 e d )a |
	e'4( d8 c bes )f |
	r8 a'( g f4 )d8 |
	s2. | r4. c'4( )b8 |
%122-125
	\time 4/4 ;
	\relative c''
	s1 | d2 bes4 g8 f |
	s1 | s1 |
%126-129
	s1 | d'2 bes4 g8 f |
	s1 | s1 |
%130-133
	s1*4
%134-137
	s1 | d'2 bes4 g8 f |
	s1 |
	\relative c'
	e8( <d g,> )e-. <c e,>~<c e,> <bes4. d,> |
%138-141
	s1*2 |
	\relative c''
	e8( <d g,> )e-. <c e,>~<c e,> <bes4. d,> |
	s1 |
%142-144
	s1*3 |
%145-148
	s1*4 |
%149-153
	s1*5 |
%154-158
	s1*5 |
%159-162
	\relative c'
	des1~ | des~ | des~ | des |
%163-166
	des~ | des | b'~ | b |
%167-171
	s1*5 |
%172-176
	s1*5 |
%177-180
	\relative c'
	g8( )f4-. f f f8 | g8( )f4-. f f f8 |
	b8 des4.~des2 | b8 des4.~des2 |
%181-184
	g,8( )f4-. f f f8 | g8( )f4-. f f f8 |
	<f'1 a>~ | <f a> |
%185-188
	s1*4 |
%189-191
	\relative c'
	s1 | s1 |
	s2. fis4 |
%192-195
	<a1 e'> | <e2. a> <e4^^ a> |
	<g1 d'> | <d2. g> <d4^^ g> |
%196-201
	<c1 ges'> | <c ges'> |
	s1*3 |
	\shiftOn
	\property Voice.NoteColumn \push #'force-hshift = #-0.75
	\relative c''
	c2~c8 b( c )d |
%202-205
	\property Voice.NoteColumn \pop #'force-hshift
	\relative c''
	s1 | d2 bes4 g8 f |
	s1 | s1 |
%206-209
	s1 | d'2 bes4 g8 f |
	s1 | s1 |
%210-213
	s1*4
%214-223
	s1 | d'2 bes4 g8 f |
	s1 | s1 | s1 |
	\relative c
	r8 f4 f8~f2 |
	r4 bes8 es c4 f8 aes |
	r8 c,4 c8~c4. c8 |
	bes( d )a'4 s2 | s1 |
}

% Tenor

RondoAtenor = \notes
{
	\relative c'
	g8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4-. g,8( bes'4 )a8 |
	g8( )c,4-. c8_-~c4 c |
	c'4.^- bes^- f4^- |

	g8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4-. g,8( bes'4 )a8 |
	g8( )c,4-. c8_-~c4 c |
	c'4.^- bes^- f4^- |

	f,8( )c'4-. c8_-~c4 c |
	g8( c )f4-. r8 bes,4( )g'8 |
	f,8( )c'4-. c8_-~c4 c |
	s1 |

	g'8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4-. g,8( bes'4 )a8 |
}

% Tenor rhythm machine that first appears in bar 145

diddle = \notes
{
	\relative c
	es8( )f4-. f f f8
}

tenor = \notes \relative c'
{
	\stemsUp \tiesDown \dotsUp \slursUp \artsUp \slurstem
%1-4
	g8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4-. g,8( bes'4 )a8 |
	g8( )c,4-. c8_-~c4 c |
	c'4.^- bes^- f4^- |
%5-8
	g8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4-. g,8( bes'4 )a8 |
	g8( )c,4-. c8_-~c4 c |
	f4.^- d^- a'4^- |
%9-12
	< g1 c,> | < g1 c,> | < g1 c,> | < g1 c,> |
%13-29
	\RondoAtenor
	g8( )c,4-. c8_-~c4 c |
	r8 g'4-. g8~g2 |
	\time 6/8 ;
	f,8( c' )g' g,8( d' )f |
%30-51
	\time 4/4 ;
	<g1 c,> | <g1 c,> | <g1 c,> | <g1 c,>
	\RondoAtenor
	g8( )c,4-. c8_-~c4 c |
	r8 aes( aes es' )c'2 |
	\time 7/8 ;
	[f,,8( c' )g'] [g,( d' f )g,] |
	[f8( c' )g'] [g,( d' f )c'] |
%52-55
	\time 4/4 ;
	r8 es( d es f es d )es |
	\time 6/8 ;
	s2. |
	\time 4/4 ;
	s1 |
	\time 6/8 ;
	s2. |
%56-63
	\time 4/4 ;
	\relative c' 
	r4 d8( es f es d )es |
	\time 7/8 ;
	s4. s2 | s4. s2 |
	\time 4/4 ;
	s1 | s1 |
	\relative c'
	r8 c( b c d es )f4 |
	s1*2 |
%64-67
	\relative c' 
	s1 | [aes8( c )es] [g,( c )es] r4 |
	s1 |
	[c8( g' )c] [f,( g )c] r4 |
%68-72
	\relative c'
	s1 | [aes8( c )es] [g,( c )es] r4 |
	s1 | s1 | s1 |
%73-91
	\RondoAtenor
	g8( )c,4-. c8_-~c4 c |
	r8 g'4.~g4 g4 | r8 g4.~g4 g |
	r8 g4.~g4 f | r8 <f4. c'>~<f4 c'> f |
%92-95
	\time 7/8 ;
	\relative c,
	[f8( c' )g'] [g,( d'] )f4 |
	[es,8( bes' )f'] [c,( g'] ) es'4 |
	[d,8( g )es'] [es,( bes'] )es4 |
	\time 6/8 ;
	d,8( a' )d bes4. |
%96-100
	\time 7/8 ;
	[f8( c' )g'] [g,( d'] )f4 |
	[es,8( bes' )f'] [c,( g'] )es'4 |
	[d,8( g )d'] [es,( bes'] )es4 |
	\time 3/8 ; f,8( c' )f |
	\time 4/4 ;
	d1 |
%101-104
	\time 7/8 ;
	[g,8( d' )a'] [a,( e'] )g4 |
	[f,8( c' )g'] [d,( a' e' )d] |
	[e,8( a )f'] [f,( c'] )a'4 |
	\time 6/8 ;
	e,8( b' )e f,( c' )a' |
%105-108
	\time 7/8 ;
	[g,8( d' )a'] [a,( e'] )g4 |
	\time 9/8 ;
	[f,8( c' )g'] [d,( a'] f'4 )d |
	\time 7/8 ;
	[e,8( b' )e] [f,( c'] )f4 |
	\time 3/8 ;
	g,8( d' )g |
%109-112
	\slursDown \slurnote
	\time 4/4 ;
	\relative c'
	r4 d( c b8 )a |
	r8 a( a a f' a, g' )a |
	r8 g,( c )d e( d g, )c |
	\slurstem \slursPop
	\time 6/8 ;
	d4.( )e |
%113-116
	\time 4/4 ;
	r8 a,8( a a d a e' )f |
	r8 g,8( g g c g d' )e |
	\time 6/8 ;
	r8 a, a r8 a a |
	\time 4/4 ;
	r2 r4 r8 a~|
%117-121
	\time 6/8 ;
	a4.~a8 f d |
	bes'4.~bes8 d, bes |
	r4. a' | g8 r8 r8 r4. |
	r4. <g8( d> c )d |
%122-137
	\time 4/4 ;
	\RondoAtenor
	g8( )c,4-. c8_-~c4 c |
	c,8( )g'4-. g8^-~g4 g |
%138-141
	s1 |
	\relative c''
	\property Voice.NoteColumn \push #'force-hshift = #-0.5
	g8( )c,4-. c8^-~c4 c |
	c,8( )g'4-. g8_-~g4 g |
	s1 |
%142-144
	\clef treble ;
	\relative c'''
	g8( )c,4-. c8~c4. c8 |
	\property Voice.NoteColumn \pop #'force-hshift
	s1*2 |

%145-148
	\clef bass ;
	\diddle | \diddle | \diddle | \diddle |
%149-153
	\diddle | \diddle | \diddle | \diddle | \diddle |
%154-158
	\diddle | \diddle | \diddle | \diddle | \diddle |
%159-162
	\relative c'
	g8( )f4-. f f f8 | g8( )f4-. f f f8~ |
	f8( )g4-. g g g8 | f8( )g4-. g g g8~ |
%163-166
	g8( )f4-. f f f8 | g8( )f4-. f f f8 |
	es8( )f4-. f f f8 | es( )f4-. f f f8 |
%167-171
	\diddle | \diddle | \diddle | \diddle | \diddle |
%172-176
	\diddle | \diddle | \diddle | \diddle | \diddle |
%177-180
	\relative c
	s1 | s1 |
	f8( )g4-. g g g8 |
	f8( )g4-. g8~g b,4. |
%181-184
	s1 | s1 |
	\diddle | \diddle |
%185-188
	\relative c
	cis8 c4.~c8 b~b4 | s1 |
	dis8 d4.~d8 cis~cis4 | s1 |
%189-191
	f8 e4.~e8 r8 r4 |
	f8 e4.~e8 r8 r4 |
	R1 |
%192-195
	\relative c'
	r8 e4 e8~e e,( a )e' |
	r8 a,4 a8~a( e )a4 |
	r8 g4 g8~g d( g )d' |
	r8 g,4 g8~g( d )g4 |
%196-201
	< { \relative c  r8 es4 es8~es c es ges }
	  { \relative c, r8 es4 es8~es c( es )ges } > |
	\relative c
	r8 es4 es8~es c( es )ges |
	r8 d4 d8~d c( g' )c |
	r8 d4 d8~d( c )g'4 |
	\relative c,
	r8 d4 d8~d c( g' )c |
	r8 d4 d8~d g( a )b |
%202-223
	\RondoAtenor
	g8( )c,4-. c8_-~c4 c |
	bes8( )f4-. f8~f4 f |
	c'8( )f,4-. f8~f4 c |
	r8 f4-. f8_-~f c c' \staffUp c' |
	\staffDown \relative c
	aes8( es' )aes4 bes,8( f' )aes4 |
	g8( )c,4-. c8_-~c4. c8 |
	bes8( d )a'4 r8 <bes4^> f d> a8^> |
	<g1 c,> |
}

% Bass

RondoAbass = \notes
{
	\relative c'
	g1 | bes,2 g |
	g'1 | bes,4. g~g4 |

	g'1 | bes,2 g |
	g'1 | bes,4. g4.~g4 |

	f1 | g4. es8~es2 |
	f1 |
	\stemsUp
	<es4._- bes'> <f4._- c'> <aes4_- es'> |
	\stemsPop
	g'1 | bes,2 g |
}

bass = \notes \relative c'
{
	\slursDown \tiesDown \dotsDown \stemsDown
%1-4
	g1 | bes,2 g |
	g'1 | \dotsUp bes,4. g~g4 \dotsPop |
%5-8
	g'1 | bes,2 g |
	g'1 | bes,4. g f4 |
%9-12
	r8 c4_. c8_-~c4 g | r8 c4_. c8_-~c4 g |
	r8 c4_. c8_-~c4 g | r8 c4_. c8_-~c4 g |
%13-29
	\RondoAbass
	g'1 |
	<aes, es'> |
	\time 6/8 ; f4. g |
%30-33
	\time 4/4 ;
	\relative c,
	r8 c4_. c8_-~c4 g |
	r8 c4_. c8_-~c4 g |
	r8 c4_. c8_-~c4 g |
	r8 c4_. c8_-~c4 g |
%34-51
	\RondoAbass
	g'1 |
	\stemsBoth
	es1 |
	\stemsPop
	\time 7/8 ;
	f,4. g4. g8 |
	f4. g2 |
%52-55
	\time 4/4 ;
	<c1 g'> |
	\stemsUp \dotsUp
	\time 6/8 ;
	aes4.( )g |
	\dotsPop \stemsPop
	\time 4/4 ;
	<c1 g' c> |
	\time 6/8 ;
	r8 aes8( )ges' r8 g,( )f' |
%56-63
	\time 4/4 ;
	<c1 g' c> |
	\time 7/8 ;
	\relative c 
	r8 [aes( )ges'] r8 [g,( f' )b] |
	r8 [aes,( )ges'] [g,( d' f )b] |
	\time 4/4 ;
	<f,1 aes'> | <g b'> | <d fis'> |
	\stemsBoth \tiesDown \slursUp
	r8 g4 g8~g d'( g )c |
	r8 g,4 g8~g( d' )b'4 |
	\tiesPop \stemsPop
%64-67
	\relative c'
	f4( )aes8 es4( )g8 c,4 |
	aes4. g es4 |
	f4( )aes'8 g,4( )g'8 bes,4 |
	\property Voice.NoteColumn \push #'force-hshift = #-0.25
	c4. f es4 |
	\property Voice.NoteColumn \pop #'force-hshift
%68-72
	\relative c'
	f4( )aes8 es4( )g8 c,4 |
	aes4. g es4 |
	\slursPop
	\stemsBoth \dotsUp
	f4. d c4 |
	\dotsPop \stemsPop
	b1 | g1 |
%73-91
	\RondoAbass
	g'1 | bes,1 |
	a1 | aes1 | g1 |
%92-95
	\time 7/8 ;
	f4. g2 | es4. c2 | d4. es2 |
	\time 6/8 ;
	d4. bes' |
%96-100
	\time 7/8 ;
	f4. g2 | es4. c2 | d4. es2 |
	\time 3/8 ;
	f4. |
	\time 4/4 ;
	g1 |
%101-104
	\time 7/8 ;
	g4. a2 | f4. d2 | e4. f2 |
	\time 6/8 ;
	e4. f |
%105-108
	\time 7/8 ;
	g4. a2 |
	\time 9/8 ;
	f4. d2. |
	\time 7/8 ;
	e4. f2 |
	\time 3/8 ;
	g4. |
%109-112
	\time 4/4 ;
	<a2 e'> r2 | d2 r2 | s1 |
	\time 6/8 ;
	r8 bes4 r8 c4 |
%113-116
	\time 4/4 ;
	d4( g f e8 )d |
	c4( d e d8 )c |
	\time 6/8 ;
	<bes4. f'> <a e'> |
	\tiesBoth
	\time 4/4 ;
	<g4 d' bes'> <bes f' d'>~<bes8 f' d'> <c( g' c> c' )a |
	\tiesPop
%117-121
	\time 6/8 ;
	d,8 a4~a4. |
	f'8 bes,4~bes4. |
	f8( f' e d e )f |
	g( d16 f )g8 g,( c <)d, d'> |
	<g,8( g'> d'16 f )g8~g4. |
%122-125
	\time 4/4 ;
	\RondoAbass
	g'1 |
	c,,1 |
%138-141
	R1 |
	\relative c''
	g1 |
	c,,1 |
	R1 |
%142-144
	\clef treble ;
	\relative c'''
	g1 |
	\slursUp
	bes,8( d )a'4-. r2 |
	\slursPop \stemsUp
	bes,,8( d )a'4-. r2 |
	\stemsPop
%145-148
	\clef bass ;
	\relative c
	b1~ | b | b~ | b |
%149-153
	b~ | b | b~ | b | b~
%154-158
	b | b~ | b | a~ | a |
%159-162
	c~ | c | b ~ | b | 
%163-166
	c~ | c | a~ | a |
%167-171
	b~ | b | b~ | b | b~ |
%172-176
	b | b~ | b | a~ | a |
%177-180
	<c c,>~ | <c c,> |
	\property Voice.TextScript \pop #'style
	\property Voice.TextScript \push #'style = #"italic"
	<b b,_"col pedale"> | <b b,> |
%181-184
	<c c,>~ | <c c,> |
	b,~ | b |
%185-188
	a | aes | b | bes |
%189-191
	cis | cis2.~cis8 c |
	ges'8( g a aes bes b es )d |
%192-195
	\property Voice.SustainPedal \push #'padding = #10
	< {c1} {s2.-\sustaindown s8 s8-\sustainup} > |
	< {b1} {s2.-\sustaindown s8 s8-\sustainup} > |
	< {bes1} {s2.-\sustaindown s8 s8-\sustainup} > |
	< {a1} {s2.-\sustaindown s8 s8-\sustainup} > |
%196-201
	aes1 |
	< {<aes1 aes'>} {s2.-\sustaindown s8 s8-\sustainup} > |
	< {<g1 g'>} {s2.-\sustaindown s8 s8-\sustainup} > |
	< g'1 {s2.-\sustaindown s8 s8-\sustainup} > |
	< {<g,1 g'>} {s2.-\sustaindown s8 s8-\sustainup} > |
	<g'2 g'-\sustaindown> r2-\sustainup |
%202-205
	\relative c'
	\RondoAbass
	g'1 | bes, |
	c | f,, |
	aes'2 bes | g'1 |
	bes,2 <g^> g'> |
	<c,,1 c'1> |
}

% Dynamics

dynamics = \notes
{
	\dynsDown \dpadv
	\time 4/4 ;
%1-6
	s1_\mf | s1*5 |
%7-13
	\dpadPop \dpadviii
	s1*4 | s1 \decr | s2. \rced s4 |
	\dpadPop \dpadv
	s1_\mp |
%14-20
	s1*7 |
%21-26
	s1*6 |
%27-33
	s1*2 |
	\dpadPop \dpadviii
	\time 6/8 ;
	s2.-\f |
	\time 4/4 ;
	s1 \> | s1*2 | s2. \! s4 |
%34-38
	\dpadPop \dpadv
	s1-\mp | s1*4 |
%39-45
	s1*7 |
%46-51
	s1*4 |
	\time 7/8 ;
	\dpadPop \dpadvii
	s4.-\f s2 | s4. s2 |
%52-56
	\time 4/4 ;
	s1 |
	\time 6/8 ;
	s2. |
	\time 4/4 ;
	s1 |
	\time 6/8 ;
	s2. |
	\time 4/4 ;
	s1 |
%57-63
	\time 7/8 ;
	s4. s2 | s4. s2 |
	\time 4/4 ;
	s1*3 | s1 \> | s2. \! s4 |
%64-68
	s1-\p | s1*4 |
%69-74
	\dpadPop \dpadx
	s1 | s2. \< s8 \! s8 |
	\dpadPop \dpadxix
	s1-\mf | s1 |
	\dpadPop \dpadv
	s1-\mp | s1 |
%75-81
	s1*7 |
%82-88
	s1*7 |
%89-94
	s1*3 |
	\time 7/8 ;
	s4.-\mf s2 | s4. s2 | s4. s2 |
%95-100
	\time 6/8 ;
	s2. |
	\time 7/8 ;
	s4. s2 | s4. s2 | s4. s2 |
	\time 3/8 ;
	s4. |
	\time 4/4 ;
	\dpadPop \dpadx
	s8 s8 \> s2 s8 \! s8 |
%101-104
	\time 7/8 ;
	\dpadPop \dpadvii
	s4.-\mp s2 | s4. s2 | s4. s2 |
	\time 6/8 ;
	s2. |
%105-108
	\time 7/8 ;
	s4. s2 |
	\time 9/8 ;
	s4. s2. |
	\time 7/8 ;
	s4. s2 |
	\time 3/8 ;
	s4. |
%109-113
	\time 4/4 ;
	s1-\f | s1*2 |
	\time 6/8 ;
	s2.-\f |
	\time 4/4 ;
	s1-\mf |
%114-120
	s1 |
	\time 6/8 ;
	s4. \< s4 \! s8 |
	\time 4/4 ;
	s1-\f |
	\time 6/8 ;
	s2.*4 |
%121-126
	\dpadPop \dpadiv
	s4. s4 \> \! s8 |
	\time 4/4 ;
	\dpadPop \dpadv
	s1-\mp | s1*4 |
%127-133
	s1*7 |
%134-140
	s1*7 |
%141-147
	s1 | s1-\p | s1*2 | s1-\p | s1*2 |
%148-154
	s1*7 |
%155-161
	s1*7 |
%162-168
	s1*2 | s2. s8 \< \! s8 | s1-\mf | s1 | s1-\p | s1 |
%169-175
	s1*7 |
%176-182
	s1*7 |
%183-189
	s1-\mf | s1*6 |
%190-195
	\dpadPop \dpadxix
	s1 | s2. \< s8 \! s8 |
	\dpadPop \dpadvii
	s1-\f | s1*3 |
%196-201
	s1*5 | s2 s8 s8 \> s8 \! s8 |
%202-208
	\dpadPop \dpadv
	s1-\mf | s1*6 |
%209-215
	s1*7 |
%216-223
	s1*8 |
}

%======================================================================

% SCORE BLOCK

\score
{
	\context PianoStaff \notes
	\simultaneous
	{
		\context Staff = top
		<
			\property Staff.textEmptyDimension = #1
%			\property Score.barNumberScriptPadding = #10
			\time 4/4 ;
			\key f \major ;
			\tempi
			\context Voice = soprano \soprano
			\context Voice = alto \alto
			\context Voice = dynamics \dynamics
		>
		\context Staff = bottom
		<
			\property Staff.textEmptyDimension = #1
			\time 4/4 ;
			\key f \major ;
			\clef bass ;
			\context Voice = tenor \tenor
			\context Voice = bass \bass
		>
	}

% The paper block.  Note that it has to be included in the
% \score block in order to use \translator to add/remove engravers
% to contexts.

	\paper
	{
		\translator
		{
			\ScoreContext
			\remove Bar_number_engraver ;
		}
	}

%	\midi
%	{
%		\tempo 4 = 135 ;
%	}
}