\version "2.11.32"

\header {	
		title = "45b. Supplication."
		source = "The B.F. White Sacred Harp (2000 Cooper edition)"   
		poet = ""
		composer = "Watts."
		arranger = "Alto by W.M. Cooper."
                tagline = \markup { \fill-line { "Copyright 2007, Reactor Core Hymn Repository" \with-url #"http://hymns.reactor-core.org/" "http://hymns.reactor-core.org/" } }
}

#(set-global-staff-size 16)
#(set-default-paper-size "letter" 'landscape)

%major
%sacredHarpHeads = \set shapeNoteStyles = ##(fa #f la fa #f la mi)
%minor
sacredHarpHeads = \set shapeNoteStyles = ##(la mi fa #f la fa #f)

\paper {
	pagenumber = "yes"
	linewidth = 120\mm
	indent = 0\mm
}

global = {
	\key a \minor
	\time 4/4
	\set Staff.printPartCombineTexts = ##f
}

soprano = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	a2 c4 c8 [b] | a2 c | d4 c8 [d] e2~ | e e | c4 g a2 | c a4 g | a1	
	\repeat volta 2 { a2 c4 c | g2 c | e4 d e2 ~ | e e | c4 c8 [b] a2 | g e4 g | a1 }
}

alto = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	e2 e4 e | e2 g | g4 g8 [e] g2~ | g g | g4 g g2 | a a4 b | a1
	\repeat volta 2 { a2 g4 g | g2 a | a4 a g2~ | g g | e4 e8 [g] e2 | g g4 e | e1 }
} 

tenor = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	e2 a4 a8 [g] | a2 g | b4 a8 [g] e2~ | e e | g4 e8 [d] e2 | a c4 d | e1
	\repeat volta 2 { c2 e4 d8 [c] | d2 e | a,4 a8 [g] e2~ | e e4. (g8) | a4 a8 [g] a2 | c b4 b | a1 }
}

bass = \relative f { \sacredHarpHeads \set autoBeaming = ##f
	e2 a,4 e' | d2 c | e4 e a,2 | a e' | e4 d e2 | a a4 g | a1
	\repeat volta 2 { a2 c4 g | g2 c8 (a4.) | a4 a8 [g] e2~ | e e | a,4 e' d2 | c4. (d8) e4 e | a,1 }
}

altwords =  <<
	\lyricsto "altvox" \context Lyrics = a { 
		O thou who hear -- est when sinners cry,
		Tho' all my crimes be -- fore thee lie,
		Be -- hold them not with an -- gry look,
		But blot their mem -- 'ry from thy book.
	}
>>

\score { \new ChoirStaff <<
    \new Staff << \global \clef treble \new Voice = "altvox" \soprano \new Lyrics \lyricsto "altvox" \altwords >>
>>
  \layout {
    \context { \Score
    		\remove "Bar_number_engraver"
		\override PaperColumn #'keep-inside-line = ##t
	}
    \context { \ChoirStaff \accepts "Lyrics" }
    \context { \Lyrics
    		\override LyricSpace #'minimum-distance = #1.2 
		\override LyricText #'self-alignment-X = #LEFT
      		\consists "Bar_engraver"
      		\consists "Separating_line_group_engraver"
      		\override BarLine #'transparent = ##t
	}
  }
}

\score {
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef treble  \unfoldRepeats { \soprano } }
  \midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 149 4) } } 
}