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 %% help lilypond-book
  13 %% \score
  14
  15 \relative {
  16     \override Slur #'after-line-breaking-callback = #New_slur::after_line_breaking
  17     \override Slur #'print-function = #New_slur::print
  18     \override Slur #'height = ##f
  19
  20     \grace {
  21         e=''16(
  22     }
  23     d8.[) c16]
  24     d8.[ \grace f16( e16)]
  25
  26
  27     f'=''16( e)    d( c)
  28     c'=''2(~c8 d16 c b8 a)
  29     f='4
  30     <c g>4 ( f <g b>)
  31      f
  32     <c g>^( f <g b>)
  33     f
  34     <c g>_( f <g b>)
  35     <g b>_( g  <b d>)
  36     <g b>_( \stemDown g \stemBoth  <b d>)
  37     c,^( c'' c)
  38     c,,^( c'')
  39     c,,^( c')
  40     }
  41
  42 % #(ly:set-option 'debug-beam #f)