taps = {
#(define-public absolute-volume-alist '())
#(set! absolute-volume-alist
      (append
      '(
	("sf" . 1.00)
	("fffff" . 0.95)
	("ffff" . 0.90)
	("fff" . 0.85)
	("ff" . 0.80)
	("f" . 0.75)
	("mf" . 0.68)
	("mp" . 0.61)
	("p" . 0.55)
	("pp" . 0.49)
	("ppp" . 0.42)
	("pppp" . 0.35)
	("ppppp" . 0.28)
	)
      absolute-volume-alist))

#(define-public (dynamic-absolute-volume s)
  (let ((entry (assoc s absolute-volume-alist)))
    (if entry
	(cdr entry))))

\set Voice.dynamicAbsoluteVolumeFunction = #dynamic-absolute-volume

#(define-public instrument-equalizer-alist '())
#(set! instrument-equalizer-alist
      (append 
       '(
	 ("flute" . (0 . 0.7))
	 ("oboe" . (0 . 0.7))
	 ("clarinet" . (0 . 0.7))
	 ("bassoon" . (0 . 0.6))
	 ("french horn" . (0.1 . 0.7))
	 ("trumpet" . (0.1 . 0.8))
	 ("timpani" . (0.2 . 0.9))
	 ("violin" . (0.2 . 1.0))
	 ("viola" . (0.1 . 0.7))
	 ("cello" . (0.2 . 0.8))
	 ("contrabass" . (0.2 . 0.8))
	 )
       instrument-equalizer-alist))

#(define-public (instrument-equalizer s)
  (let ((entry (assoc s instrument-equalizer-alist)))
    (if entry
	(cdr entry))))

\set Voice.instrumentEqualizer = #instrument-equalizer

\set midiMinimumVolume = #0.20
\set midiMaximumVolume = #1.00

\set Staff.midiInstrument = "trumpet"
#(override-auto-beam-setting '(end 1 16 4 4) 1 2 'Staff)
#(override-auto-beam-setting '(end 1 8 2 4) 1 2 'Staff)
\override TupletBracket  #'bracket-visibility = ##f
\tupletUp
\time 4/4
\tempo 4=50
\partial 4

g,8.\mf\< g,16 | c2.\fermata g,8. c16 | e2.\fermata g,8 c |
e4 g,8 c e4 g,8 c | e2.\fermata c8. e16 | g2\ff\> e4 c | g,2.\f
g,8. g,16 | c2.-\markup { \italic \bold "morendo" } \fermata \bar "|."
}

\paper {
  #(set-paper-size "letter" 'landscape)
  hsize = 139.7\mm
  vsize = 215.9\mm
  linewidth = 122\mm
  indent = 0\mm
}

\score { 
\header { piece = "Taps" } 
\transpose c c'' { \taps } 
\layout { } 
\midi { 
\context { \Voice \remove Span_dynamic_performer } 
} 
}