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