input/regression/slur-scoring.ly

   1
   2 \header {
   3
   4     texidoc = "Slur formatting is based on scoring. A large number of
   5     slurs are generated. Each esthetic aspect gets demerits, the best
   6     configuration (with least demerits) wins. This must be tested in
   7     one big file, since changing one score parameter for one situation
   8     may affect several other situations.
   9
  10     Tunable parameters are in @file{scm/slur.scm}.
  11 "
  12
  13 }
  14
  15 \version "2.6.0"
  16 \layout {
  17     raggedright = ##t
  18 %    #(define debug-slur-scoring #t)
  19 }
  20
  21 %% help lilypond-book
  22 %% \score
  23
  24 \relative {
  25
  26     \grace e=''16( d8.[) c16]
  27     d=''8.[ \grace f16( e16)]
  28     s2
  29     << {c=''8.([ es16] bes4~bes )}
  30        \\
  31        {r8  <as es> r <f des> r }
  32     >>
  33     \new Voice { \voiceOne b='8[ c16( d])  }
  34     g='8[( a b b! ]  c4  bes)
  35     bes='8( f' des bes) as4( bes)
  36     r8 d( f e d c b a)
  37     cis=''4( d)  f'=''16( e)    d( c)
  38     s4
  39
  40     c'=''2(~c8 d16 c b8 a)
  41
  42     <c=' g>4 ( f <g b>) f
  43     <c g>^( f <g b>) f
  44     <c g>_( f <g b>)
  45     <g b>_( g  <b d>)
  46     <g b>_( \stemDown g \stemNeutral  <b d>)
  47     c,='^( c'' c)
  48     c,,^( c'')
  49     c,,^( c')
  50     | b='2( a4) s4
  51     | b='4.( c8) s2
  52     | << c=''1_(
  53        { s2 \grace { b16[ c] } } >>
  54     \break
  55     b4)
  56     e=''4.( c8) s4
  57     | << { b='8[( c]) } \\
  58          { b='8[( c]) }>>
  59
  60
  61     s2.|
  62     e4( dis4)
  63     e4( dis4)
  64     g='16( b d fis)
  65     \clef bass a=8[ e16(f] g[ a b d,)]  s4 | \break
  66     e=8[( f] g[ a b d,)]  s4 |
  67
  68     \clef treble
  69     \new Voice {
  70         \slurDown
  71         c=''4(^"slurs forced down"  d, c') s4
  72         f=''2( d4 f | g c a f | d c f2 | f1) |
  73     }
  74
  75 %    \override Slur #'eccentricity = #-2
  76     c=''8 ( d[ b f d] a'[ c])
  77 }
  78