mutopia/J.S.Bach/wtk1-fugue2.ly

   1 \header {
   2   title =       "Fuga a 3 voci";
   3   opus =        "BWV 847-Fuga";
   4   source =      "Henle's Urtext";
   5   composer =    "Johann Sebastian Bach (1685-1750)";
   6   enteredby =   "hwn, wl, jcn";
   7
   8   % mutopia headers.
   9   mutopiatitle = "Das Wohltemperierte Clavier I, Fuga II (c-minor)";
  10   mutopiacomposer = "J. S. Bach (1685-1750)";
  11   mutopiainstrument = "Piano";
  12   mutopiaopus = "BWV847";
  13   style = "baroque";
  14   copyright = "Public Domain";
  15   tagline =    "\\\\This music is part of the Mutopia project, http://sca.uwaterloo.ca/Mutopia/\\\\It has been typeset and placed in the public domain by Han-Wen Nienhuys.\\\\Unrestricted modification and redistribution is permitted and encouraged - copy this music and share it!";
  16   maintainer = "hanwen@cs.uu.nl";
  17   lastupdated = "2000/Feb/14";
  18 }
  19
  20
  21 % It would be nice to squeeze this onto two pages, but I am not sure
  22 % if it would work with US paper.
  23
  24 \version "1.3.59";
  25
  26
  27 dux = \context Voice=two \notes \relative c''{
  28   \voicetwo
  29   \clef violin;
  30
  31   r8 c16 b c8 g as c16 b c8 d |
  32   g, c16 b c8 d f,16 g as4 g16 f |
  33   es c' b a g f! es d c8 es' d c |
  34   bes a bes c fis, g a fis |
  35 %%5
  36   g4 r16 c, d es f g as8~ as16 d, es f |
  37   g a bes8 ~ bes16 es, f g as g f es d8 c'16 b! |
  38           % forced accident!
  39   c4 r4 r8 f es d |
  40   r8 as g f g f16 es f8 d |
  41   g4 r8 b c c16 b c8 g |
  42 %%10
  43   as4 r8 a bes bes16 a bes8 f |
  44   g4 r8 g as as g f |
  45   r8
  46   \translator Staff = bass \stemup
  47   as, bes c r8 as16 g as8 f8 |
  48   bes8 c bes as bes g f es |
  49   f des' c bes c as g f |
  50 %%15
  51   g8
  52   g'16 fis g8 c,
  53   es \translator Staff = treble \stemdown g16 fis! g8 a |
  54   d, g16 fis g8 a! c,16 d es4 d16 c |  % forced accident!
  55   bes8 r8 r16 d e fis g a bes8 ~ bes16 e, f g |
  56   a bes c8 ~ c16 fis,16 g a bes8 es,!16 d es8 g, |
  57   as f'16 es f8 a,8 bes g'16 f g8 b, |
  58 %%20
  59   c16 f \translator Staff = bass \stemup es d c bes! as g
  60   f8 \translator Staff = treble \stemdown as' g f |
  61   es d es f b, c d b |
  62   c4 r8 e8 f f16 e f8 c |
  63   d4 r8 d8 es8 es16 d es8 bes |
  64   c2 ~ c8 d16 es f es f d |
  65 %%25
  66   b8 r8 r b c r r es |
  67   d r r f ~ f r r f |
  68   es as g f es d es f |
  69   b, c d b b c r c |
  70   f16 d es c ~ c8 b c4 r8 e |
  71 %%30
  72   f4 r8 f f es16 d es8 <f as> |
  73   <b, d> r <b d> r <g2 c> |
  74 }
  75
  76
  77 comes = \context Voice=one \notes \relative c'' {
  78   \voiceone
  79   R1 |
  80   R1 |
  81   r8 g'16 fis g8 c, es g16 fis g8 a |
  82   d,8 g16 fis g8 a c,16 d es4 d16 c |
  83 %%5
  84   bes8 es16 d es8 g,8 as f'16 es f8 a,
  85   bes8 g'16 f g8 b, c8 d16 es f4 ~ |
  86   f8 es16 d c16 bes ! as g f8 as' g f
  87   es d es f b, c d b |
  88   c g'16 fis g8 d es4 r8 e8 |
  89 %%10
  90   f f16 e f8 c8 d4 r8 d |
  91   es8 es16 d es8 bes c es16 d es8 f |
  92   bes, es16 d es8 f as,16 bes c4 bes16 as |
  93   \stemboth g16 es f g as bes c d es d c d es f g a |
  94   bes f, g as bes c d e f es d es f g a b |
  95 %%15
  96   \stemup c8 b16 a g f! es d c8 es d c |
  97   bes a bes c fis,! g a fis |    % forced accident
  98   g8 d'16 c d8 r8 r8 e16 d e8 r8 |
  99   r fis16 e fis8 r r g,16 f g8 r8 |
 100   r8 a16 g a8 r r b16 a b8 r |
 101 %%20
 102   r8 c16 b c8 g as c16 b c8 d |
 103   g, c16 b c8 d f,16 g as4 g16 f |
 104   es8 c'16 b c8 g as4 r8 a |
 105   bes8 bes16 a bes8 f8 g4 r8 g ~ |
 106   g as16 bes c b c as f2 ~ |
 107 %%25
 108   f8 d'16 c d8 f, es es'16 d es8 g, |
 109   f f'16 es f8 as, g16 f' es d c b a g |
 110   c8 f es d r as g f |
 111   g f16 es f8 d as' g r a |
 112   b c f,16 es d c c8 c'16 b c8 g |
 113 %%30
 114   as c16 b c8 <d b ! as !> g,8 c16 b c8 d |
 115   f,16 g as4 g16 f e2 |
 116 }
 117
 118 bassdux = \context Voice=three \notes \relative c' {
 119   \clef bass;
 120   R1 |
 121   R |
 122   R |
 123   R |
 124 %%5
 125   R |
 126   R1 |
 127   r8 c16 b c8 g as c16 b c8 d |
 128   g, c16 b c8 d f,16 g as4 g16 f |
 129   es c' b a g f es d c d es d c bes! as! g |
 130           % -> \classic_accidentals
 131 %%10
 132   f bes' as g f es d c bes c d c bes as g f |
 133   es as' g f es des c bes as8 c' bes as |
 134   g8 f g as d, es f d |
 135   es as g f g es d c |
 136   d bes' as g as f es d! |
 137 %%15
 138   es8 r8 r4 r8 c bes a |
 139   r es' d c d c16 bes c8 d |
 140   g,8 bes'16 a bes8 d, es c'16 bes c8 e, |
 141   f d'16 c d8 fis, g4 r16 g, a b |
 142   c16 d es8~ es16 a, bes c d es f8~ f16 b, c d |
 143 %%20
 144 % es8 r r e f f, es! d |     % -> \classic_accidentals
 145   es8 r r e \stemdown f f, es! d \stemboth |
 146   r as' g f g f16 es f8 g |
 147   c16 d es d c bes as g f bes' as g f es d c |
 148   bes c d c bes as g f es as' g f es d c bes |
 149   as bes c bes as g f es d g' f es d c b a |
 150 %%25
 151   g4 r4 r16 g a b c d es f |
 152   g f as g f es d c b8 c16 b c8 g |
 153   as c16 b c8 d g, c16 b c8 d |
 154   f,16 g as4 g16 f es4 r8 es' |
 155   d c g' g,
 156 %%30
 157   \context Staff=bass <
 158     {\stemup c2 ~ | c1 ~ | c1 }
 159     \context Voice=four {\stemdown c,2 ~ | c1 ~ | c1 }
 160   >
 161 }
 162
 163 \score {
 164
 165     \notes \context PianoStaff <
 166         \context Staff = treble <
 167             \key c \minor;
 168 %       \key es \major;
 169             \dux
 170             { \comes \bar "|."; }
 171               \time 4/4;
 172               \property Score.timeSignatureStyle = "C"
 173           >
 174         \context Staff = bass <
 175             \key c \minor;
 176             \bassdux
 177         >
 178     >
 179
 180     \paper {
 181         linewidth = 18.0 \cm;
 182         \translator{ \OrchestralScoreContext }
 183     }
 184     \header{
 185         opus = "BWV 847";
 186     }
 187
 188     \midi {
 189         \tempo 4 =84;
 190     }
 191 }
 192