]> git.donarmstrong.com Git - lilypond.git/blob - input/baerenreiter-sarabande.ly
release: 1.5.43
[lilypond.git] / input / baerenreiter-sarabande.ly
1
2 %% #(set! point-and-click line-column-location)
3
4 \header {
5   title = "Solo Cello Suite II"
6   piece ="Sarabande"
7   composer = "J.S.Bach"
8   editor = "August Wenzinger"
9   source= "B\\\"arenreiter Urtext"
10
11   texidoc = "The B\\\"arenreiter edition of the Cello Suites is the most
12 beautifully typeset piece of music in our collection of music (we both
13 own one. It is also lovely on French Horn). This piece follows the
14 same beaming as the printed edition. This is done in order to
15 benchmarkk the quality of the LilyPond output. As of lilypond 1.5.38,
16 the spacing is almost identical. With a line-break forced before
17 measure 25, we get back the linebreaking of Baerenreiter.
18
19
20
21 This file used to show spacing weaknesses. Now it shows weaknesses in
22 slur handling.
23
24 Note that the Barenreiter edition contains an engraving mistake. The
25 second line begins with measure 6 (but prints 5).
26
27 "
28
29 }
30
31
32 \version "1.3.148"
33
34
35 sarabandeA =  \context Voice \notes \relative c {
36   \property Staff.NoteCollision \set #'merge-differently-dotted = ##t
37   < { d8. e16 e4.-\trill d16 e } \\
38     { d4 a2 } >
39   f4.  [e8 d c] |
40   [bes g'] [f e16(f] [g a bes)d,] |
41   cis4.-\trill [b8 a g] |
42
43   %% check spacing without accs: 
44   %%    c4.-\trill [bes8 a g] |
45   
46   < { d'8. e16 f4.-\trill d16 e |
47       f4. [d8 e f] }
48     \\
49     { <a,4 f> a2 <a4. d,4.>  } > |
50   %%5
51
52   g8 bes16()a c()bes a()g d'8 f, |
53   <  e4.-\trill
54      \\ <a,,4 e'> >
55   [d8 c bes]
56   %%8
57   < { f'8 g16()a a4. g16()f  |
58       g8 a16()bes bes4. c16()d }
59     \\
60     { a,4 <bes4. d4. > r8 bes4 <g2 f'2>  }
61   > |
62
63   %% 11
64   [e,8 f] [c, g'] [f' e] |
65   f4 f,2 |
66   < {  a'4 a4.-\trill bes8 
67        c bes16 a } \\
68     { [f8 es] es4. r8 d4 } >
69
70   fis8.-\trill es16 d8 c |
71   [bes g']
72   \stemUp
73   [a, fis']
74   \stemBoth
75   [es' d] |
76   %%16
77   < bes4.-\trill d, g, > [a8 g f!] |
78   e bes a f' g a |
79   d, as g es' f g |
80   [cis, bes'] [a g16 f] [e!8 f16 d] |
81   cis8 e16 a a,8. g'16 f8()e |
82   %%21
83   < { d e16()f f4. e16()d |
84       e8 f16()g g4. a16()bes |
85       a8 cis16 d d,8 e16 f32 g f8-\trill e16()d } \\
86     { bes4 g2 |
87       g4 <bes4. cis,> s8 |
88       <d8 a f> r r g, a4 } >
89   |
90   \stemUp
91   d4 d,16 a'( b cis d e f )g |
92   \stemBoth
93   \break
94   %%25
95   < { a16(b c)b c4. b16()a |
96       b cis d cis d4. e16()f | }
97     \\
98     { f,4 fis4. s8 |
99       <d4 g,> gis4.   } >
100   \voiceOne
101   d16(cis)d f,
102   [a,8 e']
103   \oneVoice
104   [d' cis] |
105   d4 d,,2 |
106 }
107
108
109 sarabande =  \context Staff \notes<
110   \apply #voicify-music \sarabandeA
111   
112 >
113
114 \version "1.3.148"
115
116 sarabandeCelloGlobal =  \notes{
117   \time 3/4
118   \key f \major
119   \clef bass
120   \repeat "volta" 2 {
121     s2.*12
122   } \repeat "volta" 2 {
123     s2.*16
124   }
125 }
126
127 sarabandeCelloScripts =  \notes{
128 }
129
130 sarabandeCelloStaff =  \context Staff <
131   \sarabande
132   \sarabandeCelloGlobal
133   \sarabandeCelloScripts
134 >
135
136 % size perversions
137 smallerPaper = \paper {
138     \translator { \StaffContext
139                   fontSize = #-1
140                   StaffSymbol \override  #'staff-space = #0.8
141                   }
142     \translator { \ScoreContext
143                    SpacingSpanner \override #'spacing-increment = #0.96
144                 }
145         
146     indent = 5.6 \mm
147     linewidth = 146.8 \mm
148 }
149
150 baerPaper = \paper {
151     indent = 7. \mm
152     linewidth =183.5 \mm
153 }
154
155
156 \score{
157   \sarabandeCelloStaff
158   \paper{
159     \baerPaper
160   }
161   \midi{ \tempo 4 = 40 }
162   \header{
163     opus= "" 
164     piece ="Sarabande" }
165 }
166
167 %%% Local variables:
168 %%% LilyPond-indent-level:2
169 %%% End: