%% Generated by lilypond-book
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm,paper-height=845.047\pt,paper-width=597.508\pt,papersize='(cons (* 597.508 pt) (* 845.047 pt))]
\include "lilypond-book-preamble.ly"


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

#(ly:set-option 'eps-box-padding 3.000000)



\paper {
  #(set-paper-size '(cons (* 597.508 pt) (* 845.047 pt)))
  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 "/lilypond-2.26.0/input/regression/instrument-switch.ly"
\sourcefileline 0
\version "2.25.80"

\header {

  texidoc = "The @code{switchInstrument} music function modifies
properties for an in staff instrument switch. "
  }

#(ly:set-option 'warning-as-error #t)
#(ly:expect-warning (G_ "the function '~a' is deprecated")
  "\\addInstrumentDefinition")
#(ly:expect-warning (G_ "the function '~a' is deprecated")
  "\\instrumentSwitch")

\addInstrumentDefinition "bassClar"
  #`((instrumentTransposition . ,(ly:make-pitch -1 6 FLAT))
     (instrumentName . "bla") 
     (shortInstrumentName . "bl")
     (clefGlyph . "clefs.F") 
     (middleCPosition . 6)
     (clefPosition . 2)
     (instrumentCueName . ,(make-bold-markup "cl. B"))
     (midiInstrument . "clarinet"))


\paper {
  ragged-right = ##t
}

\relative
{
  c'4
  \instrumentSwitch "bassClar"
  c2.\break
  c1\break
  c
}



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