% Created on Wed Dec 26 18:54:54 GMT 2007
\version "2.11.40"

myStaffSize = #18.5

#(set-global-staff-size myStaffSize)

\paper {
   #(set-paper-size "letter")
   #(define fonts
       (make-pango-font-tree "URW Palladio L"
                          "Nimbus Sans"
                          "Luxi Mono"
                           (/ myStaffSize 20)))
}

\header {
	title = "Let Zion in Her Beauty Rise"
	% subtitle = \markup \small \medium \italic {Not appropriate for LDS sacrament meetings}
	poet = \markup {\italic Text: Edward Partridge}
	composer = \markup {\italic Music: Anon, Germany}
	arranger = \markup  {\italic arr. Andrew Hawryluk}
	copyright = \markup \tiny \override #'(baseline-skip . 2.5) \center-align {
              "©2004 Andrew Hawryluk    www.musicbyandrew.ca"
              "You can share and modify this work under the Creative Commons Attribution-Noncommercial 3.0 License."
              "To view a copy of this license, visit http://creativecommons.org/licenses/by-nc/3.0/"
	}
}

\include "english.ly"
\include "../andrews-defs.ly"

RightHandOne = \relative c' {
	\override DynamicLineSpanner #'staff-padding = #2.0
	\override TextScript #'staff-padding = #2.0
	\override DynamicLineSpanner #'Y-extent = #'(-0.5 . 1.5)
	\override TextScript #'Y-extent = #'(-0.5 . 1.5)
	\clef treble
	\key bf \major
	\tempoMark #"Maestoso" #2
	<f bf, f>2._\markup {\dynamic mp \italic \whiteout rubato} f4
	\grace {f16[ bf, f]~} \padScript #0.5 <f' bf, f>1^\fermata
	<f bf, f>2. <f bf, f>4
	\grace {f16[ bf, f]~} \padScript #0.5 <f' bf, f>2.^\fermata f'4\(
	bf4_\markup \italic {a tempo} a8 g f4 bf
	d,4 ef f f
	g8 a bf4 c c
	d2\) <f,, bf, f>
	\grace {f16[ bf, f]~} <f' bf, f>2. f4^\(
	<bf f bf,>4 a8 g f4 bf
	d,4 ef f f
	g8 a bf4 bf a
	bf2\) <f bf, f>
	\grace {f16[ bf, f]~} <f' bf, f>2 r8 f^\( bf c
	\voiceOne <d bf>4<c a> <d bf> <ef c>
	<c a>\arpeggio a8 bf c4.\) bf16^\( c \oneVoice
	\once \override TextScript #'staff-padding = #3.0
	<d bf f>4--_\markup \italic {rit.}  <c a f>-- <d bf f>-- <ef bf g>--
	<c a f>2.\) f,4
	\voiceOne <bf f>_\markup \italic {a tempo}  a8 g f4 bf
	d, ef <f c bf> <f c a>
	g8 a bf4 bf a \oneVoice
	\tempoMark "Piu Mosso" #2
	<bf f bf,>2 <f bf, f>2
	\grace {f16[ bf, f]~} <f' bf, f>2~ <f bf, f>8 f, bf f'
	<f bf,>2 <f bf, f>
	\grace {f16[ bf, f]~} <f' bf, f>2~ <f bf, f>8\< f, bf f'
	\once \override DynamicText #'X-offset = #-1.0
	<bf f bf,>4\mf a8 g <f bf,>4 bf
	<d, bf>4 <ef bf> <f c bf> <f c a>
	g8 a bf4 <c bf f> <c a f>
	<d bf f>2. r8 f
	<bf f bf,>4 a8 g <f bf,>4 bf
	<d, bf>4 <ef bf> <f c bf> <f c a>
	\voiceOne g8 a bf4 <bf f c> <a f c>
	\once \override TextScript #'staff-padding = #4.0
	<bf f d>2_\markup \italic {rit.} r2 \oneVoice
	\time 2/4
	f,,8\< f' <df f,>-> <ef af,>->
	\time 4/4
	\key df \major
	<f df>4->\f <ef c af> <f df af> <gf df bf>
	<ef c af> c8 df ef4 <df f,>8 <ef af,>
	<f df af>4 <ef c af> <f df af> <gf df bf>
	<ef c af>2. af4
	\once \override TextScript #'staff-padding = #3.0
	<df af df,>_\markup \italic {a tempo} c8 bf <af df,>4 df
	\acciaccatura {df16[ af]} df,8 ef f gf <af ef df>4 <af ef c>
	\voiceOne bf8 c df4 <df af ef> <c af ef> \oneVoice
	<df af df,>2 <af df, af>
	\grace {af16[ df, af]~} <af' df, af>2~ <af df, af>8 af, df af'
	<af df, af>2 <af df, af>
	\grace {af16[ df, af]~} <af' df, af>4. af,8 df af' df af'
	<df af df,>4 c8 bf <af df,>4 df
	<f, df>4 <gf df> <af ef df> <af ef c>
	\voiceOne bf8 c df4 <ef df af>-> <ef c af>->
	<f df af>2.-> r8 af, \oneVoice
	<df af df,>4 c8 bf <af df,>4 df
	df,8 ef f gf <af ef df>4 <af ef c>
	\voiceOne bf8 c df4 <df af ef> <c af ef> \oneVoice
	<df af df,>2.-> <af df, af>8 <af ef af,>
	<af f df af>4 <af ef c af> <af f df af> <af gf df bf>
	<af ef c af> <af c, af>8 <af df, af> <af ef af,>4 <af df, af>8 <af ef af,>
	<af f df af>4 <af ef c af> <af f df af> <af gf df bf>
	<af ef c af>2. af4
	\voiceOne <df af df,>4 c8 bf af4^~ <df af>
	<f, df>4 <gf df> <af ef df> <af ef c>
	bf8 c df4 <df af ef> <c af ef> \oneVoice
	<df bf f df>2. af,4
	\once \override TextScript #'staff-padding = #3.0
	<df af df,>4_\markup \italic {rit.} c8 bf <af df,>4 df
	df,8 ef f gf <af ef df>4 <af ef c>
	\override TextSpanner #'bound-details #'left #'text = 
		\markup { \italic "molto rit.  " }
	\override TextSpanner #'extra-offset = #'(-0.2 . 0)
	\textSpannerDown
	\voiceOne bf8 c df4 <df af ef>\startTextSpan <c af ef> \oneVoice
	<df af df,>4. <af df,>8 \grace {af16[ df, af]~}
	\times 2/3 {<af' df, af>4 <df, af>\stopTextSpan <af df,>}
	\padScript #1
	\clef bass <af df, af>1\fermata
	\bar "|."
}

