input/regression/new-slur.ly

   1
   2 \header {
   3     texidoc = "Scoring based slur formatting."
   4 }
   5
   6 \paper {
   7     raggedright = ##t
   8 }
   9
  10 %% help lilypond-book
  11 %% \score
  12
  13 \relative {
  14     \override Slur #'after-line-breaking-callback = #New_slur::after_line_breaking
  15     \override Slur #'print-function = #New_slur::print
  16     \override Slur #'height = ##f
  17
  18     \grace {
  19         e=''16(
  20     }
  21     d8.[) c16]
  22     d8.[ \grace f16( e16)]
  23     s2
  24
  25     << {c=''8.([ es16] bes4~bes )}
  26        \\
  27        {r8  <as es> r <f des> r }
  28    >>
  29     s4
  30
  31     g='8[( a b b! ]  c4  bes)
  32     bes='8( f' des bes) as4( bes)
  33     r8 d( f e d c b a)
  34     cis=''4( d)  f'=''16( e)    d( c)
  35     s4
  36
  37     c'=''2(~c8 d16 c b8 a)
  38
  39     <c=' g>4 ( f <g b>) f
  40     <c g>^( f <g b>) f
  41     <c g>_( f <g b>)
  42     <g b>_( g  <b d>)
  43     <g b>_( \stemDown g \stemBoth  <b d>)
  44     c,^( c'' c)
  45     c,,^( c'')
  46     c,,^( c')
  47     }
  48