2 filename = "preludes-4.ly";
6 % Clavierb"uchlein f"ur W. Fr. Bach
7 % Clav. W. Fr. Bach: 27-Praeludium ex d neutral
9 composer = "Johann Sebastian Bach (1685-1750)";
11 copyright = "public domain";
19 ['d-1( 'fis-3 'd-1] ['a-2 'b-3 cis-4 'a-3]
20 [d-3 cis-2 d-1 e-2] [d-1 fis-3 e-2 d-1] |
23 )cis4-2 fis-5 ~ [fis8 fis-4] e4-3 ~ |
24 e16\< \stemboth ['a16( cis 'a] [d-2 e fis d-1]
25 [g-3 fis g a-4] [g-3 b a \!g] |
27 )fis4-"2\\_3" [e8-2 a-5] <fis4-4 d-2> <gis-5 e-3> |
28 <a4-5( e> <fis-4 d-2> <[)g!16-5 d> fis-2 g-3 a-4]
32 [fis_"dim." e fis-3 g] [fis-3 a-5 g fis]
34 e4-"2\\_5" ~ e16 ['e( 'fis 'g ] |
36 ['a-4_"dim." 'g-1 'a 'b] ['a-2 c-4 'b 'a]
37 ['g-1 'fis-2 'g-3 'a] ['g-3 'b 'a 'g] |
42 d4.\mf cis8-"4\\_5" ~ cis 'b4-5 'a8-"4\\_5" ~ |
44 'a 'g4-5 'fis8-4 ~ ['fis16 'fis-4-"dim." 'e-3 'd-2]
47 ['e16 'e-5 'd 'cis] 'd4-5 ~ ['d16 'd-5 'cis ''b] 'cis4-5 |
49 [''fis16-1\p ''a-2 'd-5\< 'c-4] [''b-1 'd-2 'g-5 'fis-4]
50 ['d-1 'b-5 'a 'g] ['fis-2 'e-1 'd-4 \!'c!-3] |
51 [''b-2 'd-1 'g 'a] ['fis8-\prall 'e16-4 'd-3]
52 ['d8. 'e16~] ['e 'd8 'cis16] |
54 r16 ['d-1\< 'fis 'd] ['g 'a 'b 'g-1] [c-3 'b c d] [c e d-4 \!c] |
55 'b4-5 'a ~ ['a8 'g-5 ~] ['g16 'fis8-4 'e16-3] |
56 ['fis8-4 'e-5~] ['e 'd-5~] 'd4 'cis-4 |
57 'd2\p-"rall." ~ ['d16 ''a-2( ''b-3 'cis-4] )'d4-5 |
65 % \translator Staff=bass \octave c; \stemup
67 fis4-1( e8-2 a4 a4 gis8-2 |
69 \translator Staff=treble \octave c''; \stemdown
70 'a4 'a8 'b4.-"2\\_1" cis8 ~ |
72 \translator Staff=bass \octave c; \stemup
73 a8 ~ [a d'] ~ d' d'4-> cis'8 |
75 \translator Staff=treble \octave c''; \stemdown
76 d4-> cis8-1 ~ cis 'b4-1 'b8 |
78 \translator Staff=bass \octave c; \stemup
79 [g'8-1( fis'-2] )e'4-1 ~ |
80 e'4 d' ~ [d'16 d'-1 cis'-2 b-1] cis'4-2 ~ |
81 [cis'8 a-3] d'4.-1 d'4^> cis'8-2 |
82 \translator Staff=treble \octave c''; \stemdown
85 r16 [''b-1\< 'd-2 ''b~] <'g4-5 'e-3 ''b>
86 r16 ['cis-1 'e-2 \!'cis~] |
87 <'a4-5 'fis-3 'cis> r16 ['d-1 'fis-2 'd~] <'b4-5 'g-3 'd>
88 r16 ['fis-1 'a 'fis~] |
93 \translator Staff=bass \octave c; \stemup
94 r16 [b-3 fis-1 a-2] g4-1 r16 [a-3 e-1 g-2] |
95 \skip 4*4; \skip 16*1;
96 \translator Staff=treble \octave c''; \stemdown
97 'd8.-1 ~ ['d8 'c] 'd4 [''a8 ''g] |
98 \translator Staff=bass \octave c; \stemup
99 [fis'8 c'-1] b4-1 \stemdown <a
100 \translator Staff=treble \octave c''; \stemdown
104 ['a 'g-3~] ['g16 'e 'fis8~] ['fis16 'd8.~] ['d8. 'cis!16] |
105 \translator Staff=bass \octave c; \stemup
106 % <[d'8-2 a-1> <a~ g]> <a4 [fis16-2> e-1 fis-2 d-1]
108 { \voiceone; [d'8-2 a~] a4 }
109 { \voicethree; [a8-1 g] [fis16-2 e-1 fis-2 d-1] }
112 [g-1 fis-2 g-1 a-2] [g-1 b-3 a-2 g-1 ~] |
113 [g g-1 fis-2 e-1] fis4-2 ~ fis2
121 a16 ['a-5\mf( cis-3 'a-5] [d-2 e-1 fis-2 d-4]
122 [g-1 fis-3 g a] [g b a g] |
124 d'16 \stemboth [d-5\f( fis-3 d-5] [a-2 b-1 cis'-2 a-4]
125 [d'-1 cis'-3 d' e'] [d'-4 fis'-2 e'-1 ) d'] |
126 [cis'-3 b-4 cis'-3 d'-2] [c'-4 e'-2 d'-3 c'-4]
127 \stemdown b4-5 [cis'8-4 b-3(] |
128 [a-4 )fis-5 b-2 a-3] [gis-4 e-5 a-3 g-4] |
129 fis4. d8-5 e4-5 a4-3 |
131 r16 [d-4( fis-2 d-4] [)g8-.-1 'g-.-5]
132 r16 [e-4( g-2 e-4] [)a8-. 'a-.-5] |
133 r16 [fis-4( a fis] [)b8-. 'b-.] r16 [g-4( b g] [)d'8-. d-.] |
134 r16 ['d16-5( 'fis-3 'd] ['a-2 'b-1 cis-2 'a-4] [d 'b-5 d-3 'b]
135 [fis-2 g a-2 fis-4] |
136 )fis16 ['g( 'b 'g] [d-2 e fis-2 d-4] [)g8-. 'g-.] r16 [cis-4( e cis] |
137 [)fis8-. 'fis-.] \stemdown r16 ['b-4( d 'b] [)e8-. 'e-.]
140 [d-1 e-3 fis-2 d-4] [g-1 fis-2 e-3 d-1] [cis!-3 'a-5 'b cis]
142 [g8 e-3] \stemdown [a 'a] ['b8.-4 'g16-5] 'a4-4 |
143 [d8-5 a-2~] [a g-3~] [g g-3] fis4-4 |
145 r16 [g-2 b-1 g-3] [d'8.-1 c'16-1] [b8.-2 bes16-3] [a8-1 g] |
147 r16 ['a-2 cis!-1 a-2] [d-1 e fis d] [e8-1 d-2] [e-1 'a-2] |
148 [d 'a-2~] ['a16 'a-2 'b cis-2] d2 |
155 % \property Voice.hshift = 1
158 % \property Voice.hshift = 0
160 \translator Staff=bass \octave c; \stemup
161 a4 ~ [a16 d-2 g8-1] [fis e-1] |
174 treble_staff = \type Staff = treble <
180 bass_staff = \type Staff = bass <
185 { \type Voice = bone \skip 1*0; \property Voice.ydirection = \up \two }
189 grand_staff = \type Grand_staff <
196 % arithmetic_basicspace = 2.;
197 % arithmetic_multiplier = 6.\pt;
198 arithmetic_basicspace = 3.;
199 arithmetic_multiplier = 6.\pt;
206 \midi{ \tempo 4 = 70; }