+
+\version "2.16.0"
+
+\layout {
+ indent = #0
+ ragged-right = ##t
+ \context {
+ \Score
+
+ proportionalNotationDuration = #(ly:make-moment 1 64)
+ \override Beam #'breakable = ##t
+ autoBeaming = ##f
+ tupletFullLength = ##t
+ \override BarNumber #'transparent = ##t
+ \override BarLine #'transparent = ##t
+ \override SpanBar #'transparent = ##t
+ \override Beam #'break-overshoot = #'(-0.5 . 1.0)
+ \override TextScript #'staff-padding = #6
+ \override Glissando #'thickness = #3
+ \override SpacingSpanner #'strict-grace-spacing = ##t
+ \override TupletBracket #'bracket-visibility = ##t
+ \override NoteColumn #'ignore-collision = ##t
+ }
+}
+
+\paper {
+ oddHeaderMarkup = \markup \fill-line { " " }
+ evenHeaderMarkup = \markup \fill-line { " " }
+ oddFooterMarkup = \markup {
+ \fill-line {
+ \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
+ evenFooterMarkup = \markup {
+ \fill-line {
+ \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
+ printfirst-page-number = ##t
+ print-page-number = ##t
+ ragged-last-bottom = ##t
+ markup-system-spacing #'minimum-distance = #25
+}
+
+#(set-global-staff-size 14)
+
+
+%% definitions.
+
+
+ppX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "pp" #:hspace 0)))
+pX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "p" #:hspace 0)))
+mpX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "mp" #:hspace 0)))
+fX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "f" #:hspace 0)))
+ffX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "ff" #:hspace 0)))
+sfp = #(make-dynamic-script "sfp")
+sfpp = #(make-dynamic-script "sfpp")
+sffp = #(make-dynamic-script "sffp")
+sffpp = #(make-dynamic-script "sffpp")
+
+beam = #(define-music-function (parser location left right) (number? number?)
+ (cond ((and (= left 0) (> right 0))
+ #{
+ \set stemRightBeamCount = #right
+ #})
+
+ ((and (> left 0) (= right 0))
+ #{
+ \set stemLeftBeamCount = #left
+ #})
+
+ (else
+ #{
+ \set stemLeftBeamCount = #left
+ \set stemRightBeamCount = #right
+ #})
+ )
+)
+
+fraction = #(define-music-function (parser location music) (ly:music?)
+ #{ \tweak #'text #tuplet-number::calc-fraction-text #music #})
+
+triangle = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(do do do do do do do) #music #})
+
+semicircle = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(re re re re re re re) #music #})
+
+blackdiamond = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(mi mi mi mi mi mi mi) #music #})
+
+tiltedtriangle = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(fa fa fa fa fa fa fa) #music #})
+
+square = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(la la la la la la la) #music #})
+
+wedge = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(ti ti ti ti ti ti ti) #music #})
+
+harmonic = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) #music #})
+
+cross = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \set shapeNoteStyles = #'#(cross cross cross cross cross cross cross) #music #})
+
+white = #(define-music-function (parser location music) (ly:music?)
+ #{ \once \override NoteHead #'duration-log = #1 #music #})