2 filename = "praeludium-fuga-E.ly";
3 title = "praeludium and fuga in E-major";
5 composer = "Johann Sebastian Bach (1685-1750)";
7 copyright = "public domain";
12 Praeludium 3 bar excerpt,
13 2nd fuga transposed subject -- 4 bar excerpt.
14 We try to imitate the Griepenkerl/Keller edition which
15 gives the best approximation to Bach's original layout
20 purpose of this file is testing:
21 * real-life collisions
22 * multi-voice input --- splitting?
30 praeludium_commands = \melodic {
35 praeludium_right = \melodic\transpose c'' {
39 % 13 -- how to type -- where to split -- this more neatly?
41 { \stemup r4 dis'4 e'4. e'8 ~ |
42 \shifton e'4 [d'8 fis'8] \shiftoff gis'4 ~ [gis'8 fis'16 e'16] |
43 fis'4 ~ [fis'8 e'16 dis'16] e'4 r8 e'8 }
44 { \stemup \shifton r4 bis4 cis'4 \shiftoff cis'4 |
45 a'4 ~ [a'16 gis'16 a'16 b'16] \shifton dis'4 cis'4 ~ |
46 [cis'8 dis'16 ais16] bis4 cis'4 r8 b8 }
51 this is a diversion from the Griepenkerl/Keller
52 edition; a hack to avoid collisions
60 r4 fis4 \shiftoff gis4 gis4 |
62 fis4 gis4 gis4 r8 e8 }
67 praeludium_left = \melodic {
73 { \stemup r4 dis'4 cis'4 cis'4 ~ |
74 [cis'8 a8 d'8 cis'8] [bis8 gis8] cis'4 |
75 dis'2 cis'4 r8 cis'8 }
77 { \stemup \shifton r4 gis4 ~ [gis 8 gis8] ~ \stemdown \shiftoff gis4 |
79 a4 gis4 gis4 r8 gis8 }
80 % { \stemup \shifton s4 fis4 e}
81 % a quick hack to avoid some collisons
82 { \stemdown \shifton s4 fis4 e}
83 { \stemdown s4 dis4 cis4 }
88 praeludium_pedal = \melodic {
93 r4 fis,4-\ltoe e,4.-\lheel e8-\rheel |
94 fis4.-\rtoe fis8-\rtoe fis4-\rtoe [e8-\ltoe a8-\rtoe] |
95 dis4-\ltoe gis4-\rtoe [cis8-\ltoe b,!8-\lheel ais,8-\rtoe gis,8-\ltoe] |
100 fuga2_commands = \melodic{
105 fuga2_right = \melodic\transpose c'' {
111 { \stemup [b8 fis8] b4 }
114 %{ this chord is usually set like this:
123 { \stemup \shiftoff e'4 }
124 { \stemup \shifton cis'4 }
125 { \stemup \shifton ais4 }
130 { \stemup dis'2 dis'4 |
132 b4. [cis'8 dis'8 e'8] }
133 { \stemup \shifton [b8 fis8] b2 ~ |
134 [b8 a!16 gis16] a2 ~ |
136 { \stemdown fis2. ~ |
143 fuga2_left = \melodic {
149 { \stemdown b2 \stemup ais4 |
154 \stemdown cis'2 e'4 |
159 fuga2_pedal = \melodic {
164 dis4.-\ltoe e8-\rtoe cis4 |
165 b,4.-\lheel [cis8-\ltoe dis8-\rtoe e8-\rheel] |
166 fis4.-\rtoe [e8-\rheel dis8-\rtoe cis8-\ltoe] |
167 dis4-\rtoe e4-\rheel e,4-\ltoe |
171 breakmusic = \melodic {
177 % these should be two separate scores...
181 \type Staff = treble {
182 \praeludium_right \breakmusic \fuga2_right }
184 \praeludium_left \breakmusic \fuga2_left }
186 \type Staff = pedal {
187 \praeludium_pedal \breakmusic \fuga2_pedal }