finished up second theme

amazing-grace.ly

@@ -31,7 +31,7 @@ lhArpeggioShortest = \relative c, {
 dMajorScale = { cs d e fs g a b }
 
 introR = \relative c {
-  \tempo "Rubato" 4 = 80
+  \tempo "Rubato" 4 = 86
   \change Staff = "left" <af df f>4 \change Staff = "right" <af' df f>  <af' df f>2 |
   \change Staff = "left" \override Stem #'direction = #UP <bf,, ef gf>4 \revert Stem #'direction \change Staff = "right" <bf' ef gf> <bf' ef gf>2 |
   \change Staff = "left" \override Stem #'direction = #UP <f, af df>4 \revert Stem #'direction \change Staff = "right" <f' af df> <f' af df>2 |
@@ -42,7 +42,7 @@ introR = \relative c {
   
   \time 12/8
   \key d \major
-  \tempo "In time" 4. = 84
+  \tempo "In time" 4. = 86
   
   \ottava #'0 <a, d a'>4. <a d g> <a d fs> <a d g> |
   <a d a'> <a d g> <a d fs> <a d g> |
@@ -161,15 +161,7 @@ firstThemeL = \relative c, {
 firstInterludeR = \relative c'' {
   \key g \major
   \time 15/8
-  \tempo \markup {
+  \tempo "A little faster" 4. = 112
-    \concat {
-      (
-      \smaller \general-align #Y #DOWN \note #"8" #1
-      " = "
-      \smaller \general-align #Y #DOWN \note #"8" #1
-      )
-    }
-  }
   
   d4. d, d'4 d,8 << { d'4 c b } \\ { d8 d, c' d, b' d, } >> |
   c'4. c, c'4 c,8 << { c'4 b a } \\ { c8 c, b' c, a' c, } >> |
@@ -197,6 +189,56 @@ firstInterludeL = \relative c, {
   d'8 a' d e fs e d2. |
 }
 
+lhBrokenFifths = \relative c {
+  g8 d' g ~ g g d' ~ d g d g,4. |
+}
+
+secondThemeR = \relative c'' {
+  g4. \tiny <d b'> <b' g'> \normalsize \grace { g16[ a] } b8 a g |
+  b4. \tiny <e, fs g> <e' fs g b> \normalsize \afterGrace a, { b16[ a] } |
+  g4. \tiny d <b' g'> \normalsize \afterGrace e, { g16[ e] } |
+  d4. \tiny <g e> <d' g e>4 <d, g e> c |
+  <e fs>4. d <e' fs a>4 <e, fs a> \normalsize d |
+  
+  g4. \tiny <d b'> <b' g'> \normalsize \grace { g16[ a] } b8 a g |
+  b4. \tiny <e, fs g> <e' fs g b> \normalsize a, |
+  d4. \tiny a <a' d>4 <a, d> <g d'> |
+  \times 3/5 { fs8 d fs a d } \times 3/5 { d fs a d d } d'4. \normalsize b,, |
+  
+  d b d4 b8 \afterGrace d4. { b16[ d b] } |
+  g4. \tiny <d e g> <d' e g> \normalsize d, |
+  e \tiny <b e fs g> <b' e fs g>4 \normalsize g8 \afterGrace g4. { e16[ g e] } |
+  d4. \tiny <d g> <d fs> \afterGrace g { e16[ fs] } |
+  \normalsize <e fs g>4. \tiny b <b' e fs g> \normalsize \grace { g16[ a] } b8 a g |
+  b4. \tiny <c e>8 b g <c' e> b g <c, e> b g |
+  \normalsize <a d>4. \tiny d, <g d'> <fs d'> |
+  
+  \time 6/8
+  \normalsize \times 6/7 { d16 e fs g a b c } \times 6/7 { d e fs g a b c } |
+}
+
+secondThemeL = \relative c {
+  \lhBrokenFifths |
+  \transpose g e \lhBrokenFifths |
+  \lhBrokenFifths |
+  c,8 g' c ~ c c g' ~ g c4 g c,8 |
+  d,8 a' d ~ d d a' ~ a d4 a d,8 |
+  
+  \lhBrokenFifths |
+  \transpose g e \lhBrokenFifths |
+  c,8 g' c ~ c c g' ~ g c4 g c,8 |
+  d,8 a' d ~ d d a' d a d,8 ~ d4. |
+  
+  \lhBrokenFifths |
+  \transpose g c \lhBrokenFifths |
+  \transpose g e \lhBrokenFifths |
+  \transpose g d \lhBrokenFifths |
+  \transpose g e \lhBrokenFifths |
+  \transpose g c \lhBrokenFifths |
+  \transpose g d \lhBrokenFifths |
+  <d, d'>2. |
+}
+
 \score {
   \new PianoStaff \with {
     instrumentName = "Piano"
@@ -210,6 +252,7 @@ firstInterludeL = \relative c, {
       \introR
       \firstThemeR
       \firstInterludeR
+      \secondThemeR
     }
     \new Staff = "left" \with {
       midiInstrument = "acoustic grand"
@@ -220,6 +263,7 @@ firstInterludeL = \relative c, {
       \introL
       \firstThemeL
       \firstInterludeL
+      \secondThemeL
     }
   >>
   \layout { }