%% 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/musicxml/31a-Directions.xml"
\sourcefileline 0
\version "2.26.0"
% automatically converted by musicxml2ly from -
\pointAndClickOff

%% additional definitions required by the score:

#(define edge-height-alist
   '((up . -0.7)
     (down . 0.7)
     (none . 0)))

#(define (get-height type)
   (or (assv-ref edge-height-alist type)
       (begin
         (ly:warning "bracket edge type '~a' not implemented" type)
         0)))

% Make the `edge-height` property independent of a bracket's direction.
#(define (make-edge-height left right)
   (grob-transformer
    'edge-height
    (lambda (grob orig)
      (let ((dir (ly:grob-property grob 'direction))
            (left-height (get-height left))
            (right-height (get-height right)))
        (cons (* dir left-height) (* dir right-height))))))

#(define-markup-command (square layout props arg)
   (markup?)
   (let* ((stil (interpret-markup layout props arg))
          (x-size (interval-length (ly:stencil-extent stil X)))
          (y-size (interval-length (ly:stencil-extent stil Y)))
          (axis (if (> x-size y-size) Y X)))
     (interpret-markup
      layout props
      #{
        \markup \box \with-dimension-from #axis \rotate #90 #arg #arg
      #})))


%% additional macros required by the score:
accRegHMML = \markup { \normalsize \combine
          \raise #2.5 \musicglyph #"accordion.dot"
          \combine
          \raise #1.5 \translate #(cons 0.5 0) \musicglyph "accordion.dot"
          \combine
          \raise #1.5 \translate #(cons -0.5 0) \musicglyph "accordion.dot"
          \combine
          \raise #0.5 \musicglyph "accordion.dot"
          \musicglyph "accordion.discant" }
ffffff = #(make-dynamic-script "ffffff")
ffz = #(make-dynamic-script "ffz")
pppppp = #(make-dynamic-script "pppppp")
rf = #(make-dynamic-script "rf")
sffz = #(make-dynamic-script "sffz")
sfpp = #(make-dynamic-script "sfpp")

\header {
  texidoc = "All <direction> elements defined in MusicXML. The lyrics for each
    note describes the direction element assigned to that note. Not marked with
    lyrics is a <scordatura> element at the very beginning.

    A trailing up-arrow indicates a ‘placement=\"above\"’ attribute, a
    down-arrow means ‘placement=\"below\"’."
}
\layout {
  \context {
    \Staff
    printKeyCancellation = ##f
  }
  \context {
    \Score
    \override TextMark.font-size = 2
    autoBeaming = ##f
  }
}
PartPOneVoiceOne = \relative c' {
  \clef "treble" \time 4/4 \key c \major \tweak direction #DOWN \mark \markup
  \square A c4 \tweak direction #UP \mark \markup B c4 \mark \markup \box Test c4
  \mark \markup \circle Crc c4 | % 1
  \textMark \markup \fontsize #2 \segno c4 \textMark \markup \fontsize #2 \coda
  c4 c4 ^\markup \ellipse "\\\"words\"" c4 \break | % 2
  c4 -\p c4 -\pp c4 -\ppp c4 -\pppp | % 3
  c4 _\ppppp c4 ^\pppppp c4 -\f c4 -\ff | % 4
  c4 -\fff c4 -\ffff c4 _\fffff c4 ^\ffffff \break | % 5
  c4 -\mp c4 -\mf c4 -\sf c4 -\sfp | % 6
  c4 -\sfpp c4 -\fp c4 -\rf c4 -\rfz | % 7
  c4 -\sfz c4 -\sffz c4 -\fz c4 -\ffz \break | % 8
  c4 -\< c4 \! c4 \tweak style #'dashed-line _\startTextSpan c4 \stopTextSpan | % 9

  \barNumberCheck #10
  \tweak edge-height #(make-edge-height 'up 'up) \tweak direction #DOWN \[ c4 c4
  \] \ottava #-1 c4 \ottava #0 c4 | % 10
  \set Staff.pedalSustainStyle = #'bracket c4 \sustainOn c4 \sustainOff
  \sustainOn c4 <> \sustainOff c4 | % 11
  \tempo \markup \normal-text \concat { \normal-text \smaller { \fontsize #-2
      \rhythm { 4 } \char ##x2009 = \char ##x2009 60 } } c4 c4 _\markup {
    \harp-pedal #"-^^|--v^" } c4 c4 | % 12
  \textMark \markup \concat { \accRegHMML } c4 c4 c4 \textMark \markup \concat {
    \eyeglasses } c4 | % 13
  c4 c4 c4 c4 \break | % 14
  c1 \bar "|."
}

PartPOneVoiceOneLyricsOne = \lyricmode {
  \set ignoreMelismata = ##t
  \set includeGraceNotes = ##t
  "reh. A↓" "reh. B↑" "reh. Test" "reh. Crc" segno coda "words↑" symbol p pp ppp
  pppp "ppppp↓" "pppppp↑" f ff fff ffff "fffff↓" "ffffff↑" mp mf sf sfp sfpp fp
  rf rfz sfz sffz fz "other dyn." hair -- pin dash -- "es↓" bra -- "cket↓"
  "oct." -- shift pedal -- change -- \skip1 mark "metro-" harp "damp↑" damp
  accordion string string "eye-" "perc." "staff-" principal -- voice image
}

PartPOneVoiceOneLyricsTwo = \lyricmode {
  \set ignoreMelismata = ##t
  \set includeGraceNotes = ##t
  "(def=square)" "(none)" "(rect.)" "(circle)" \skip1 \skip1 "(oval)"
  "(\"cClef\")" \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
  \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1 \skip1
  \skip1 \skip1 \skip1 "('ffz')" "(cre" -- "scendo)" \skip1 \skip1 \skip1 \skip1
  "(8" "up)" \skip1 \skip1 \skip1 \skip1 nome "pedal↓" \skip1 all register
  "mute on" "mute off" glasses "(timpani)" divide "(Haupt" -- "stimme)" \skip1
}


% The score definition
\score {
  <<
    \new Staff = "P1" <<
      \context Staff <<
        \override Staff.BarLine.allow-span-bar = ##f
        \mergeDifferentlyDottedOn
        \mergeDifferentlyHeadedOn
        \context Voice = "PartPOneVoiceOne" {
          \PartPOneVoiceOne
        }
        \new Lyrics \lyricsto "PartPOneVoiceOne" {
          \PartPOneVoiceOneLyricsOne
        }
        \new Lyrics \lyricsto "PartPOneVoiceOne" {
          \PartPOneVoiceOneLyricsTwo
        }
      >>
    >>
  >>
  \layout {}
  % To create MIDI output, uncomment the following line:
  % \midi { \tempo 4 = 100 }
}




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