← Back to branch summary

~ubuntu-branches/ubuntu/precise/lilypond/precise

« back to all changes in this revision

Viewing changes to input/mutopia/J.S.Bach/baerenreiter-sarabande.ly

  • Committer: Bazaar Package Importer
  • Author(s): Thomas Bushnell, BSG
  • Date: 2006-12-19 10:18:12 UTC
  • mfrom: (3.1.4 feisty)
  • Revision ID: james.westby@ubuntu.com-20061219101812-7awtjkp0i393wxty
Tags: 2.8.7-3
http://bugs.debian.org/400550
scripts/midi2ly.py: When setting DATADIR, find Lilypond python files
in the @TOPLEVEL_VERSION@ directory, not 'current'.  Patch thanks to
Chris Lamb (chris@chris-lamb.co.uk).  (Closes: #400550)

Show diffs side-by-side

added added

removed removed

Lines of Context:
input/mutopia/J.S.Bach/baerenreiter-sarabande.ly
1
 
\version "2.2.0"
2
 
 
3
 
% #(ly:set-point-and-click 'line-column)
4
 
 
5
 
forcedLastBreak = \notes { \break }
 
1
\version "2.7.39"
 
2
 
 
3
forcedLastBreak =  { \break }
6
4
 
7
5
%% We want this to perfectly match the Baerenreiter spacing.
8
6
%% If we're not using 6 systems, there's definately a problem.
17
15
                             " systems (expecting " (number->string n))))))
18
16
            
19
17
 
 
18
#(define (assert-system-count-override count)
 
19
  (ly:export #{ \override NoteHead #'after-line-breaking
 
20
       = #(lambda (smob) (assert-system-count smob $count))
 
21
  #}))
 
22
 
 
23
  
20
24
\header {
21
25
  title = "Solo Cello Suite II"
22
26
  piece ="Sarabande"
23
 
  composer = "J.S. Bach"
 
27
  composer = "Johann Sebastian Bach (1685-1750)"
24
28
  editor = "August Wenzinger"
25
29
  source= "B\\\"arenreiter Urtext"
26
30
 
46
50
}
47
51
 
48
52
 
49
 
sarabandeA =  \context Voice \notes \relative c {
 
53
sarabandeA =  \context Voice  \relative c {
50
54
  \override Staff.NoteCollision  #'merge-differently-dotted = ##t
51
55
 
52
56
  
53
57
  << { d8. e16 e4.\trill d16 e } \\
54
58
    { d4 a2 } >>
55
 
  <d, a' f'>4.  e'8[ d c] |
56
 
  bes[ g'] f[ e16(f] g[ a bes d,)] |
 
59
  <d, a' f'>4.  e'8[ d c] | 
 
60
  bes[ g'] f[
 
61
     e16(f] g[ a bes d,)] |
57
62
  cis4.\trill b8[ a g] |
58
63
 
59
64
  %% check spacing without accs: 
106
111
  |
107
112
  \stemUp
108
113
  d4 d,16 a'( b cis d e f g) |
109
 
  \stemBoth
 
114
  \stemNeutral
110
115
  \forcedLastBreak
111
116
  %%25
112
117
  << { a16(b c b) c4. b16(a) |
121
126
  d'[ cis] |
122
127
  %%  d4 d,,2 |
123
128
  d4
124
 
  \override NoteHead
125
 
    #'after-line-breaking-callback
126
 
 = #(lambda (smob) (assert-system-count smob 6))
 
129
  #(assert-system-count-override 6)
127
130
  d,,2 |
128
131
}
129
132
 
130
133
 
131
 
sarabandeCelloGlobal = \notes{
 
134
sarabandeCelloGlobal = {
132
135
  \time 3/4
133
 
  \key f \major
 
136
  \key d \minor
134
137
  \clef bass
135
138
  \repeat "volta" 2 {
136
139
    s2.*12
139
142
  }
140
143
}
141
144
 
142
 
sarabandeCelloScripts = \notes{
 
145
sarabandeCelloScripts = {
143
146
}
144
147
 
145
148
sarabandeCelloStaff = \context Staff <<
148
151
  \sarabandeCelloScripts
149
152
>>
150
153
 
151
 
% size perversions
152
 
smallerPaper = \paper {
153
 
    \context { \StaffContext
154
 
                  fontSize = #-1
155
 
                  \override StaffSymbol  #'staff-space = #0.8
156
 
                  }
157
 
    \context { \ScoreContext
158
 
                   \override SpacingSpanner #'spacing-increment = #0.96
159
 
                }
160
 
        
161
 
    indent = 5.6 \mm
162
 
    linewidth = 146.8 \mm
163
 
}
164
 
 
165
 
baerPaper = \paper {
166
 
    indent = 7. \mm
167
 
    linewidth =183.5 \mm
168
 
    interscoreline=4.0\mm
169
 
    \context {
170
 
             \ScoreContext
171
 
%            \override System #'print-function = #box-grob-stencil
172
 
    }
173
 
}
174
 
 
175
 
 
176
 
\score{
177
 
  \sarabandeCelloStaff
178
 
  \paper{
179
 
    \baerPaper
180
 
  }
181
 
  \midi{ \tempo 4 = 40 }
182
 
  \header{
183
 
    opus= "" 
184
 
    piece ="Sarabande" }
185
 
}
186
 
 
 
154
%% size perversions
 
155
smallerPaper = \layout {
 
156
  \context {
 
157
    \Staff
 
158
    fontSize = #-1
 
159
    \override StaffSymbol  #'staff-space = #0.8
 
160
  }
 
161
  \context {
 
162
    \Score
 
163
    \override SpacingSpanner #'spacing-increment = #0.96
 
164
  }
 
165
  
 
166
  indent = 5.6 \mm
 
167
  line-width = 146.8 \mm
 
168
}
 
169
 
 
170
\paper {
 
171
  ragged-bottom = ##t
 
172
  indent = 7. \mm
 
173
  line-width =183.5 \mm
 
174
  between-system-space = 25\mm 
 
175
  between-system-padding = 0\mm
 
176
 
 
177
%%  annotatespacing = ##t
 
178
}
 
179
 
 
180
\book {
 
181
  \score{
 
182
    \sarabandeCelloStaff
 
183
    \layout { }
 
184
    \midi{ \tempo 4 = 40 }
 
185
    \header{
 
186
      opus= "" 
 
187
      piece ="Sarabande" }
 
188
  }
 
189
}
187
190
%%% Local variables:
188
191
%%% LilyPond-indent-level:2
189
192
%%% End: