mutopia/J.S.Bach/Solo-Cello-Suites/courante-urtext.ly

   1 % courante-urtext.ly
   2 % belongs together with -cello.ly and -alto.ly
   3 % (who is going to make a -violin.ly?)
   4
   5 %{
   6 Well, there are still some scripts in this "urtext".
   7 But merging melodic and scripts doen't work too well yet (see alto_scripts).
   8 %}
   9
  10 n = { \slurnormal }
  11 d = { \slurdotted }
  12
  13 courante_a = \melodic \relative c {
  14         d'16 |
  15         [d a f a] [d, f g a]\d[bes()a bes()g] |
  16         \voiceone <g4 a> s4 \onevoice \d[g16()f g()e] |
  17         % urg, a good case for mean-distance-beam-dir-algorithm!
  18         [f()d e()c!]\n[bes(a)bes a'][g f e d] |
  19         %4
  20         % [cis e \n a,(\d(b][[cis d e f][)g )bes-- a e] |
  21         [cis e \n a,(b][[cis d e f][)g bes-- a e] |
  22         % [f a \n d,(\d( e][f g a bes][)c )bes-- d c] |
  23         [f a \n d,( e][f g a bes][)c bes-- d c] |
  24         \n\voiceone <c4~ f,> <[c16 f,> bes a g] \onevoice [f()es d()es] |
  25         %7
  26         [d bes(a)bes][d bes e! bes][f' bes, g' bes,] |
  27         \d[e,( g )c d][e f g a][bes()a bes()g]|
  28         \n[a f(e)f][a f bes f][c' f, d' f,] |
  29         %10
  30         [cis( e )a b][cis d e f][g()f g()e] |
  31         [d,( a' )f' e]\n[d()c d()c][b()a b()a] |
  32         \n[gis( a )b e,]\n[f()e f()d][e()c d()b] |
  33         %13
  34         \n[c a'( b c][b a gis)a][d, a' e a] |
  35         [f a( b c][b a gis)a][f a e a] |
  36         [dis, a'( b c][b a gis)a][e a e gis] |
  37         [a e cis e][a, cis e gis] a8. e'16 |
  38         %17
  39         [e cis a cis][e, f g a][bes()g cis()g] |
  40         \voiceone d'4 ~ [d16 a d e][f d a c!]\onevoice |
  41         \n[b16 f(d)f]\d[g, d'(f)g][b f d' f,] |
  42         %20
  43         [e g c,(d][e f g a][)bes! d c g] |
  44         \voiceone a s16*3 s4 s4
  45         d, ~ [d16 e! f g] \onevoice [a bes c d] |
  46         %23
  47         [e, bes(a)g][a f' \n g,()f]\d[c()g' f' e] |
  48         [f a( bes a][g f e )f][g e f d]|
  49         [cis g' b, g'][a, g' b, g'][cis, g' a, g']|
  50         %26
  51         [f d f a][d a d e][f a, f d]|
  52         [g, d'(g)a][bes g' a, f'][g, e' f, d']|
  53         \n[cis(d)e cis][a cis bes cis][a cis g cis]|
  54         %29
  55         \n[f, d'(e f][e d cis)d][g, d' a d]|
  56         \d[bes d(e f][e d cis)d][bes d a d]|
  57         [gis, d'(e f][e d cis)d][a d a cis]|
  58         [d a f a][d, f a, d]
  59         d,8.
  60 }
  61
  62 courante_b = \melodic \relative c {
  63         \voicetwo
  64         \stemdown
  65         s16 |
  66         s2. |
  67         %2
  68         \n cis4 ~ [cis16 d e f] s4 |
  69         s2.*3 |
  70         %6
  71         { a,4 s2 }
  72         s2.*11
  73         %18
  74         f'4 s s |
  75         s2.*2
  76         %21
  77         [f16 c'(bes a][g f es d] [)es c' f, es] |
  78         bes4 s s
  79 }
  80
  81 courante =  \type Staff \melodic<
  82  \$courante_a
  83  \$courante_b
  84 >
  85