input/regression/new-slur.ly

   1
   2 \header {
   3     texidoc = "Scoring based slur formatting."
   4 }
   5
   6 \paper {
   7     raggedright = ##t
   8 }
   9
  10 % #(ly:set-option 'debug-beam #t)
  11
  12 \relative {
  13     \override Slur #'after-line-breaking-callback = #New_slur::after_line_breaking
  14     \override Slur #'print-function = #New_slur::print
  15     \override Slur #'height = ##f
  16
  17     \grace {
  18         e=''16(
  19     }
  20     d8.[) c16]
  21     d8.[ \grace f16( e16)]
  22
  23
  24     f'=''16( e)    d( c)
  25     c'=''2(~c8 d16 c b8 a)
  26     f='4
  27     <c g>4 ( f <g b>)
  28      f
  29     <c g>^( f <g b>)
  30     f
  31     <c g>_( f <g b>)
  32     <g b>_( g  <b d>)
  33     <g b>_( \stemDown g \stemBoth  <b d>)
  34     c,^( c'' c)
  35     c,,^( c'')
  36     c,,^( c')
  37     }
  38
  39 % #(ly:set-option 'debug-beam #f)