\version "2.0.1"

\header {
  title = "Trio from Pomp and Circumstance No. 1"
  composer = "Edward Elgar\break Arr. by Toshi Nagata"
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%  Section 1

sectionIR = \notes \relative c' {
  << {  \phrasingSlurUp
        g'2 \( fis8 g a4 e2 d2 \) c2 \( b8 c d4 a2 ~ a2 \) } \\
     << { d2 d2 b2 ~ b2 g2 g2 g2 fis2 }
        { b2\mp c2 g2 ~ g2 e2 s2 e2 s2 } >> >>
  << { b'2 \( cis8 d4 e8 a2 d,2 \) g2 \( g8 fis4 e8 d2 ~ d2 \) } \\
     << { g,2 a a ~ a d cis s2 c!2 } 
        { s2 s s s b a s2 fis2->( } >> >>
  << { g'2 \( fis8 g a4 e2 d2 \) c2 \( b8 c d4 a2 ~ a2 \) } \\
     << { b2 d2 b2 ~ b2 g2 g2 g2 fis2 }
        { g2) c2 g2 ~ g2 s2 s2 e2 s2 } >> >>
  << { b'2 \( cis8 d4 e8 a2 d,2 \) c'?2-- \( c8-- b4-- a8-- b2-- ~ b2 \) } \\
     << { s2 s d, s g fis r4 g fis f } 
        { g,2\< a a ~ a\! c?\mf c s4 b b b } >> >>
  << { e2 \( fis?8 g4 a8 d,2 g2 \) g,2 \( c8 b4 a8 \) r4 g'\< <<g b>> <<g\! b d>> } \\
     << { c,2 d s b e, fis g2 } 
        { g2 a\> g g\! c,\mp } >> >>

}

sectionIIR = \notes \relative c' {
  << { \phrasingSlurUp
        g''2 \( fis8 g a4 e2 d2 \) c2 \( b8 c d4 a2 ~ a2 \) } \\
     << { < g b d g >\arpeggio d'2 b2 ~ b2 g2 g2 g2 fis2 }
        { s2\f c'2 g2 ~ g2 e2 d2 cis2 d2 } >> >>
  << { b'2 \( cis8 d4 e8 a2 d,2 \) << { g2 \( g8 fis4 e8 d2 ~ d \) } { s2 s s c! } >> } \\
     << { g2 a d s d cis r4 a s2 } 
        { d,2 e a ~ a b a s4 fis4-- fis-- d-- } >> >>
  << { g'2 \( fis8 g a4 e2 d2 \) c2 \( b8 c d4 a2 ~ a2 \) } \\
     << { b2 d2 b2 ~ b2 g2 g2 g2 fis2 }
        { g2 c2 g2 ~ g2 c,2 d2 e2 d2 } >> >>
  << { b'2 \( cis8 d4 e8 a2 d,2 \) c'?2-- \( c8-- b4-- a8-- b2-- ~ b2 \) } \\
     << { g,2 a d s g fis r4 g fis f } 
        { d,2\< e a ~ a\! c?\ff c s4 b\> b b\! } >> >>
  { e2\f \( fis?8 g4 a8 d,2 g2 \) }
  << { \phrasingSlurUp
       g,2 \( c8 b4 a8 g2 ~ g4 \) r } \\
       << { e2 fis s4 d d }
          { c2 c   r4 b b } >> >>
}

sectionIL = \notes \relative c {
  << { g,4 g a a b b b b c c d d e e d d }
     { g4-_ g-_ a-_ a-_ b b b b c c d d cis cis d d } >>
  << { g, g g g fis fis fis fis e e a, a d d d d }
     { d' d e e d d fis fis e e a, a d d d d } >>
  << { g,,4 g a a b b b b e e d d cis cis d d }
     { g4 g a a b b b b e e d d cis cis d d } >>
  << { g, g g g fis fis fis fis e e d d g g g g }
     { d' d e e fis fis fis fis e e d d g g g g } >>
  << { c, c c c b b e e a, a d d g, g g g }
     { c, c c c b b e e a, a d d g, g g g } >>
}

sectionIIL = \notes \relative c {
  << { g,4 g a a b d g b c c, d d e e d d }
     { g4 g a a b d g b c c, d d e e d d } >>
  << { g, g g g fis fis fis fis e e a a d, d d d }
     { g' g g g fis fis fis fis e e a a d, d d d } >>
  << { g,4 g a a b b b b e, e d d cis cis d d }
     { g'4 g a a b b b b e, e d d cis cis d d } >>
  << { g, g g g fis fis fis fis e e d d g g g g }
     { g' g g g fis fis fis fis e e d d g g g g } >>
  << { c, c c c b b e e a, a d, d g g g r }
     { g' g d d g g g g a a d, d g g g r }
     { c c a a b b b b } >>
}

\score {
  \context PianoStaff <<
    \context Staff = rh {
      \property Staff.midiInstrument = #"acoustic grand"
      \clef treble
      \notes \relative c' {
        \key g \major \time 2/4
        << { \property Voice.TextScript \set #'padding = #3.0
            s2^\markup { \huge \bold Largamente } 
          }
          \sectionIR >>
        \sectionIIR
        \bar "|."
      }
    }
    \context Staff = lh {
      \property Staff.midiInstrument = #"acoustic grand"
%      \property Staff.autoBeaming = ##f
      \clef bass
      \notes \relative c {
        \key g \major \time 2/4
        \sectionIL
        \sectionIIL
      }
    }
  >>

  \paper {
   linewidth = 19.8 \cm
   \translator {
     \ScoreContext
     SpacingSpanner \override #'shortest-duration-space = #3
   }
  }
  \midi {
   \translator{
    \VoiceContext
    \remove Dynamic_performer
   }
  }
}