%% Generated by lilypond-book.py
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm]
\include "lilypond-book-preamble.ly"


% ****************************************************************
% Start cut-&-pastable-section
% ****************************************************************



\paper {
  indent = 0\mm
  line-width = 160\mm
  % offset the left padding, also add 1mm as lilypond creates cropped
  % images with a little space on the right
  line-width = #(- line-width (* mm  3.000000) (* mm 1))
}

\layout {
  
}





% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "/home/gub/gub/target/linux-x86/src/lilypond-git.sv.gnu.org--lilypond.git-stable-2.16/input/regression/alter-broken.ly"
\sourcefileline 0
\version "2.16.0"

\header {
  texidoc = "The command @code{\\alterBroken} may be used to override the
pieces of a broken spanner independently.  The following example demonstrates
its usage with a variety of data types."
}

\layout {
  ragged-right = ##t
}

#(ly:expect-warning (_ "not a spanner name"))

\relative c'' {
  \alterBroken Slur #'positions #'((3 . 3) (5 . 5))
  \alterBroken Slur #'color #'((0 0 1) (1 0 0))
  \alterBroken Slur #'dash-definition #'( ((0 1 0.4 0.75))
                                          ((0 0.5 0.4 0.75) (0.5 1 1 1)) )
  d4( d' b g
  \break
  d d' b g)
  \alterBroken "Staff.OttavaBracket" #'padding #'(1 3)
  % Spaces in spanner's name are disregarded.
  \alterBroken "Staff . OttavaBracket" #'style #'(line dashed-line)
  \ottava #1
  % It is possible to use procedures as arguments.
  \alterBroken Hairpin #'stencil #`(
    ,ly:hairpin::print
    ,(lambda (grob)
      (ly:stencil-rotate (ly:hairpin::print grob) -5 0 0)))
  c\< d e
  % Since `NoteHead' is not the name of a spanner, the following has no
  % effect on layout.  A warning (suppressed here) is issued.
  \alterBroken NoteHead #'color #`(,red ,blue)
  \alterBroken Tie #'color #`(() ,blue)
  \alterBroken Tie #'control-points #'(
     ((1 . 3) (2 . 4) (3 . 4) (4 . 3))
     ((3 . 3) (4 . 4) (5 . 4) (6 . 3))
    )
  f~
  \break
  f c a f\!
  \ottava #0
}



% ****************************************************************
% end ly snippet
% ****************************************************************