RightHandTwo = \relative c' {
	s1*14
	f1
	f2~\arpeggio f4. r8
	s1*2
	bf,2 bf
	bf s2
	<ef bf> <f c>
	s1*6
	ef2 s2
	r4 f4 \grace {f16[ bf, f]~} <f' bf, f>2
	s1*2
	<ef' bf>2 s2
	r4 <f, bf,>8 f, f' f, r f'
	s2
	s1*6
	<gf df>2 s2
	s1*6
	<gf' df>2 s2
	r4 <af, df,> \grace {af16[ df, af]~} <af' df, af>2
	s1*2
	<gf' df>2 s2
	s1*5
	r2 f8\( ef df c
	bf4\) bf af af,
	<gf'' df>2 s2
	s1*3
	<gf, df>2 s2
}

LeftHandOne = \relative c {
	s1*13
	ef2 ef
	s1*12
	r8 d g d r c f4
	s1*3
	r8 d g d r c f4
	s1*2
	s2
	s1*5
	r8 f bf f r ef af4
	s1*4
	r8 df, gf2.
	s1
	r8 f bf df r ef, af4
	s1*3
	r8 f bf df r ef, af4
	s1
	r4 gf,8 df' gf af df4
	s1*9
	r8 f,4 bf8 r ef,4 af8
}

