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 This file used to show spacing weaknesses. Now it shows weaknesses in
  20 beam and slur handling."
  21
  22 }
  23
  24
  25 \version "1.3.148"
  26
  27
  28 sarabandeA =  \context Voice \notes \relative c {
  29   \property Staff.NoteCollision \set #'merge-differently-dotted = ##t
  30   \property Voice.Beam \set #'quantise-dy-never-steeper = ##t
  31   \property Voice.Beam \set #'ideal-lengthen = ##t
  32
  33   < { d8. e16 e4.-\trill d16 e } \\
  34     { d4 a2 } >
  35   f4.  [e8 d c] |
  36   [bes g'] [f e16(f] [g a bes)d,] |
  37   cis4.-\trill [b8 a g] |
  38
  39   %% check spacing without accs:
  40   %%    c4.-\trill [bes8 a g] |
  41
  42   < { d'8. e16 f4.-\trill d16 e |
  43       f4. [d8 e f] }
  44     \\
  45     { <a,4 f> a2 <a4. d,4.>  } > |
  46   %%5
  47
  48   g8 bes16()a c()bes a()g d'8 f, |
  49   <  e4.-\trill
  50      \\ <a,,4 e'> >
  51   [d8 c bes]
  52   %%8
  53   < { f'8 g16()a a4. g16()f  |
  54       g8 a16()bes bes4. c16()d }
  55     \\
  56     { a,4 <bes4. d4. > r8 bes4 <g2 f'2>  }
  57   > |
  58
  59   %% 11
  60   [e,8 f] [c, g'] [f' e] |
  61   f4 f,2 |
  62   < {  a'4 a4.-\trill bes8
  63        c bes16 a } \\
  64     { [f8 es] es4. r8 d4 } >
  65
  66   fis8.-\trill es16 d8 c |
  67   [bes g']
  68   \stemUp
  69   [a, fis']
  70   \stemBoth
  71   [es' d] |
  72   %%16
  73   < bes4.-\trill d, g, > [a8 g f!] |
  74   e bes a f' g a |
  75   d, as g es' f g |
  76   [cis, bes'] [a g16 f] [e!8 f16 d] |
  77   cis8 e16 a a,8. g'16 f8()e |
  78   %%21
  79   < { d e16()f f4. e16()d |
  80       e8 f16()g g4. a16()bes |
  81       a8 cis16 d d,8 e16 f32 g f8-\trill e16()d } \\
  82     { bes4 g2 |
  83       g4 <bes4. cis,> s8 |
  84       <d8 a f> r r g, a4 } >
  85   |
  86   \stemUp
  87   d4 d,16 a'( b cis d e f )g |
  88   \stemBoth
  89   \break
  90   %%25
  91   < { a16(b c)b c4. b16()a |
  92       b cis d cis d4. e16()f | }
  93     \\
  94     { f,4 fis4. s8 |
  95       <d4 g,> gis4.   } >
  96   \stemUp
  97   d16(cis)d f,
  98   [a,8 e']
  99   \stemBoth
 100   [d' cis] |
 101   d4 d,,2 |
 102 }
 103
 104
 105 sarabande =  \context Staff \notes<
 106   \apply #voicify-music \sarabandeA
 107
 108 >
 109
 110 \version "1.3.148"
 111
 112 sarabandeCelloGlobal =  \notes{
 113   \time 3/4
 114   \key f \major
 115   \clef bass
 116   \repeat "volta" 2 {
 117     s2.*12
 118   } \repeat "volta" 2 {
 119     s2.*16
 120   }
 121 }
 122
 123 sarabandeCelloScripts =  \notes{
 124 }
 125
 126 sarabandeCelloStaff =  \context Staff <
 127   \sarabande
 128   \sarabandeCelloGlobal
 129   \sarabandeCelloScripts
 130 >
 131
 132 \score{
 133   \sarabandeCelloStaff
 134   \paper{
 135     indent = 7. \mm
 136     linewidth = 183.5 \mm
 137     \translator { \ScoreContext
 138                   %% SpacingSpanner \override #'maximum-duration-for-spacing = #(make-moment 1 16)
 139
 140
 141                 }}
 142   \midi{ \tempo 4 = 40 }
 143   \header{
 144     opus= ""
 145     piece ="Sarabande" }
 146 }
 147
 148 %%% Local variables:
 149 %%% LilyPond-indent-level:2
 150 %%% End: