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

   1 % sarabande-urtext.ly
   2 % belongs together with -cello.ly and -viola.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 viola_scripts).
   8 %}
   9
  10 n = { \slurnormal }
  11 d = { \slurdotted }
  12
  13 %
  14 % ugh, the non-shortened beamstems of voice in forced direction
  15 % look ugly here!
  16 sarabande_a = \notes \relative c {
  17         \voiceone \d[d8.()e16] e4.-\trill([d16 )e] |
  18         f4. \onevoice [e8(d)c] |
  19         [bes g']\n[f e16(f][g a bes)d,] |
  20         cis4.-\trill\d[b8(a)g] |
  21         % copy bar 1, half bar 2
  22         \voiceone \d[d'8.()e16] f4.-\trill([d16 )e] |
  23         %5
  24         f4. \onevoice [d8(e)f] |
  25         \n[g bes16()a][c()bes a()g][d'8 f,] |
  26         \voiceone e4.-\trill \onevoice \d[d8(c)bes] |
  27         %8
  28         \voiceone \n[f' g16()a] a4. [g16()f] |
  29         [g8 a16()bes]bes4. [c16()d]|
  30         % 11
  31         \onevoice \d [e,8()f][c, g'][f'()e] |
  32         f4 f,2 |
  33         \voiceone a'4 \d a4.-\trill()bes8 |
  34         [c bes16()a] \onevoice [fis8.-\trill()es16][d8()c] |
  35         [bes g'][a, fis'][es'()d] |
  36         %16
  37         \voiceone bes4.-\trill \onevoice [a8(g)f!] |
  38         [e bes()a f'(g)a] |
  39         [d, as()g es'(f)g]|
  40         [cis, bes'][a g16()f][e!8 f16()d] |
  41         [cis8 e16()a][a,8. g'16]\n[f8()e] |
  42         %21
  43         \voiceone [d e16()f]f4. [e16()d] |
  44         [e8 f16()g]g4. [a16()bes] |
  45         \d[a8 cis16()d][d,8 e16(f32)g][f8-\trill \n e16()d] |
  46         d4 [d,16 a'( b cis][d e f )g] |
  47         %25
  48         [a(b c)b] c4. [b16()a] |
  49         \d[b(cis d )cis] d4. \n[e16()f] |
  50         \onevoice [d(cis)d f,] [a,8 e']\d[d'()cis] |
  51         d4 d,,2 |
  52 }
  53
  54 sarabande_b = \notes \relative c {
  55         \voicetwo
  56 % dispute
  57 %       d4 a2 |
  58 %       this avoids the clash bug
  59         d8. s16 a2 |
  60         <a4. d,> s8*3 |
  61         s2.*2
  62         %5
  63 %disp
  64 %       <a4 f> a2 |
  65         <a8. f> s16 a2 |
  66         <a4. d,> s8*3 |
  67         s2. |
  68         % 8
  69         <g4. c,> s8*3  |
  70         a4 <bes4. d> r8 |
  71         %10
  72         bes4 <g2 f'> |
  73         s2.*2 |
  74         \d[f'8()es] es4. r8 |
  75         d4 s2 |
  76         %15
  77         s2. |
  78         <d4. g,> s8*3  |
  79         s2.*4 |
  80         %21
  81         bes4 g2  |
  82         g4 <bes4. cis,> s8 |
  83         <d8 a f> r r g, a4 |
  84         s2. |
  85         f'4 fis4. s8 |
  86         <d4 g,> gis4. s8 |
  87 }
  88
  89
  90 sarabande = \type Staff \notes<
  91         \$sarabande_a
  92         \$sarabande_b
  93 >
  94