% Beethoven's 7th Symphony
% Arrangement for Wind Orchestra
% 1. & 2. Tenorhorn

\include "deutsch.ly" 

stemDown = \property Voice.Stem \override #'direction = #-1
stemUp = \property Voice.Stem \override #'direction = #1
stemRevert = \property Voice.Stem \revert #'direction

tenorI = \notes \relative c' {
		\time 2/4
		\key c \major
		R2 * 2                                        % 1 - 2
		\repeat unfold 2 {                            % 3 - 6
				e4 e8-. e-. e4-- e--
		} 
		e4 e8-. fis-. g4-- g--
		g4 g8-. g-. g4 r                              % 9 - 10

		\repeat unfold 2 {                            % 11 - 26
				g4 g8-. a-. h4-- h--
				fis4 fis8-. gis-. a4-- a--
				e4 e8-. e-. e4-- e--
				e4 fis8-. gis-. a4 r
		}
		
		\repeat unfold 2 {                            % 27 - 30
				e'4 e8-. e-. e4-- e--
		}
		e4 e8-. fis-. g4-- g--
		g4 g8-. g-. g4 r                              

		\repeat unfold 2 {                            % 35 - 50
				g4 g8-. a-. h4-- h--
				fis4 fis8-. gis-. a4-- a--
				e4 e8-. e-. e4-- e--
				e4 fis8-. gis-. a4 r
		}

		c,2 ( ) h2 h16 ( c d4 c16 ) h h8 c c4
		c4. c16 d dis8 ( ) e e-. e-.                  % 55 - 56
		d16 ( e f4 e16 ) d d8 ( ) e e4

		
		\repeat unfold 2 {                            % 59 - 74
				e2 ( ) dis2 d8 ( h16 cis d8 e16 ) d d8 ( ) cis c4
				c2 ( h4 ) c h16 ( c d4 c16 ) h
		}
		\alternative {
				{ a8 a16 ( ) h c8-. c16 ( ) d }           % 66
				{ a4 r }                                  % 74
		}
}

tenorII = \notes \relative c' {
		\time 2/4
		\key c \major
		R2 * 2                                        % 1 - 2
		\repeat unfold 2 {                            % 3 - 6
				e4 e8-. e-. e4-- e--
		} 
		e4 e8-. d-. e4-- e--
		d4 c8-. d-. e4 r                              % 9 - 10

		\repeat unfold 2 {                            % 11 - 26
				g4 g8-. a-. h4-- h--
				fis4 fis8-. gis-. a4-- a--
				e4 e8-. e-. e4-- e--
				e4 e8-. e-. e4 r
		}

		c'2 ( ) h2 h16 ( c d4 c16 ) h h8 c c4         % 27 - 30
		c4. c16 d dis8 ( ) e e-. e-.                  
		d16 ( e f4 e16 ) d d8 ( ) e e4

		
		\repeat unfold 2 {                            % 35 - 50
				e2 ( ) dis2 d8 ( h16 cis d8 e16 ) d d8 ( ) cis c4
				c2 ( h4 ) c h16 ( c d4 c16 ) h
		}
		\alternative {
				{ a8 a16 ( ) h c8-. c16 ( ) d }           % 42
				{ a4 r }                                  % 50
		}
}

\score {
  \context Staff <
			\property Score.skipBars = ##t
			\context Voice = tenor \partcombine Voice
			\context Thread = tenorI {
					\tenorI
			}
			\context Thread = tenorII {
					\tenorII
			}
	>
}