input/mutopia/W.A.Mozart/mozart-hrn3-rondo.ly

   1 \version "1.7.18"
   2
   3 % \include "mozart-hrn3-defs.ly"
   4
   5 rondotheme = \notes \relative c' {
   6          c'8-[ c c]  c-[ c c]
   7         c4( cis8  d-) r g,
   8          d'8-[ d d]  d-[ d d]
   9         d4( dis8  e-) r c |
  10          c-[( d-) e]  f-[ g a]
  11          g-[ ( e-) c] c4 d8
  12         e4( d8-) e4( f8-)
  13         e4.( d8-) r r |
  14 }
  15
  16 lipbreaker = \notes \relative c'
  17 {
  18         r8  g'-[-. g-.]  c-[( e-) g,-.]
  19          c-[( e-) g,-.]  c-[( e-) g,-.]
  20          c-[ c, c]  c-[ c c]
  21          c-[ c c]  c-[ c c]
  22 }
  23
  24 rightsixteenth = { \property Voice.stemLeftBeamCount = 1
  25   \property Voice.stemRightBeamCount = 2 }
  26 leftsixteenth = { \property Voice.stemLeftBeamCount = 2
  27   \property Voice.stemRightBeamCount = 1 }
  28 bothsixteenth = { \property Voice.stemLeftBeamCount = 2
  29   \property Voice.stemRightBeamCount = 2 }
  30
  31 rondo = \notes  \relative c'
  32 {
  33         \partial 8
  34         \time 6/8
  35         \key c \major
  36
  37         g'8-\p |
  38
  39         \rondotheme
  40
  41         R2.*13 |
  42         r8 r^\fermata d  d-[ e f]
  43          g-[ ( e-) c-.]  d-[( e-) d-.]
  44         c4 c8  d-[ e f]
  45          g-[( e-) c-.]  d-[( e-) d-.]
  46         c4 r8 r4 r8 |
  47         R2.*7
  48         \mark  "A"
  49         c4.-\p \grace { e16( }  d8-[-) c d]
  50         c4 r8 r4 r8
  51         e4. \grace g16(  f8-[-) e f]
  52         e4 r8 r4 r8
  53         g4. e4 c8
  54         g2.~
  55          g8-[ a b]  c-[ d e ]
  56         e4.( d8-) r r
  57         R2.*4
  58         e2.~ |
  59          e8-[ d c]  c-[ b a]
  60         d2.~
  61          d8-[ c b]  b-[ a g]
  62         g'4( e8-) b4( cis8-)
  63         \mark "B"
  64         d4 r8 r4 r8
  65         R2.*3 |
  66         r8  d-[-. d-.]  d-[( g-) d-.]
  67          d-[( g-) d-.]  d-[ d d]
  68          d-[( g-)] r r4 r8
  69         R2.*1
  70         \lipbreaker
  71         c4 r8  c'-[ d e]
  72         d4( g8-)  c,-[ d e]
  73         d4 r8 r4 r8
  74         R2. |
  75         r4 r8  c-[-. d-. e-.]
  76         d4( g8-)  c,-[ d e]
  77          d-[( g-) fis]  e-[ d c]
  78          b-[ ( e-) d]  c-[ b a]
  79         \mark "C"
  80         g4 r8 r4 r8
  81         R2. |
  82         %
  83         r8  g-[-\f g]  g-[(  b-) b-.]
  84          b-[( d-) d-.]  d-[( g-) g-.]
  85         g2.~
  86          g8-[ \> a g]  f-[ e d]
  87         < \rondotheme
  88           { \! s8-\p } >
  89
  90         R2.*12
  91         r4 r8 r4 c8
  92         \mark "D"
  93         c4 f8 c4 a8
  94         a4.~a4 a8
  95         bes4 c8 d4 bes8
  96         g4. ~ g8 r r
  97         R2.*3
  98         r4 r8 r4 c8
  99         a4. c
 100         f ~  f8.-[ \rightsixteenth e16(  \bothsixteenth d  c-)]
 101         bes4 g8 e4 g8
 102         c,4. ~ c8 r r
 103         R2.*3|
 104         r4 r8 r4 c'8
 105         b4( c8-) b4( c8-)
 106         bes4. ~ bes4 g8
 107         a4 ( c8-) f4 ( b,8-)
 108         d4. ( c8-) r r
 109         R2.*3|
 110         r4 r8 r4 c'8
 111         b4( c8-) b4( c8-)
 112         bes4. ~ bes4 g8
 113         a4 c8  f-[ ( d-) b!]
 114         d4. ( c8-) r r
 115         \mark "E"
 116         R2.*9  |
 117         \lipbreaker
 118          c8-[ c' c] c4.~
 119          c8-[ c d]  e-[ e fis]
 120         g4 r8 r4 r8
 121         R2.
 122         r8  g,-[ g]  g-[ g g] |
 123         es'4. ~  es8-[ d c]
 124         b4 r8 r4 r8
 125         R2. |
 126         r8  g-[ g]  g-[ g g]
 127         es'4. ~  es8-[ d c]
 128         \cresc b4.  c4. d4. e4.
 129         \mark "F"
 130         \endcresc
 131
 132         f2.-\f ~ |
 133         f4 r8 r4 r8
 134         r8  g,-[\> g]  g-[ g g]
 135
 136         % Edition breitkopf says a-flat (silly!)
 137          fis-[  g gis]
 138                   a-[ bes \! b]
 139
 140         %% EB does the slur in the Rondo differently from the 1st adn 2nd time.
 141         %% why. Should check with MS.
 142         < \rondotheme
 143           { s8-\p } >
 144         R2.*7
 145         \mark "G"
 146         R2.*4
 147         c,4.-\mf c4 c8
 148         c4. e4 c8
 149         g'4. g4 g8
 150         g4. g,4 g8
 151         c4 r8 r4 r8
 152         r4 r8 r4 g'8
 153          c-[ ( e-) g,-.]         c-[ ( e-) g,-.]
 154          c-[ ( e-) g,-.]         c-[ ( e-) g,-.]
 155         \mark "H"
 156         \cresc g'2.  bes,2.
 157         a4.  b16-[ c d e f g]
 158         a4. f4 d8
 159         [\endcresc c8-\f g' e]  c-[ g e]
 160          c-[ e' c]   g-[ e c]
 161         g4 r8  g''8-[ e c]
 162
 163
 164         < d2.(-\trill
 165           { s2  \grace {   c16-[ d] } } >
 166
 167
 168          c4-) r8 r4 r8
 169         R2.*5
 170         r8 r8^\fermata d8-\p  d-[ e f]
 171          g-[ ( e-) c]  d-[( e-) d]
 172         \cresc  c-[  c c]  d-[ e f]
 173          g-[( e-) c]  d-[( e-) d]
 174         \endcresc c4-\f  r8 r4 r8
 175         R2.*5
 176          c8-[-\f c, c]  c-[ c c]
 177         c4 r8 c4 r8
 178
 179         %This is technically incorrect, since we started with an 8th
 180         % upstep, but both eulenburg and EB do this as well.
 181         c4 r8 r4 r8 \bar "|."
 182 }
 183
 184
 185
 186
 187
 188 \score
 189 {
 190     \notes { \transpose c' bes  \rondo }
 191         \header { piece = "rondo" opus = "" }
 192         \midi{ \tempo 4 = 100 }
 193         \paper { }
 194 }
 195 %% new-chords-done %%