Construct smooth-flowing chord progressions for the supplied music.
|:"^March" E | A2 A>A A2 B>d | c2 c>c c2 d>f | fece edBG |1 A2 A>A AEC :|2 
 A2 A>A A |]:[M:3/4]"^Waltz" (([cA][dB])) | ([ec-]2 [cA]2) ([af-][fd]) | 
 ([ec-]2 [cA]2) (([fd][ec])) | ([dB-]2 [BG]2) (([cA][BG])) | (AGA[BG]) (([cA][dB])) | 
 ([ec-]2 [cA]2) ([af-][fd]) | ([ec-]2 [cA]2) (([fd][ec])) | ([dB-]2 [BG]2) [gB]2 | 
 [ac]4 ::[M:2/4]"^Hopsa" e/e/ | .e.c .a.f | .e.c .A.c | .e.d .B.e | .f.e .c.e | 
 .e.c .a.f | .e.c .A.c | .e.d .F.G | .A2 z :|  
X:1
L:1/8
Q:1/4=126
M:4/4
K:A
|:"^March" E |"A" A2 A>A A2"E7" B>d |"A" c2 c>c c2"D" d>f |"A" fece"E7" edBG |1"A" A2 A>A AEC :|2 
"A" A2 A>A A |]:[M:3/4]"^Waltz" (([cA][dB])) |"A" ([ec-]2 [cA]2)"D" ([af-][fd]) | 
"A" ([ec-]2 [cA]2) (([fd][ec])) |"E7" ([dB-]2 [BG]2) (([cA][BG])) |"A" (AGA[BG]) (([cA][dB])) | 
"A" ([ec-]2 [cA]2)"D" ([af-][fd]) |"A" ([ec-]2 [cA]2) (([fd][ec])) |"E7" ([dB-]2 [BG]2) [gB]2 | 
"A" [ac]4 ::[M:2/4]"^Hopsa" e/e/ |"A" .e.c"D" .a.f |"A" .e.c .A.c |"E7" .e.d .B.e |"A" .f.e .c.e | 
"A" .e.c"D" .a.f |"A" .e.c .A.c |"E7" .e.d .F.G |"A" .A2 z :|  