mutopia/J.S.Bach/Petites-Preludes/preludes-6.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 940";
  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 = "BWV940";
  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.59";
  35
  36
  37
  38 one = \context Staff \notes\relative c{
  39         \context Voice=i
  40         \skip 1; |
  41         \stemup
  42         r4 d''2 cis4 |
  43         \stemboth
  44         d16 a' g f  e f cis d
  45         e8.-\mordent f16  d8.-\prall cis16 |
  46         \stemup
  47         cis4 ~ cis16 a d8 ~ d4 a |
  48         %5
  49         b2 ~ b4 a ~ |
  50         a16 a \stemup g! f g4 ~ g f ~ |
  51         f16 a g f  e16 g8. ~  g16 g f e  d f8. ~ |
  52         f16 f e d b'4 a g |
  53
  54         fis4 g r8 g16 bes e4 |
  55         %10
  56         d1
  57         \bar "|.";
  58 }
  59
  60 two = \context Staff \notes\relative c{
  61         \context Voice=ii
  62         r16 d'' c bes  a bes f g
  63         a8.-\mordent bes16  g8.-\prall f16 |
  64         \stemdown
  65         f2 e2 |
  66         \translator Staff=lower \stemup
  67         r4 a, bes b |
  68         \translator Staff=upper \stemdown
  69         r16 b' a g  f8. f16 e2 ~ |
  70         %5
  71         e2 ~ e4 ~ e16 e f! d |
  72         s4 e32 d e8.~ e4 d4 ~ |
  73         d4. cis16 d cis4 d ~ |
  74         d8 r r16 e f d r16 e f d r d e cis |
  75         r16 e d c!  bes! d8. s4 r16 bes' a g |
  76         %10
  77         fis1
  78 }
  79
  80 three = \context Staff \notes\relative c{
  81         \context Voice=iii
  82         \stemup
  83         f2 e |
  84         \stemboth
  85         d16 d' c bes  a bes f g
  86         a8.-\mordent bes16
  87         g8.-\prall f16 |
  88         f2 g4 gis |
  89         a2 ~ a16 a g f  e f c d |
  90         %5
  91         e8.-\mordent f16  d8.-\prall c16 \stemboth c4. d8 |
  92         \stemdown
  93         e4 ~ e16 f e d  cis a b cis  d e f d |
  94         \property Voice . textStyle = "finger"
  95         bes!2 a ~ |
  96         a a |
  97         d, cis' |
  98         %10
  99         a'1
 100         \bar "|.";
 101 }
 102
 103 four = \context Staff \notes\relative c{
 104         \context Voice=iv
 105         \stemdown
 106         d2 cis |
 107         \skip 1*2; |
 108         \skip 4*3;
 109         \translator Staff=upper \stemup \property Voice.horizontalNoteShift = 1
 110         c''4 |
 111         %5
 112         a gis ~ gis16 gis fis e
 113         \skip 4*1;
 114         \translator Staff=lower \stemdown \property Voice.horizontalNoteShift = 0
 115         \stemup
 116         b2 a |
 117         g a4. gis16 a |
 118         gis2 < g8 cis,> <f d> e4 |
 119         d4. fis16 g r16 bes8. ~ bes4 |
 120         %10
 121         \stemdown
 122         d,1
 123 }
 124
 125 global = \notes{
 126         \time 4/4;
 127         \key f \major;
 128 }
 129
 130 \score{
 131         % Allegretto
 132         \context PianoStaff <
 133                 \context Staff = upper <
 134                         \global
 135                         \one
 136                         \two
 137                 >
 138                 \context Staff = lower <
 139                         \global
 140                         \clef "bass";
 141                         \three
 142                         \four
 143                 >
 144         >
 145         \paper{
 146                 linewidth = 18.0 \cm;
 147
 148         }
 149         \midi{ \tempo 4 = 40; }
 150         \header{
 151                 opus = "BWV 940";
 152         }
 153 }
 154