\header {
    title = "A Holy Day Song"
    subtitle = "SATB with Piano and Chords"
    composer = "Craig McQueen"
    instrument = "SATB parts"
    copyright = "Copyleft Craig McQueen - this work may be freely performed and distributed."
    date = "Unleavened Bread 1998"
    tagline = "Unleavened Bread 1998"
}

\version "2.10.0"

%#(set-default-paper-size "a4")
%#(set-global-staff-size 17.85)
#(set-default-paper-size "letter")
#(set-global-staff-size 19)
afterGraceFraction = #(cons 1 2)

\layout
{
    indent = #0
    \context { \RemoveEmptyStaffContext }
}

    \paper 
    {
%        betweensystempadding = #1
%        raggedbottom = ##f
%        raggedlastbottom = ##f
    }

global = {
    \key c \major
    \override Staff.TimeSignature #'style = #'()
    \override Score.Script #'padding = #1
    \override Score.SpacingSpanner #'shortest-duration-space = #5
    \time 4/4
}

bars = {
    s1 * 8  |           % chorus
    \bar "||"
    s1 * 2 |            % verse four B
    \time 2/4
    s2
    \time 4/4
    s1 * 2
    \bar "|."
}

pianoTrebleIntro = \relative c' {
    c16 |
    < e c g >8. c16 < e c g > d c8 < d b g >8. g,16 < g' d b >8 d |
    < c a e >8. a16 < c a e > d c8 < e c g > f16 e ~ e c g8 |
    < a f >8. f16 < c' a > d8. < c g e >8. g16 ~ g8 g |
    < a f >16 c f,8 < c' g >8 < b f > < c g e >4~ < c g e >8 r16
}

pianoBassIntro = \relative c {
    c16~ |
    < c~ c, >2*7/8 b16~ < b b, >2*7/8 a16~ |
    < a a, >2*7/8 g16~ < g g, >2*7/8 f16~ |
    < f f, >2*7/8 e16~ < e e, >4 < e e, >4*3/4 f16~ |
    < f f, >4*3/4 g16~ < g g, >4 c,16 g' c d e g8
}

chordsIntro = \chordmode {
    s16 |
    c2 g/b | a:m c/g | f c/e | f4 g c2 |
}

pianoTrebleVerseOne = \relative c' {
    c16~ |
    <e c g>4 <e c g>8. b16~ <g' e b>4 b,16 e g8 |
    <c, a>8 f,16 <c' a>16 ~ < c a>8 <d b>8 <e c g>4 g,16 c e8 |
    % work in progress
    <f c a>4 <f c a>4 <e c g>8. c16 g' e c8 |
    %< f c a >4 < a f c> < g d b > < g d a >16 < g d b >8. |
    <f c a>8. <d a>16~ <d a~>8 <c a> <d b g>4 < g d a >16 < g d b >8 c,16~ |

    <e c g>4 <e c g>8. b16~ <g' e b>4 b,16 e g8 |
    <c, a>8 f,16 <c' a>16 ~ < c a>8 <d b>8 <e c g>4 g,16 c e8 |
    <f c a>4 <f c a>4 <e c g>4 <g c, g>8 <e c g> | 
    <f c a>8. <d a>16~ <d a~> f, <c' a f>8 <c g e>2 |
}

pianoBassVerseOne = \relative c {
    c16~ |
    <c c,>2*7/8 e16~ <e e,>2*7/8 f,16~
    <f f,>4*3/4 g16~ <g g,>4*3/4 c16~ <c c,>2 |
    f,8. c'16 f4 e,8. c'16 e4*3/4 d16 ~ |
    < d d, >4*3/4 f,16 ~ <f f,>4*3/4 g16 ~ <g g,>4*3/4 g16 ~ g4*3/4 c16~ |

    <c c,>2*7/8 e16~ <e e,>2*7/8 f,16~
    <f f,>4*3/4 g16~ <g g,>4*3/4 c16~ <c c,>2 |
    f,8. c'16 f4 e,8. c'16 e4 |
    d,16 a' d8 <g, g,>4 <c, c,>2 |
}

verseOneMusic = \relative c' {

    c16^\markup { "Verse 1 -- Unison" }  |
    e8. c16 e f8 g16 ~ g4 ~ g8 b, |
    c8 a16 c ~ c8 d e4 ~ e8 c16 c |
    a'8 a16 a ~ a8 a16 g ~ g2 |
    f8 e16 d ~ d8 c d4 ~ d8 c16 c |

    e8 c16 e ~ e8 f g4 ~ g8 b,16 b |
    c8 a16 c ~ c8 d e4 ~ e8 c16 c |
    a'8 a16 a ~ a a a g ~ g e8. ~ e8. e16 |
    f8 e16 d ~ d8 c c2 |

}

verseOneWords = \lyricmode {
    Some -- times 
    I think I know just
    how we're meant to live, and we'll
    show to all the world
    love and peace and give and we've

    got it all just right, and we'll
    win by our own might, but then
    God steps in and re -- minds us to
    walk by faith not sight. \break
}

chordsVerseOne = \chordmode {
    c2 e:m | f4 g c2 | f2 c/e | d2:m7 g2 |
    c2 e:m | f4 g c2 | f2 c/e | d4:m7 d:m7/g c2 |
}

pianoTrebleVerseTwo = \relative c' {
    < e c >4 < e c > < d b > < d b > | < e c > < c a > < c' g e > < g e c > | 
    < f c a > < f c a > < g e c g > < g e c g > | < f c a > < a f c > < g d c >8. g,16 < g' d a > < g d b >8. | 
    < e c g >4 < e c g > < d b g > < d b g > | < c a e > < c a e > < e c g e >8 e,16 g < e' c > g, e8 | 
    < f' c a >4 < f c a > < e c g > < e c g > |
%    < f c >16 a, c f < g d c >8 < g d b >16 g, < e' c g >2 |
    < f c a>8 a,16 <d a>16~ <d a>16 f,16 <c' a f>8 < c g e>2 |
}

pianoBassVerseTwo = \relative c {
    < c g' >4 < c g' > < b g' > < b g' > | < a e' > < a e' > < g e' > < g e' > | 
    < f f' > < f f' > < e c' > < e c' > | < d d' > < d d' > < g g' > < g g' > | 
    < c c, > < c c, > < b b, > < b b, > | < a a, > < a a, > < g g, > < g g, > | 
    < f' f, > < f f, > < e e, > < e e, > |
%    < f f, > < g g, > < c, c, >2 |
    <d d,> <g, g,> <c c,>2 |
}

verseTwoMusic = \relative c' {
    c16^\markup { "Verse 2 -- Unison" } c |
    e8. c16 e8 f16 g ~ g8. g16 g g a b |
    c8 c16 c ~ c16 e,8 g16 ~ g4 ~ g8 c,16 c |
    a'8 a16 a ~ a8 a16 g ~ g e8. ~ e8. e16 |
    f8 e16 d ~ d8 c d4 ~ d8. c16 |
    
    e8. c16 e8 f16 g ~ g4 ~ g8 a16 b |
    c16^\accent c8 c16 c8 e,16 g ~ g4 ~ g8. c,16 |
    a'8 a16 a ~ a8 a8 g4 ~ g8 e |
    f8 e16 d ~ d8 c c2
}

verseTwoWords = \lyricmode {
    When we think we've had e -- nough, re -- mem -- ber Christ was
    hu -- man just like us. He can
    sym -- pa -- thise and help us when --
    ev -- er life is tough. And
    
    Christ would pay the cost for all
    \markup { \italic our } sins up -- on the cross, so
    life and love may win and
    death for -- ev -- er lost. \break
}

chordsVerseTwo = \chordmode {
    c2 g/b | a:m c/g | f2 c/e | d:m7 g |
    c2 g/b | a:m c/g | f2 c/e | d4:m7 d:m7/g c2 |
}

pianoTrebleChorus = \relative c' {
    < c' g e c>4 < c g e c>16 < c g e c>8 < b g e b >16~ < b g e b >4~ < b g e b >8 g8 |
    < a f c >8 c,16 < a' f c >~ < a f c >8 c, << { g'2 } \\ { d16 e8. ~ e8 c } >> |
    < a' f c >4 < a f >8 c, < g' e c>4 c,8 < e c g > |
    < f c a >4 < a f c> < g d b > < g d a >16 < g d b >8. |

    < c g e c>4 < c g e c>16 < c g e c>8 < b g e b >16~ < b g e b >4~ < b g e b >8 g8 |
    < a f c >8 c,16 < a' f c >~ < a f c >4 < c aes f >2 |
    < c g e c >8. c,16 < g' e c>8. g,16 < e' c>8. a,16 < a' e c>8 < e c a> | 
    < f c a>8 a,16 <d a>16~ <d a>16 f,16 <c' a f>8 < c g e>2 |

    < c g e >4 < c g d >16 < c g e >8. < c g e >4 < c g d >16 < c g e >8. |
    r8 < f' a,>16 c a f c a < c a f >4 < d b g >
}

pianoBassChorus = \relative c {
    c,16 g' c e g4 e,16 b' e g b4 | f,16 c'8. g16 d'8. c,16 g' c e g4 |
    f,16 c' f a~ a4 e,16 c' e g~ g4*3/4 d,16 ~ |
    < d d, >4*3/4 f16 ~ <f f,>4*3/4 g16~ <g g,>2 |

    c,16 g' c e g4 e,16 b' e g b4 | f,16 c' f a ~ a4 f,16 c' f aes c4 |
    g,16 e' g8 ~ g4 a,16 e' a8 ~ a4*3/4 d,16 ~ | < d d,>4*3/4 g,16 ~ < g g,>4 c,16 g' c e g4 |

    c,,16 g' c e~ e4 c,16 g' c e~ e4 | <g, g,>1
}

chorusSopMusic =    \relative c'' {
    c4^\markup { "Chorus" } c16 c8 b16 ~ b4 ~ b8 g8 |
    a8 a16 a16 ~ a8 c,8 g'4 ~ g8 c,16 c |
    a'16 a8 a16 a8 a16 g ~ g4 ~ g16 c, e8 |
    f8 e16 e d 8 c16 d ~ d2 |
    
    c'4 c16 c8 b16 ~ b4 ~ b8 g8 |
    a8 a16 a16 ~ a8 b c4 ~ c8 c |
    c16 g8. g8 e16 c16 ~ c8. c16 e8 e |
    f8 e16 d ~ d8 c c2 |
}

chorusAltoMusic =    \relative c' {
    e4 e16 e8 g16 ~ g4 ~ g8 e8 |
    f8 f16 f ~ f8 c d16 ( e8.) ~ e8 g,16 g |
    c16 c8 c16 c8 c16 e ~ e4 ~ e16 c c8 |
    c8 c16 c c8 a16 b ~ b2 |

    e4 e16 e8 g16 ~ g4 ~ g8 e8 |
    f8 f16 f ~ f8 f aes4 ~ aes8 aes |
    g16 e8. e8 c16 a ~ a8. a16 c8 c |
    c8 c16 c ~ c8 a g2 |
}

chorusTenorMusic =    \relative c' {
    g4 g16 g8 d'16 ~ d4 ~ d8 d8 |
    c8 c16 b ~ b8 a g4 ~ g8 b16 b |
    a16 a8 a16 a8 a16 c ~ c4 ~ c16 c b8 |
    a8 a16 a a8 g16 a ~ a8 (g) ~ g4 |
   
    g4 g16 g8 d'16 ~ d4 ~ d8 d8 |
    c8 c16 c ~ c8 d ees4 ~ ees8 d |
    e16 c8. c8 g16 g ~ g8. g16 a8 a |
    a8 a16 a ~ a8 f e2 |
}

chorusBassMusic =    \relative c {
    c4 c16 c8 e16 ~ e4 ~ e8 e8 |
    f8 f16 g ~ g8 g c,4 ~ c8 c16 c |
    f16 f8 f16 f8 f16 e ~ e4 ~ e16 e e8 |
    f8 f16 f f8 d16 g, ~ g2 |

    c4 c16 c8 e16 ~ e4 ~ e8 e8 |
    f8 f16 f ~ f8 f f4 ~ f8 f |
    g16 g8. g8 c,16 a ~ a8. a16 a8 a |
    d8 d16 g, ~ g8 g c2 |
}

chorusWords = \lyricmode {
    How can it be? God
    works with one like me? Turns a
    sin -- ner to right -- eous -- ness and gives
    life for e -- ter -- ni -- ty. \break
    
    How can it be? God
    works with one like me? He
    gives hope to the poor, and turns the
    pris'n -- er in -- to free. \break
}

chordsChorus = \chordmode {
    c2 e:m7 | f4 g:9 c2 | f2 c/e | d2:m7 g2 |
    c2 e:m7 | f2 f:m | c/g a:m7 | d4:m7 d:m7/g c2 |
    c1 | g |
}

pianoTrebleVerseThree = \relative c' {
%    <e c g>8. c16 << {e16 f8 } \\ { <c g>8. } >> <g' e b>16~ <g e b>4~ <g e b>8 b,
    <e c g>8. c16 <e c g>8 c16 <g' e b>16~ <g e b>8. g,16 b e b g |
    <c a>8 f,16 <c' a>16 ~ < c a>16 f, <d' b>8 <e c g>4 r8 g,16 g |
    <c a f>8. a16 <f' c a>8. g,16 <e' c g>8. c16 <c' g e c>8 <g e c> |
    < f c a >4 < a f c> < g d b > < g d a >16 < g d b >8. |

    <e c g>4 <e c g>16 f8 <g e b>16~ <g e b>8. g,16 b e b g |
    <c a>8 f,16 <c' a>16 ~ < c a>16 f, <d' b>8 <e c g>4 r8 g,16 g |
    <c a f>8. a16 <f' c a>8. g,16 <e' c g>8. c16 <c' g e c>8 <g e c> |
    < f c a>8 <e c a>16 a, <d a>16 f, c' < c g e> ~ < c g e>2 |
}

pianoBassVerseThree = \relative c, {
    c8. g'16 c8. c16 e,16 b' e8~ e4 |
    f,8 c' g d' c,16 g' c e g4 | 
    f,16 c' f a~ a4 e,16 c' e g~ g4*3/4 d,16 ~ |
    < d d, >4*3/4 f16 ~ <f f,>4*3/4 g16 ~ <g g,>2 |

    c,8. g'16 c8. c16 e,16 b' e8~ e4 |
    f,8 c' g d' c,16 g' c e g4 | 
    f,16 c' f a~ a4 e,16 c' e g~ g4*3/4 d16 ~ |
    < d d,>4*3/4 g,16 ~ < g g,>4 c,16 g' c e g4 |
}

verseThreeMusic = \relative c' {
    c16^\markup { "Verse 3 -- Unison" } |
    e8. c16 e8 f16 g ~ g4 ~ g8 b,16 b |
    c8 a16 c ~ c8 d e4 ~ e8 c16 c |
    a'8 a16 a a8 a16 g ~ g4 ~ g8 e |
    f16 e8 e16 d8 c16 d ~ d2 |

    e4 e16 f8 g16 ~ g4 ~ g8 
    %<< {b } \new Voice = "v3alt" { b } >> |
    % Note -- the above is an attempt to support an alternative lyric ("Christ" instead of "God")
    % for one note. But this may require Lilypond v 2.8 to achieve it.
    b, |
    c8 a16 c ~ c8 d e4 ~ e8 c16 c |
    a'16 a8 a16 a8 a16 g ~ g4 ~ g16 e16 e8 |
    f8 e16 e d8 c16 c ~ c4 ~ c8 
}

verseThreeWords = \lyricmode {
    And please just don't for -- get thanks to
    God and to His Son Hu -- man
    life is -- n't all we get, and
    true life is yet to come.

    How can it be? God
    works with one like me? Turns a
    sin -- ner to right -- eous -- ness and gives
    life for e -- ter -- ni -- ty. \break
}

% See note within verseThreeMusic regarding alternate lyric
verseThreeAlternateWords = \lyricmode {
    Christ
}

pianoTrebleVerseFourA = \relative c' {
    <c' g e c>8 <c g e c>8 <c g e c>8 <c g e c>8 <b g e b>8 <g e b>16 <g e b>~ <g e b>8 <g e b>16 b,16 |
    <a' f c a>8 <a f c a>8 <a f d b> <a f d b> <g e c>8 e16 <e c g>16~ <e c g>8. c16|
    <a' f c>8 f16 c <a' f c>8 c,16 <g' e c>16~ <g e c>16 <e c>8 c16 ~ <c' g e c>8 <e, c g> |
    < f c a>8 a,16 <d a>16~ <d a>16 f,16 <c' a f>8 < d b g>4 <a f>16 <b g>8. |

    <c a>16 <b g> <a f> <b g>~ <b g>4^\fermata | % 2/4 bar
}

pianoBassVerseFourA = \relative c, {
    <c c,>4 <c c,>8. <d d,>16 <e e,>4 <e e,> |
    <f f,>4 <g g,>4 <c, c,>4 <c c,> |
    <f f,>4 <f f,> <e e,> <e e,> |
    <d d,> <f f,> <g g,>2 ~ |

    <g g,>2_\fermata | % 2/4 bar
}

verseFourAMusic =    \relative c' {
    c16^\markup { "Verse 4 -- Unison" } c |
    c'8 c c c b g16 g ~ g8. g16 |
    a8 a16 a a a a8 g e16 e ~ e8. c16 |
    a'8. a16 a8 a16 g ~ g e8. ~ e8 e |
    f8 e16 d ~ d8 c d2 ~ |

    d2^\fermata | % 2/4 bar
}

pianoTrebleVerseFourB = \relative c' {
%    #(add-grace-property 'Voice 'Note 'padding '2)
    <g' e c>4 <g d b> <e c a> <e c g>^\fermata |
    <a f c a>8 <a e c a> <a f c a>8 <a e c a> <g d b> <e c a> \afterGrace <e c g>8 { < a, f>8 [ <g e> \fermata ] } c8 |
    < f c a>8. <e c g>16 ~  <e c g>8^\fermata c |
    < a' f c >16 <g e c>8. <f d c>8 < e c > 
    \afterGrace <g d b>4. { << {g'4 <g d>} \\ {c,16 [d c g] a8 [b^\fermata ] } >> } < e, c g e >8
    <e c g e>1 |
}

pianoBassVerseFourB = \relative c {
    <c c,>4 <b b,> <a a,> <g g,>_\fermata |
    <f' f,>8 <e e,> <d d,> <c c,> <b b,> <a a,> <g g,>4_\fermata |
    <f' f,>8. <e e,>16~ <e e,>4_\fermata
    <d d,>2 <g, g,>4._\fermata <c, c,>8
    <c c,>1 |
}

verseFourBSopMusic =    \relative c'' {
    g8^\markup { "Verse 4b" }  g g g16 g e8 c16 c c8^\fermata c16 c |
    a'8 a a16 a a a g8 e e^\fermata c16 c |
    f16 f8 e16 ~ e8^\fermata c16 c f e8. d8 c
    d4.^\fermata c8 c1 |
}

verseFourBAltoMusic =    \relative c' {
    e8 e d d16 d c8 a16 a g8 g16 g |
    f'8 e f16 f e e d8 c c c16 c |
    c16 c8 c16 ~ c8 c16 c c c8. c8 c
    b4. g8 g1 |
}

verseFourBTenorMusic =    \relative c' {
    c8 c g g16 g a8 e16 e e8 e16 e |
    c'8 c c16 c c c b8 b g a16 a |
    a16 a8 g16 ~ g8 g16 g a g8. a8 g
    g4. e8 e1 |
}

verseFourBBassMusic =    \relative c {
    c8 c b b16 b a8 a16 a g8_\fermata g16 g |
    f'8 e d16 d c c b8 a g_\fermata g'16 g |
    f16 f8 e16 ~ e8_\fermata e16 e d d8. d8 d
    g,4._\fermata c8 c1 |
}

verseFourAWords = \lyricmode {
    And I saw the new Je -- ru -- sa -- lem. A
    voice said God's ci -- ty is now with men. And \break
    they shall be His peo -- ple, and
    God shall be their God. \break
}

verseFourBWords = \lyricmode {
    God will wipe ev -- ery tear from their eyes. There'll be \break
    no more death or sor -- row no more cries. There'll be \break
    no more pain. For the for -- mer things have
    passed a -- way.
}

chordsVerseFour = \chordmode {
    c2 e:m | f4 g:9 c2 | f2 c/e | d2:m7 g1 |

    c4 g/b a:m c/e |
    f8 a:m/e d:m a:m/c g/b a:m c4/g |
    f4 c/e d2:m7 g c1
}

\new Score \with
{
\remove Bar_number_engraver
}
{
\transpose c des {
    \context ChoirStaff <<
        \context Staff = "Women" <<
%            \set Staff.instrumentName = "Women"
            \context Voice =
                sopranos { \global
                    \voiceOne \chorusSopMusic
                    \bar "||" \pageBreak
                    \verseFourBSopMusic
                }
            \context Voice =
                altos { \voiceTwo \global
                    \chorusAltoMusic
                    \bar "||"
                    \verseFourBAltoMusic
                }
        >>
        
        \context Lyrics = sopranoLyrics { s1 }
                
        \context Staff = "Men" <<
%            \set Staff.instrumentName = "Men"
            \clef bass
            \context Voice =
                tenors { \voiceOne \global 
                    \chorusTenorMusic
                    \bar "||"
                    \verseFourBTenorMusic
                }
            \context Voice =
                basses { \voiceTwo \global 
                    \chorusBassMusic
                    \bar "||"
                    \verseFourBBassMusic
                }
            \bars
        >>
        
        \context Lyrics =
            sopranoLyrics {
                \lyricsto sopranos {
                    \chorusWords
                    \verseFourBWords
                }
            }

%        \new Lyrics \lyricsto "v3alt" \verseThreeAlternateWords
% See note within verseThreeMusic regarding alternate lyric
    >>
    
    }
} % score