LeftHandTwo = \relative c {
	\override Staff.SustainPedalLineSpanner #'staff-padding = #4.5
	\clef bass
	\key bf \major
	<bf f bf,>1
	\padScript #0.8
	<ef bf ef,>_\fermata
	<bf f bf,>2 <bf f bf,>
	\padScript #0.8
	<ef bf ef,>1_\fermata
	<f, bf,>1~
	<f bf,>
	ef
	f
	<ef' bf ef,>
	<f, bf,>
	ef
	f2 f,
	bf1
	\voiceTwo <bf' ef,>1\oneVoice
	bf'1
	bf
	bf4-- d-- ef-- c--
	r2 f,,
	bf, d
	g' f
	ef4 d8( ef f4) f,
	<bf f bf,>1
	<ef bf ef,>4. bf8 ef2
	bf4 <bf f bf,>2.->
	<ef bf ef,>4. bf8 ef2
	bf,2 d
	\voiceTwo g f \oneVoice
	ef'4 d8 ef f4 f,
	<bf bf,>2 <ef bf ef,>
	bf,2 d
	\voiceTwo g f \oneVoice
	ef'4 d8 ef f4 f,
	bf,1~\sustainDown
	\time 2/4
	bf4 r4\sustainUp
	\time 4/4
	\key df \major
	r4 r8 \padScript #0.5 <df df,>8->^\sfz~ <df df,>2~
	<df df,>1
	<df df,>2 <gf gf,>
	<af af,>1
	<df, df,>2 <f f,>
	\voiceTwo bf2 af \oneVoice
	<gf' gf,>4 <f f,>8 <gf gf,> <af af,>4 <af, af,>4
	<df, df,>1
	<gf df gf,>4. df8 gf2
	<df' af df,>4 df,8 df, df'2
	\voiceTwo gf2. af4 \oneVoice
	<df, df,>2 <f f,>
	\voiceTwo bf2 af \oneVoice
	<gf' gf,>4 <f f,>8 <gf gf,> <af af,>4 <af, af,>4
	<df, df,>2-> <gf gf,>
	<df df,>2 <f f,>
	\voiceTwo bf2 af \oneVoice
	<gf' gf,>4 <f f,>8 <gf gf,> <af af,>4 <af, af,>4
	\voiceTwo <df, df,>1_> \oneVoice
	<df df,>4. <df' df,>8 <df df,>2
	<df df,>4. <df df,>8 <df df,>2
	<df df,>4. <ef ef,>8~ <ef ef ,>4 <gf gf,>
	<af af,>1
	<df, df,>1
	R1
	gf4 f8 gf af4 <af af,>
	<bf bf,>1
	<gf df gf,>2 <f df f,>
	\voiceTwo bf,2 af \oneVoice
	<gf' gf,>4 <f f,>8 <gf gf,> <af af,>4 <af, af,>
	<df, df,>2 \times 2/3 {gf8 df'4} \times 2/3 {gf4 af,8}
	\padScript #0.5
	<df, df,>1-> _\fermata
}

staffPiano = \new PianoStaff {
	\set PianoStaff.midiInstrument = #"acoustic grand"
		\time 4/4
		<<
		\context Staff = "RH" {  % Right hand 
			\set Staff.connectArpeggios = ##t
			<<
			\new Voice {\RightHandOne}
			\new Voice {\voiceTwo \RightHandTwo}
			>>
		}
		\context Staff = "LH" {  % Left hand 			
			<<
			\new Voice {\voiceOne \LeftHandOne}
			\new Voice {\LeftHandTwo}
			>>
		}
	>>
}



\score {
	<<
		\staffPiano
	>>
	
	\midi {
	}

	\layout {
		\context {
			\Staff
			\consists Span_arpeggio_engraver
		}
	}
}