%% 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)),quote]
\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))
  line-width = 160\mm - 2.0 * 10.16\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:
% ****************************************************************
\sourcefileline 4092
#(define-markup-command (point layout props x y xoff yoff)
   (number? number? number? number?)
   (interpret-markup
    layout props
    (make-overlay-markup
     (list
      (make-translate-markup
       (cons x y)
       (make-draw-circle-markup 0.4 0 #t))
      (make-translate-markup
       (cons (+ x xoff) (+ y yoff))
       (format #f "(~a,~a)" x y))))))

\markup \scale #'(0.8 . 0.8) {
  \overlay {
    \scale #'(18 . 16) \with-color #(x11-color "gray80")
      \musicglyph "accidentals.flatflat.slash"

    \override #'((filled . #f)
                 (thickness . 2))
      \polygon #'((-9 . -10) (-9 . 29) (26 . 29) (26 . -10))

    \translate #'(-15 . 0) \draw-line #'(47 . 0)
    \translate #'(32 . 0) \arrow-head #X #RIGHT ##t
    \translate #'(31 . -2) \italic x
    \translate #'(0 . -15) \draw-line #'(0 . 50)
    \translate #'(0 . 35) \arrow-head #Y #UP ##t
    \translate #'(-2 . 34) \italic y

    \point #0 #0 #0.5 #0.8
    \point #-9 #-10 #0.5 #0.8
    \point #26 #29 #-3 #1

    \translate #'(-10.5 . 19) \draw-line #'(0 . 10)
    \translate #'(-10.5 . 29) \arrow-head #Y #UP ##t
    \translate #'(-18 . 10) \rotate #90 \italic "vertical extent"
    \translate #'(-10.5 . 2.5) \draw-line #'(0 . -12.5)
    \translate #'(-10.5 . -10) \arrow-head #Y #DOWN ##t

    \translate #'(-0.5 . -12) \draw-line #'(-8.5 . 0)
    \translate #'(-9 . -12) \arrow-head #X #LEFT ##t
    \translate #'(9 . -12.5) \center-align \italic "horizontal extent"
    \translate #'(18 . -12) \draw-line #'(8 . 0)
    \translate #'(26 . -12) \arrow-head #X #RIGHT ##t
  }
}


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