mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly

   1 %{
   2
   3  Six Petits Preludes,
   4  Collection Johann Peter Kellner
   5  ca 1703 - 1707
   6
   7  Kellner was a student of Bach's that copied some 90 works of his master.
   8
   9 %}
  10
  11 \header{
  12   copyright =    "public domain";
  13   source = "Ed. Henry Lemoine Urtext";
  14   title =        "Pr\\\"aludum";
  15   opus = "BWV 926";
  16   composer =     "Johann Sebastian Bach (1685-1750)";
  17   enteredby =    "jcn,hwn";
  18
  19   % mutopia headers.
  20   mutopiatitle = "Prelude";
  21   mutopiacomposer = "J.S.Bach";
  22   mutopiaopus = "BWV926";
  23   mutopiainstrument = "Piano";
  24   style = "baroque";
  25   copyright = "Public Domain";
  26   maintainer = "Jan Nieuwenhuizen";
  27   maintainer_email = "janneke@gnu.org";
  28   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 " + \maintainer + ".\\\\Unrestricted modification and redistribution is permitted and encouraged - copy this music and share it!";
  29   maintainer = "janneke@gnu.org";
  30   lastupdated = "1999/Nov/14";
  31
  32 }
  33
  34 \version "1.3.4";
  35
  36 upper = \context Staff \notes\relative c
  37         \context Voice=i {
  38         \property Voice . textStyle = "italic"
  39
  40
  41         [d'8 a' f d a' f] |
  42         d a' f d a' f |
  43         d bes' g d bes' g |
  44         d bes' g d bes' g |
  45         %5
  46         cis, g' e cis g' e |
  47         cis bes' g e a g |
  48         f d f a f a |
  49         d a d f d f |
  50         b  f e d c b |
  51         %10
  52         a gis fis e d' b |
  53         <
  54                 {
  55                         \stemup
  56                         \property Voice . textStyle = "roman"
  57                         c4-\mordent^"(\\textsharp)" r r |
  58                         c4-\mordent^"(\\textsharp)" r r
  59                         \property Voice . textStyle = "italic"
  60                 }
  61                 \context Voice=ii { \stemdown a4 r r | a4 r r }
  62         > |
  63         \stemboth
  64         a'8 es d c bes a |
  65         g fis e! d c' a |
  66         %15
  67         bes8-\mordent d8 bes g g'4 |
  68         r8 d c bes a-\prall g |
  69         a c a f  f'4 |
  70         r8 c bes a g-\prall f |
  71         g bes a g f e |
  72         %20
  73         f d f a d g, |
  74         <
  75                 {
  76                         \stemup
  77                         % ... textnatural
  78 %                       cis8-\prall e8-"poco cresc." cis a e' cis
  79                         cis8-\prall e8 cis a e' cis
  80                 }
  81                 \context Voice=ii { \stemdown a4 }
  82         >
  83         \stemboth
  84         a8 e' cis a bes! a |
  85         g e' cis g e' cis |
  86         g e' cis g a g |
  87
  88         f d' bes f d' bes |
  89         %25
  90         f d' bes f d' bes |
  91
  92         fis c' a fis c' a |
  93         fis c' a fis c' a |
  94         bes g fis g d g |
  95         bes g d bes' g d |
  96         %30
  97         e g fis g bes g |
  98         es bes' g es bes' g |
  99         cis, bes' g cis, bes' g |
 100         cis, bes' g cis, a' g |
 101         f a f d a' f |
 102         %35
 103         d a' f d cis d |
 104         e g e bes g' e |
 105         bes g' e cis a g' |
 106         f16 d c bes \stemup a s16 s8 s4 |
 107 % ugh
 108 %       s1 |
 109         s4 s4 s4 |
 110         %40
 111         s4 s16 [d16 f a] \stemdown [d, f a] \stemup d |
 112         \stemboth
 113         f a f d  f d b d  gis, b a gis |
 114
 115         % arpeggio
 116         <g'!4. e a,> a8
 117         < f4  d a > ~
 118         [f8 e]
 119         < { \stemup
 120                 e4.^\prall d8
 121                 }
 122                 \context Voice=ii { \stemdown cis2 }
 123         >
 124         \stemboth
 125         d8 c! a d bes g |
 126         %45
 127         c a fis bes g e  |
 128
 129         a fis d g e cis |
 130
 131         %  the mordent is on the D !
 132         <fis2. d-\mordent a>
 133 }
 134
 135
 136 lower = \context Staff \notes\relative c{
 137         \context Voice=i
 138
 139         d4-\mordent r r |
 140         d,4 r r |
 141         d'-\mordent r r |
 142         d,4 r r |
 143         d'-\mordent r r |
 144
 145         d,4 r r |
 146         d'8 a d f d f |
 147         a f a d a d |
 148         gis,4 r r |
 149         e gis e |
 150         a8 e' c a e' c  |
 151         g! es' c g es' c  |
 152         fis,4 r r
 153         d  fis d |
 154         \property Voice . textStyle = "roman"
 155         g4-\mordent^"(\\textsharp)" r r8 f!8 |
 156         \property Voice . textStyle = "italic"
 157         e4-\prall r r |
 158         f4-\mordent r r8 e |
 159         d4 r8 f e d |
 160         e d cis e d cis |
 161         d4 c! bes |
 162         a a' a, |
 163         a a' a, |
 164         a a' a, |
 165         a a' a, |
 166         bes r r |
 167         bes bes' bes, |
 168         a r r |
 169         a d d, |
 170         g r r |
 171         g g' g, |
 172         g r r |
 173         g g' g, |
 174         a r r |
 175         a a' a, |
 176         a r r |
 177         a a' a, |
 178         cis, r r |
 179         cis cis' cis, |
 180         d s16
 181         \stemdown
 182         [g'16 f e] f a d, f |
 183         a, \stemup [d c bes]
 184         a \stemdown [ g f e] d f a d |
 185         \stemup
 186
 187         [f a]
 188         \stemdown
 189         [d, f] a s s8 s4-"*" |
 190         \stemboth
 191 % ugh whole rest has duration of one bar
 192         R2. |
 193 %       r4 r r |
 194         cis,8 e cis a  d16 c bes a |
 195         g8 g' a g a a, |
 196         d4 d' d, |
 197         d r r |
 198         d, d' d, |
 199         d2. |
 200 }
 201
 202 global = \notes{
 203         \time 3/4;
 204         \key F;
 205 }
 206
 207 \score{
 208         % Moderato
 209         \context PianoStaff <
 210                 \context Staff = upper <
 211                         \global
 212                         { \upper \bar "|."; }
 213                 >
 214                 \context Staff = lower <
 215                         \global
 216                         \clef "bass";
 217                         \lower
 218                 >
 219         >
 220         \paper{
 221                 linewidth = 18.0 \cm;
 222
 223         }
 224         \midi{ \tempo 4 = 90; }
 225         \header{
 226                 piece = "5";
 227                 opus = "BWV 926";
 228         }
 229 }
 230