% title: Broad Cove
% composer: William Billings
% editor: Michael Lauer

\version "2.12.2"

\include "english.ly"
\include "../mrlUtil.ly"
\include "../mrlbillingsdefs.ly"

#(define GlobalStaffSize 17.25)
#(set-global-staff-size GlobalStaffSize)

#(ly:set-option 'point-and-click #f)

\paper{
    top-margin = .5\in
    bottom-margin = .5\in
    ragged-last-bottom = ##f
    
    myStaffSize = #GlobalStaffSize
  #(define fonts
    (make-pango-font-tree "Baskerville1757"
                          "Sans"
                          "Mono"
                           (/ myStaffSize 20)))
}


global = {
  % main
  %\override Voice.TextScript #'staff-padding = #'1.2
  %\override Voice.TextScript #'font-shape = #'italic
  
  \override Staff.VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3)
  
  \set Staff.midiInstrument = "acoustic grand"
  
  \autoBeamOff

  \key g \minor

  \tsLargo
  s1*27
  %28
  \tsAllegro
  \repeat volta 2 {
      s1*9
  }
  s1
  %38
  \repeat volta 2 {
      s1*24
  } \alternative {
      { s1 } { s1 }
  }
  \bar "||"
  %64
  s1*8
  \repeat volta 2 {
      s1*4
  }
  %76
  s1*14
  %90
  \repeat volta 2 {
      \tsTwoFour
      % vivace
      s2*17
  }
  %107
  %gravisonos.
  \tsAdagio
  s1*11
  %118
  \tsThreeTwo
  \key g \major
  s1.
  \repeat volta 2
  {
      s1.*9
  } 
  \alternative { { s1. } { s1. } }
  \pageBreak    % this works out a little more nicely
  \key g \minor
  \tsAdagio
  s1*25
  \tsAllegro
  s1*8      % Deep called unto deep
  \repeat volta 2 {
      s1*8  % All thy waves
  }
  \tsThreeTwo 
  \key g \major
  s1.
  \repeat volta 2
  {
      s1.*9
  } 
  \alternative { { s1. } { s1. } }
  \pageBreak    % this works out a little more nicely
  s1.*17    % Hallelujah
  \tsAdagio
  s1*9
  \repeat volta 2 {
      \tsThreeTwo
      s1.*8
      \tsAdagio
      s1*9
  }
}

majorLyrics = \lyricmode
{
    Why \extSTB art thou cast down, O __ my soul? __ And why art thou 
        dis -- qui -- e -- \extT ted
    with -- in me?
    Hope thou in God __ for I shall yet praise him for the help of his 
    coun -- te -- nance. Why nance.
}

commonLyrics = \lyricmode {
    \extA As the hart pan -- \extST teth af -- ter the wa -- ter -- brooks
    \tagB { As the hart pan -- teth af -- ter the wa -- ter -- brooks }
    \tagB { As the hart pan -- teth af -- ter the wa -- ter -- brooks }
    So pan -- teth my __ soul af -- ter \extATB thee \extT O God,
    So pan -- teth \extSTB my soul af -- ter \extT thee O God.
    
    \tagB { My soul thir -- steth for __ the Lord, for the li -- ving,
        for the li -- ving God. __
        When shall I come and ap -- pear be -- fore God? __
        My soul thir -- steth for God, __ for God, __
        for the li -- ving God, for the li -- ving, for the li -- ving,
        for the li -- ving God. My God. 
    }
    
    \tagT { My soul thir -- steth for __ the Lord, for the li -- ving,
        for the li -- ving God.
        When shall I come and ap -- pear be -- fore God?
        for the li -- ving, for the li -- ving God,
        for the li -- ving, for the li -- ving God. God.
    }

    \tagA { My soul thir -- steth for __ the Lord, for the li -- ving God.
        When shall I come and ap -- pear be -- fore God? __ God? __
        for the li -- ving God, for the li -- ving God. God.
    }    
    
    \tagS { My soul thir -- steth for __ the Lord, for the li -- ving,
        for the li -- ving, for the li -- ving God.
        for the li -- ving, for the li -- ving,
        for the li -- ving, for the li -- ving,
        for the li -- ving God. God.
    }

    \tagSAT { My tears have been my meat }
    day and night
    while they say un -- to me, Where is \extST now thy God?

    \tagAB { When I re -- mem -- ber these things __ }
    \tagSB { I pour out my soul in me }
    \extT for I had gone with the mul -- ti -- tude,
    \extAT for I had gone with the mul -- ti -- tiude;
    I went with them in -- to the house \extT of God
    with the voice of joy and praise.
    With a mul -- ti -- tude that keep ho -- ly day,
    \tagSB { with a  __ mul -- ti -- tude that keep ho -- ly day. }
    
    \majorLyrics
    
    \tagT { O my __ God, my __ soul __ is __ cast down with -- in me. }
    \tagB { There -- fore will I re -- mem -- ber thee and from
        the land of Jor -- dan. }
    \tagS { O my God, my soul is cast down with -- in me. }
    \tagB { There -- fore will I re -- mem -- ber thee and from
        the land of Jor -- dan. }
    \tagA { And __ from the land of Jor -- dan. }
    \tagSTB { And from the hill of Mi -- zar. }
    
    \tagATB { Deep cal -- led  un -- to \extA deep. }
    \tagST { All thy waves and thy bil -- lows are gone o -- ver me, }
    All thy waves and thy bil -- lows are gone o -- ver me.

    \majorLyrics
    
    \tagSAB { Hal -- le -- lu -- jah Hal -- le -- lu -- jah
        A -- men Hal -- le -- lu -- jah A -- men A -- men. 
        A -- men A -- men.
        Hal -- le -- lu -- jah A -- men. 
    }
    \tagT { Hal -- le -- lu -- jah Hal -- le -- lu -- jah Hal -- le -- lu -- jah
        Hal -- le -- lu -- jah Hal -- le -- lu -- jah Hal -- le -- lu -- jah
        Hal -- le -- lu -- jah Hal -- le -- lu -- jah Hal -- le -- lu -- jah. }
        
    % adagio
    \tagS { \repeat unfold 7 { A -- men } }
    \tagAB { \repeat unfold 5 { A -- men } Hal -- le -- lu -- jah }
    \tagT { Hal -- le -- lu -- jah Hal -- le -- lu -- jah A -- men A -- men
            Hal -- le -- lu -- jah }
            
    %3/2
    \tagS { Hal -- le -- lu -- jah }
    Hal -- le -- lu -- jah
    \tagSAB { Hal -- le -- lu -- jah A -- men }
    \tagT { Hal -- le -- lu -- jah }
    
    %adadgio
    \tagSAB { A -- men A -- men }
    \tagT { Hal -- le -- lu -- jah A -- men }
    A -- men Hal -- le -- lu -- jah Hal -- le -- lu -- jah.
}

majorNotesS = {   
        r2 r2 \tag #'firstTime { d'2 } 
              \tag #'secondTime { d'2^\markup { "(Vigoroso)" } } |
        \repeat volta 2
        {
            b4( a) g g a2 |
            a4( b) c2 a~ |
            a4 a b a b b |
            b4 b b2. a4 |
            a2 a r2 |
            b2 b4 b c2~ |
            c4 b c d e d |
            d2 d4 e fs2 |
            g4 d e2 d2 |
        } \alternative {
            { d1 d2 | }
            { d1. | }
        }
}

sopranoNotes = {
    \relative d'' {
        \set Staff.instrumentName = "Treble"
        \clef "treble"
        << { R1 } 
            { \once \override Rest #'transparent = ##t r1
            ^\markup { "(Affetuoso)" } } >> |
            R1*3 |
        %5
            R1*5 |
        %10
            R1*3 |
            d2 d |
            bf2 a |
        %15
            bf4( c) d2 |
            f2 ef |
            d2( c) |
            bf2 a |
            R1 |
        %20
            R1*5 |
        %25
            R1*3 |
            \repeat volta 2 {
                r2 bf2 |
                bf4 bf a( g)
        %30
                a2 bf4 bf |
                c2 c |
                d2 d |
                bf4 c d( c) |
                bf2 bf4 d |
        %35
                ef2 d |
                d1 |
            } 
            r1
            \repeat volta 2 {
                R1 |
                R1 |
        %40
                R1*5 |
        %45
                R1*4 |
                g,2^\markup { Quarta. } d' |
        %50
                g2 f |
                g4( f) ef2 |
                d1 |
                g4 g f f |
                g4 g d d |
        %55
                g,4 a bf c |
                d1 |
                d4 d f f |
                g4 g d d |
                d4 d f f |
        %60
                g4 g f f |
                bf,4 c d d |
            } \alternative {
                { g,2 r2 }
                { g1 }
            }
            r2 d2 |
        %65
            g4 a bf c |
            d2 r2 |
            R1*3 |
        %70
            r2 d4 g |
            f1 |
            \repeat volta 2 {
                bf,4 bf d2 |
                d4 c d2 |
                bf4 bf a( g) |
        %75
                f2 g2
            }
            R1*10
        %86
            d'2 bf |
            a2 g |
            f2 g |
            a1 |
        %90
        \repeat volta 2 {
            r4^\markup { (Vivace) } g4 |
            d'4 c |
            bf4 a8 a |
            bf4 bf |
            bf4 a |
            g4 f |
            g4 f8 g |
            a4 a |
            a4 c |
            a4 bf |
            a4 a |
            d4 ef |
            d8([ c]) bf4 |
            a4 bf8 c |
            d4 c |
            bf4 a |
            g2
        }
        %117
            r2 d'2 |
            bf2 a |
            bf2 c |
            bf2 <c a> |
            <d g,>2 <d f,> |
            <d g,>1 |
        %123
            d2 bf4( d) |
            c2 d4( f) |
            ef4( d) c bf |
            a4( g) f2 |
            g1 |
        %118  Why are thou cast down
        \keepWithTag #'firstTime \majorNotesS
        %129
            R1*8 |
        %137
            r2 a2 |
            bf2 c |
            d2 f |
            d2 c |
            d2 c |
            bf2 a |
        %143
            R1*7
        %150
            d2 d |
            g,2 bf |
            a2 f |
            g1 |
        %154    Deep called unto deep
            R1*8
        %162    All thy waves
        \repeat volta 2
        {
            d'4 d d2 |
            c4 bf ef d |
            c4 bf c bf |
            a1 |
            d4 d g,2 |
            bf4 c d bf |
            c4 a bf a |
            g1
        }
        %170   
        \keepWithTag #'secondTime \majorNotesS
        
            R1. |
            r2 r2 d2 b1 c2 |
            a2 a b |
            b2 b1 |
            r2 d2 <d b> |
            b2 b e |
            e2 g d |
            e2 d1 |
            R1. |
            R1. |
            d2 d d |
            d2 r2 r2 |
            <d b>1. |
            <d b>1. |
            <d b>1. |
            <d a>2 <d b g> <d b g> |
        %adagio
            r2 b2 |
            b1 |
            b1 |
            c2 c |
            d2 c |
            d2 e |
            e2 e |
            d2 d |
            <d b>1 |
            
        \repeat volta 2 {
            \tsThreeTwo
            r2 r2 d4.( c8 |
            b4) g a4( b) c2 |
            d2 d <d b> |
            <d b> r2 r2 |
            <d b>1. |
            <d b>1. |
            <d b>1. |
            <d a>2 <d b g> <d b g> |
            %adagio
            r2 b2 |
            b1 |
            b1 |
            c2 c |
            d2 c |
            d2 e |
            e2 e |
            d2 d |
            <d b>1 |
        }
                
    }
}

sopranoLyrics = \lyricmode {
    \keepWithTag #'soprano \commonLyrics
}

majorNotesA = {
            r2 r2 d2 | 
        \repeat volta 2
        {
            d2 g4 g fs2 |
            e4( d) e2 d2~ |
            d4 d g a g g |
            g4 g g2. fs4 |
            fs2 fs r2 |
            g2 g4 g g2~ |
            g4 g g g a g |
            fs2 g4 g <a fs>2 |
            g4 g g2 fs2 |
        } \alternative {
            { g1 d2 }
            { g1. }
        }
}

altoNotes = {
    \relative d' {
        \set Staff.instrumentName = \markup "Counter"
        \clef "treble"
        % Original clef:
        %\clef "neomensural-c3"
            R1*19 |
        %20
            R1*2 |
            d4( ef) f2 |
            g2 f |
            d2 c |
        %25
            bf2 c |
            d2 g |
            f1 |
            \repeat volta 2 {
                r2 g2 |
                g4 g a( g) |
        %30
                f2 d4 d |
                g4( f) g2 |
                f2 f |
                g4 f f2 |
                g2 g4 d |
        %35
                g2 f |
                g1 |
            }
            R1 |
            \repeat volta 2 {
                R1*2 |
        %40
                R1*5 |
        %45
                g,2^\markup { Trio } d' |
                g2 f |
                g4( f) ef2 |
                d1 |
                d4 d g g |
        %50
                d1 |
                g1 |
                f1 |
                d2 d4 d |
                d4 d g g |
        %55
                d2( d4 ef |
                f1) |
                d1( |
                g1) |
                d4 d d d |
        %60
                d1 |
                f4 f d d |
            } \alternative {
                { d2 r2 }
                { d1 }
            }
            R1
        %65
            R1 |
            r2 d2 |
            bf4 c d ef |
            f2 r2 |
            R1 |
        %70
            r2 d4 d |
            d1 |
            \repeat volta 2 {
                g4 g d2 |
                f4 f f2 |
                g4 d ef2 |
        %75
                d2 d |
            }
            R1*4
        %80
            r2 d2 |
            d4 d g2 |
            g4 f ef( d |
            g4 f ef d |
            ef d c bf |
        %85
            c bf a g |
            d'1) |
            R1*3 |
        %90
        \repeat volta 2 {
            r4 d4 |
            d4 d |
            d4 f8 f |
            f4 f |
            f4 f8([ ef]) |
            d4 d |
            d4 f8 f |
            d4 d |
            d4 ef |
            f4 g |
            f4 f |
            g4 g |
            f4 g |
            f4 f8 f |
            g4 d |
            d4 d |
            d2 |
        }
        %107
            r2 d2 |
            d2 f |
            f2 ef |
            f2 f |
            d2 f |
            g1 |
        %113
            R1*5 |
        %118
        \majorNotesA
        %129
            R1*19
            d4( f f d |
            d4 g, d' f |
        %150
            g2) f |
            ef2 d |
            ef2 d |
            d1 |
        %154    Deep called unto deep
            R1*4
            r2 d2
            g4 d ef d |
            c4( bf a g |
            a bf c d) |
        %162
        \repeat volta 2 {
            R1*4 |
            f4 f d2 |
            d4 f f f |
            ef4 ef d d |
            d1 |
        }
        \majorNotesA
        
            R1. |
            r2 r2 d2 |
            g1 e2 |
            fs2 fs g |
            g2 g1 |
            r2 fs2 g |
            g2 g e |
            a2 d, g |
            e2 fs1 |
            R1. |
            R1. |
            g2 fs g |
            g2 r2 r2 |
            <g d>1. |
            <g d>1. |
            <g d>1. |
            <fs d>2 <g d> <g d> |
        %adagio
            r2 g2 |
            g1 |
            d1 |
            a'2 a |
            a2 g |
            g2 e |
            g2 g |
            g2 fs |
            g1 |
            
        \repeat volta 2 {
            R1. |
            R1. |
            g2 fs g |
            g2 r2 r2 |
            <g d>1. |
            <g d>1. |
            <g d>1. |
            <fs d>2 <g d> <g d> |
            %adagio
            r2 g2 |
            g1 |
            d1 |
            a'2 a |
            a2 g |
            g2 e |
            g2 g |
            g2 fs |
            g1 |
        }
    }
}

altoLyrics = \lyricmode {
    \keepWithTag #'alto \commonLyrics
}

majorNotesT = {
            r2 r2 g2 |
        \repeat volta 2
        {
            g4( a) b c d2 |
            e4( fs) g2 fs4( e |
            d4) d g fs e d |
            g4 d e2( d4) d |
            d2 d r2 |
            d2 d4 d4 e2~ |
            e4 d e d c b |
            a2 b4 c d2 |
            e4 d c( b) a2 |
        } \alternative {
            { g1 g2 | }
            { g1. | }
        }
}

tenorNotes = {
    \relative d' {
        \set Staff.instrumentName = "Tenor"
        \clef "treble_8"
            R1*4 |
        %5
            R1*2 |
            d2 d |
            bf c |
            d4( ef) f2 |
        %10
            ef2 d4( c) |
            bf2 c |
            d1 |
            R1*2 |
        %15
            R1*10 |
        %25
            R1*3
            \repeat volta 2 {
                r2 d2 |
                d4 d d( ef) |
        %30
                f2 g4 d |
                ef4( d) c( bf)
                a2 d |
                d4 c bf( c) |
                d2 ef4 d |
        %35
                c4( bf) a2 |
                g1 |
            }
            R1
            \repeat volta 2 {
                R1*2 |
        %40
                R1 |
                g2 d' |
                g2 f |
                g4( f) ef2 |
                d1 |
        %45
                g4 g f f |
                bf,4 c d d |
                g,1 |
                R1 |
                d'2 bf |
        %50
                g2 a |
                c2 bf |
                a1 |
                bf2 a |
                g1 |
        %55
                R1 |
                R1 |
                bf4 bf d d |
                d4 d g g |
                d1 |
        %60
                bf4 bf a a |
                d4 c bf a |
            } \alternative {
                { g2 r2 }
                { g1 }
            }
            R1 |
        %65
            R1*3 |
            f'2 d4 c |
            bf4 a g2 |
        %70
            r2 d'4 bf |
            a1 |
            \repeat volta 2 {
                d4 d g2 |
                f4 ef d2 |
                ef4 d c( bf) |
        %75
                a2 g |
            }
            R1*14 |
        %90
        \repeat volta 2 {
            r4 g8([ a]) |
            bf4 a |
            bf4 c8 c |
            d4 d |
            d4 d8([ c]) bf4 a |
            bf8([ c]) d ef |
            f4 f |
            f4 g |
            d4 ef8([ d]) |
            c4 d8([ c]) |
            bf4 c8([ bf]) |
            a4 bf8([ c]) |
            d4 d8 c|
            bf4 a |
            g4 f |
            g2 |
        }
        %107
            r2 g2 |
            bf2 c |
            d2 g |
            d2 c |
            bf2 a |
            g1 |
        %113
            R1*5 |
        %118
        \majorNotesT
        %129    O my God my soul
            r2 g4( a) |
            bf4( c) d2 |
            d4( ef) f( ef) |
            d4( c) bf2 |
            c2 d2 |
            bf2 g2 |
        %135
            R1*15
        %150
            bf2 a |
            c2 d |
            c2 a |
            g1 |
        %154    Deep called unto deep
            R1*2
            r2 d'2 |
            f4 ef d c |
            d1 |
            R1*3 |
        %162
        \repeat volta 2 {
            g,4 g bf2 |
            a4 g c bf |
            a4 g f g |
            d1 |
            a'4 a bf2 |
            d4 c bf d |
            g,4 c a f |
            g1 |
        }
        %170
        \majorNotesT
            
            r2 r2 d'4.( e8 |
            d4) e fs( d) g2 |
            g4( d g) fs e2 |
            d2 d4.( c8 b4) c |
            d2 e e4( g |
            d4) b c( a) g2 |
            d'4.( e8 d4) b c( d) |
            e2 e4( c d) b |
            c4( b) a1 |
            r2 r2 d4.( c8 |
            b4) g a( b) c2 |
            d4( b c) a g2 |
            g2 r2 r2 |
            d'2( g4 fs e d |
            g4 d e d c b |
            e4 b c b a g |
            d'4) d, g2 g2 |
        %adagio
            r2 d'2 |
            e2 d |
            g2 g |
            fs2 e |
            d2 e |
            d2 c |
            b2 c |
            b2 a |
            g1 |
            
        \repeat volta 2 {
            R1. |
            R1. |
            d'4( b c) a g2 |
            g2 r2 r2 |
            d'2( g4 fs e d |
            g4 d e d c b |
            e4 b c b a g | 
            d'4) d, g2 g |
            %adagio
            r2 d'2 |
            e2 d |
            g2 g |
            fs2 e |
            d2 e |
            d2 c |
            b2 c |
            b2 a |
            g1 |
        }
                
            
    }
}

tenorLyrics = \lyricmode {
    \keepWithTag #'tenor \commonLyrics
}

majorNotesB = {
            r2 r2 g'2 |
        \repeat volta 2
        {
            g4( fs) e e d2 |
            c4( b) c2 d~ |
            d4 d <e g,> <fs fs,> <g g,> <g g,> |
            <g g,>4 <g g,> <g g,>2. <a a,>4 |
            d,2 d r2 |
            <g g,>2 <g g,>4 <g g,> <e g,>2~ |
            <e g,>4 <g g,> <c c,> <b b,> <a a,> <g g,> |
            d2 g4 e d2 |
            <e g,>4 <b g> c2 d |
        } \alternative {
            { g,1 g'2 }
            { g,1. | }
        }
}

bassNotes = {
    \relative g {
        \set Staff.instrumentName = "Bass"
        \clef "bass"
            r2 <g g,>2 |
            <f f,>2 <g g,> |
            d2 g, |
            a2 bf |
        %5
            <f' a,>2 <bf bf,>( |
            <a a,>2) <g g,> |
            d1 |
            R1 |
            R1 |
        %10
            r2 d2 |
            <g g,>2 <f a,> |
            <bf bf,>2 <a a,> |
            <g g,>2 d |
            <g g,>2 <f a,> |
        %15
            <ef g,>2 d |
            R1 |
            R1 |
            r2 d2 |
            <g g,>2 <f a,> |
        %20
            bf,2 <f' a,> | 
            <bf g,>2 <a a,> |
            <g bf,>2 <f a,> |
            <ef g,>2 d |
            R1 |
        %25
            R1 |
            R1 |
            R1 |
            % allegro
            \repeat volta 2 {
                r2 <g g,> |
                <g g,>4 <g g,> <f f,>( <ef ef,>) |
        %30
                <d d,>2 <g g,>4 <g g,>4 |
                c,4( d) ef2 |
                d2 d2 |
                <g g,>4 <a a,> <bf bf,>( <a a,>) |
                <g g,>2 <g g,>4 <g g,>4 |
        %35
                c,2 d |
                g,1 |
            }
            r2 g2^\markup { Dux } |
            \repeat volta 2 {
                d'2 g |
                f2 g4( f) |
        %40
                ef2 d |
                <g g,>4 <g g,> d d |
                ef4 ef d d |
                <g g,>4( <f f,> <g g,> <a a,> |
                d,1 ) |
        %45
                <g g,>2 d |
                ef2 d |
                <g g,>4 <g g,> c, c |
                d2 g( |
                <g g,>1) |
        %50
                <g g,>2 d |
                c4( d ef2) |
                d2 d |
                g,2( d') |
                <g g,>2 <g g,>( |
        %55
                <g g,>4 <f f,> <g g,> <a a,> |
                d,1 ) |
                <g g,>4 <g g,> d d |
                <g g,>1 |
                <g g,>4 <g g,> d d |
        %60
                g,4 g d' d |
                bf4 <f' a,> <g g,> <d f,> |
            } \alternative {
                { g,2 g2 }
                { g1 }
            }
            R1 |
        %65
            R1*5 |
        %70
            r2 <g' g,>4 <g g,> |
            d1 |
            \repeat volta 2 {
                <g g,>4 <g g,> <g g,>2 |
                <bf bf,>4 <a a,> <bf bf,>2 |
                <g g,>4 <g g,> c,2 |
        %75
                d2 g,2 |
            }
            r2 d'2 |
            d4 d g2 |
            g4 f g( bf |
            a g f bf |
        %80
            f4 g d2) |
            R1*4 |
        %85
            R1 |
            d2 <g g,> |
            <f f,>2 <ef g,> |
            <d f,>2 g, |
            d'1 |
        %90
        \repeat volta 2 {
            r4 <g g,>4 |
            <g g,>4 <f f,> 4 |
            <g g,>4 <f f,>8 <f f,>8 |
            bf,4 bf |
            bf4 d |
            <g g,>4 d |
            <g g,>4 <f f,>8 <ef g,>8 |
            d4 d |
            d4 c |
            d4 <g g,> |
            <f f,>4 d |
            <g g,>4 d |
            d4 g, |
            d'4 <bf' bf,>8 <a a,>8 |
            <g g,>4 <f f,>4 |
            <g g,>4 d |
            g,2 |
        }
        %107
            r2 <g' g,>2 |
            <g g,>2 <f f,>2 |
            <d f,>2 c |
            bf2 <f' a,>2 |
            <g g,>2 d |
            g,1 |
        %113
            d'2 g4( d) |
            f2 d2 |
            c4( bf) a g |
            c2 d |
            g,1 |
        %118
        \majorNotesB
        %129
            R1 |
            R1 |
            r2 d'2~ |
            d2 <g g,> |
            <f a,>2 <bf bf, g> |
            <g g,>2 <g g,> |
            c,2 d |
            d2 bf |
            c2 d |
            <g g,>2 <f a,> |
            d1 |
        %140
            R1*2 |
            g2 d |
            ef2 d |
            c2 bf |
            c2 d |
            <g g,>2 <f f,> |
            <bf bf,>2 <a a,> |
            <g g,>2 d |
            <g g,>1 |
        %150
            <g g,>2 d |
            c2 bf |
            c2 d |
            g1 |
        %154        Deep called unto deep
            r2 d2 |
            d4 d g ef |
            d1 |
            R1*5 |
        %162        All thy waves
        \repeat volta 2 
        {
            R1*4 |
            d4 d <g g,>2 |
            <g g,>4 <f a,>4 bf, bf |
            c4 c d d |
            g,1 |
        }
        %170
        \majorNotesB
            
            R1. |
            r2 r2 <g' g,>2 |
            <g g,>1 <a a,>2 |
            d,2 d <g g,>2 |
            <g g,>2 <e g,>1 |
            r2 d2 g, |
            <g' g,>2 <g g,> <a a,> |
            <a a,>2 <g g,> <g g,> |
            <a a,>2 d,1 |
            R1. |
            R1. |
            <g g,>2 d g, |
            g2 r2 r2 |
            <g' g,>1. |
            <g g,>1. |
            <g g,>1. |
            d2 g, g |
        %adagio
            r2 <g' g,>2 |
            <g g,>1 |
            <g g,>1 |
            <a a,>2 <a a,> |
            d,2 <c' c,> |
            <b b,>2 <a a,> |
            <g g,>2 <e g,> |
            <g g,>2 <d d,> |
            g,1 |
     
        \repeat volta 2 {
            R1. |
            R1. |
            <g' g,>2 d g, |
            g2 r2 r2 |
            <g' g,>1. |
            <g g,>1. |
            <g g,>1. |
            d2 g, g |
            %adagio
            r2 <g' g,>2 |
            <g g,>1 |
            <g g,>1 |
            <a a,>2 <a a,> |
            d,2 <c' c,> |
            <b b,>2 <a a,> |
            <g g,>2 <e g,> |
            <g g,>2 <d d,> |
            g,1 |
        }
            
    }
}

bassLyrics = \lyricmode {
    \keepWithTag #'bass \commonLyrics
}

#(define engravedLine (string-append 
    "Engraved by LilyPond (version "
    (lilypond-version)
    ")" ))
 
\header {
	composer = \markup { \larger { \basCaps "William Billings" (1746–1800) }}
    opus = \markup { \larger {\italic 
        { The New England Psalm-Singer } (1770) }}
    title = \markup { \larger \medium \italic "As the Hart Panteth" }
    poet = \markup { \larger "“An Anthem. Psalm 42”" }
    %piece = ""
    copyright = \markup { \center-column {
        "Edition copyright © 2010 by Michael Lauer."
        "This edition may be freely distributed, duplicated, performed, or recorded." } }
        tagline = \markup {
            \override  #'(baseline-skip . 2.5)
            \left-column {
            \line { "mm. 152–154: counter lyrics" \italic "sic." } 
            \fill-line { \engravedLine "" } } } 
    
    headerMarkup = \markup { "Billings:" \italic "As the Hart Panteth" } 

}
            
allWords = \markup { \fontsize #1
    \fill-line {
         
        \line { \hspace #3 "2."
            \column \addBLigsList
            {
            }
        }
         
    }
}

theMusic = 
  \context ChoirStaff = choir <<
      \new Staff {
        \context Voice =
          sopranoNotes << \global \sopranoNotes >>
      }
      \lyricsto sopranoNotes \new Lyrics { \sopranoLyrics }
      \new Staff {
        \context Voice =
          altoNotes << \global \altoNotes >>
      }
      \lyricsto altoNotes \new Lyrics { \altoLyrics }
      \new Staff {
        \context Voice =
          tenorNotes << \global \tenorNotes >>
      }
      \lyricsto tenorNotes \new Lyrics { \tenorLyrics }
      \new Staff {
        \context Voice =
          bassNotes << \global \bassNotes >>
      }
      \lyricsto bassNotes \new Lyrics { \bassLyrics }
  >>
  
  
\score {
    \theMusic
    
    \layout 
    {
        \context {
          \Voice
          \override TextScript #'staff-padding = #'1.2
          \override TextScript #'font-shape = #'italic
          \override TextScript #'font-size = #1
        }
        \context {
            \Staff
            %{
            \consists Custos_engraver
            \override Custos #'style = #'mensural
              \override Custos #'stencil = #(lambda (grob)
                  (interpret-markup
                       (ly:grob-layout grob)
                       '(())
                       (markup #:musicglyph "custodes.mensural.u0" )))
              \override Custos #'X-offset = #-3.2
              \override Custos #'extra-offset = #'(1.2 . 0.0)
              \override Custos #'space-alist = #'((right-edge minimum-distance . 0 ))
              %}
        }
    }
}

%\allWords

\score {
    
    \unfoldRepeats \theMusic
  
    \midi {    }


}
