\header {
  title = "I Heard the Bells on Christmas Day"
  subtitle = "(set to J S Bach's `Sheep May Safely Graze')"
  subsubtitle = "---"
  poet = "H W Longfellow"
  composer = "J S Bach"
  arranger = "Adapted by C R Gibbons"
  tagline = "Typeset using GNU LilyPond-\LilyPondVersion"
}

melody = \notes \relative c' {
  \clef "G_8"
  \key bes \major
  \property Staff.TimeSignature \override #'style = #'() \time 4/4

  r1 | r1 |
  \break
  r1 | r1 |
  \break

  % bar 5
  % first and second verses
  \repeat "volta" 2 {
    bes4 d8 c c4. d8 |
    ees4 g8 () f d4 c8 () bes |
    \break
    d () bes a () g c4. d8 |
    a4 () g8 f f2 |
    \break
    f4 aes8 g g4. a8 |
    bes4 d8 () c a4 g8 () f |
    \break
    f'4 g8 () f f () d c () bes |
    f'4 g8 () f f ( d c ) bes |
    \break
    ees4. f8 d ( c ) bes c |
  }
  \alternative {
    {
      \time 2/4 a4. bes8 |
      \break
      \time 4/4 bes2 r2 | r1 |
      \break
      r1 | r1 |
      \break
    }
    {
      a4. bes8 bes2 |
    }
  }

  r2 g'8 ( ees ) d c |
  f4. g8 d4 () c8 bes |
  \break
  bes2 r2 |
  r1 |
  \break
  r1 | r1 |
  \break

  % third verse - the angst starts here
  d4 g4 fis4. g8 |
  ees4 d4 bes4 a8 () g |
  c4 d8 () b c4. d8 |
  \break
  ees4 f8 () d ees4 g8 () f |
  g4 aes b, c8 () d |
  \time 2/4 ees4 d8 () c |
  \break
  \time 4/4 c2 r2 | r1 |
  \break
  r1 | r1 |
  \break

  % fourth verse
  g4 bes8 a bes4. d8 |
  c4 () bes8  a16 () bes a4 g8 () f |
  f'4 () e8 d8 d4. f8 |
  \break
  e8 ( f16 g16 ) e8 d cis4 b8 () a |
  c2. () bes8 c16 () a |
  bes2 ( ~ bes8 ) a a4 |
  \break
  ees'2. () d8 f16 () e |
  f2 ( ~ f8 e ) d e |
  \break
  e4 () d8 c bes4 a8 bes16 () g |
  \time 2/4 c16 ( bes a ) bes c ( bes c ) d
  \time 4/4 a4 () g8 f f4 r4 |
  \break

  % fifth verse - same meoldy as the second verse
  bes4 d8 c c4. d8 |
  ees4 g8 () f d4 c8 () bes |
  d () bes a () g c4. d8 |
  \break
  a4 () g8 f f2 |
  f4 aes8 g g4. a8 |
  bes4 d8 () c a4 g8 () f |
  \break
  f'4 g8 () f f () d c () bes |
  f'4 g8 () f f ( d c ) bes |
  \break
  ees4. f8 d ( c ) bes c |
  a4. bes8 bes2 |
  \break
  r2 g'8 ( ees ) d c |
  f4. g8 d4 () c8 bes |
  \break
  bes2 r2 | r1 |
  \break
  r1 | r1 |
  r1 |

  \bar "|."
}

text = \lyrics {
  % bar 5
  % first and second verses
  \repeat "fold" 2 {}
  \alternative {
    {
      I heard the bells on | Christ -- mas day Their |
      old fa -- mil -- iar | car -- ols play, |
      And mild and sweet the | words re -- peat, Of |
      peace on earth, good | -- will to men. |
      Peace on earth, good | \time 2/4 -- will to | \time 4/4 men. |
    }
    {
      I thought how as the | day had come, The |
      bel -- freis of all | Christ -- en -- dom |
      Had roll'd a -- long th'un | -- bro -- ken song Of |
      peace on earth, good -- | will to men. |
      Peace on earth, good -- | " " " " | " " |
      will to men.
    }
  }
  Peace on | earth, good -- will to | men. |

  % third verse - the angst starts here
  In de -- spair I | bow'd my head; ``There |
  is no peace on | earth,'' I said. ``For |
  hate is srong, and | mocks the | song.''

  % fourth verse
  Then peal'd the bells more | loud and deep: ``God |
  is not dead, nor | doth he sleep; The |
  wrong shall | fail, the |
  right pre -- | vail with |
  Peace on earth, peace on | earth good -- | will to men.''

  % fifth verse - same meoldy as the second verse
  'Til ring -- ing, sing -- ing | on its way, The |
  world re -- volved from | night to day. |
  A voice, a chime, a | chant sub -- lime Of |
  peace on earth, good -- | will to men. |
  Peace on earth, good -- | will to men.
  Peace on | earth, good -- will to | men.
}

pianoTrebleA = \notes \relative c' {
  \clef "G"
  \key bes \major
  \property Staff.TimeSignature \override #'style = #'() \time 4/4

  <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
    <d8 f> <ees g> <ees g> <g bes> |
  <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
    <c8 ees> <ees a> <c a'> <ees c'> |
  \stemUp bes'8. c32 d bes16 d c f,
    bes8. c32 d bes16 d c a |
  bes8 d32 ees f16 d bes c a
    bes8 d32 ees f16 d bes c a |

  % bar 5
  % first and second verses
  \repeat "volta" 2 {
    \stemBoth
    \property Staff.noAutoBeaming = ##t <d,8 bes'>
      \property Staff.noAutoBeaming = ##f bes <f bes> <f a>
      <ees g> <ees g> <f a> <f bes> |
    <f c'> <f c'> <ees c'> <ees c'> <f bes> <f bes> <d bes'> <d bes'> |
    <g bes> <g bes> <f bes> <f bes> <e g> <e g> <f a> <g bes> |
    <f a> <f a> <e g bes> <e g bes> <f a c> <f a c> <f a c> <f a c> |
    <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
      <d8 f> <ees g> <ees g> <g bes> |
    <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
      <c8 ees> <ees a> <c a'> <ees c'> |
    \stemUp r8 bes'32 c d16 bes d c a bes8 r8 r4 |
    r8 bes32 c d16 bes d c a bes8 r8 r4 |
    \stemBoth <bes,,8 g'> <bes g'> <a f'> <c f a>
      <d f bes> <ees a> <f bes> <g c> |
  }
  \alternative {
    {
      \time 2/4 <f a c> <f a c> <f a c> <f bes d> |
      \time 4/4 <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
        <d8 f> <ees g> <ees g> <g bes> |
      <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
        <c8 ees> <ees a> <c a'> <ees c'> |
      \stemUp bes'8. c32 d bes16 d c f,
        bes8. c32 d bes16 d c a |
      bes8 d32 ees f16 d bes c a
        bes8 d32 ees f16 d bes c a |
    }
    {
      <f8 a c> <f a c> <f a c> <f bes d>
        <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d> |
    }
  }
  <d'8 f> <ees g> <ees g> <g bes>
    <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c> |
  <c8 a'> <d bes'> <d bes'> <ees c'>
    \stemUp r8 d'32 ees f16 d bes f a |
  \stemBoth <d,8 bes'> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
    <d8 f> <ees g> <ees g> <g bes> |
  <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
    <c8 ees> <ees a> <c a'> <ees c'> |
  \stemUp bes'8. c32 d bes16 d c f,
    bes8. c32 d bes16 d c a |
  bes8 d32 ees f16 d bes c a
    bes8 d32 ees f16 d bes c a |

  % third verse - the angst starts here
  \stemBoth <d,8 bes'> <bes d> <g d'> <g d'>
    <a c d> <a c d> <d, a'> <d g bes> |
  <g a> <g a> <fis a> <fis a> <g bes> <g bes> <g b> <g b d> |
  <g c> <g c> <g b> <g d'> <g c> <g c> <g d'> <g d'> |
  <g c ees> <g c ees> <aes d> <aes d f> <g c ees> <g c ees> <b g'> <b f'> |
  <c ees g> <c g'> <aes c f> <aes c f> <g b d> <d g b> <c g'> <aes c f> |
  \time 2/4 <c ees g> <c ees g> <d f b> <f b> |
  \time 4/4 <ees' g> <ees16 g> <c ees> <ees8 g> <ees16 g> <c ees>
    <ees8 g> <f aes> <f aes> <aes c> |
  <d, f> <d16 f> <b d> <d8 f> <d16 f> <b d>
    <d8 f> <f b> <d b'> <f d'> |
  \stemUp c'8. d32 ees c16 ees d g, c8. d32 ees c16 ees d g, |
  c8 ees32 f g16 ees c d g, c8 ees32 f g16 ees c d b |

  \stemBoth \property Staff.noAutoBeaming = ##t <ees,8 c'>
    \property Staff.noAutoBeaming = ##f <ees, g c> <ees g c> <ees g c>
    <d f bes> <d f bes> <d f bes> <d f bes> |
  <c g' bes> <c g' bes> <c g' bes> <c g' bes>
    <c f a> <c f a> <cis f a> <cis f a> |
  <f'8 a> <f16 a> <d f> <f8 a> <f16 a> <d f>
    <f8 a> <g bes> <g bes> <bes d> |
  <bes, g'> <bes16 g'> e <bes8 g'> <bes16 g'> e
    <e8 g> <g cis> <e cis'> <g e> |
  <ees a> <ees16 a> <c fis> <ees8 a> <ees16 a> <c fis>
    <fis8 a> <g bes> <g bes> <bes d> |
  <g c> <e16 g> <c e> <e8 g> <e16 g> <c e>
    <e8 g> <f a> <f a> <a c> |
  <a c> <a16 c> <f a> <a8 c> <a16 c> <f a>
    <a8 c> <bes d> <bes d> <bes d> |
  <b d> <b16 d> <g b> <b8 d> <b16 d> <g b>
    <d8 g> <c e> <c e> <e g> |
  <e g> <e16 g> <c e> <e8 g> <e16 g> <c e>
    <e8 bes'> <c g> <bes e> <g e'> |
  \time 2/4 <f4 c'> <d f> |
  \time 4/4 <f a> <bes, e g> <a8 c f> <c f a> <c f a> <ees f a c> |

  <d f bes> <d f bes> <d f bes> <f a> <c ees g> <c ees g> <c f a> <d f bes> |
  <ees f c'> <ees f c'> <ees f c'> <ees f c'>
    <d f bes> <d f bes> <d f bes> <d f bes> |
  <d g bes> <d g bes> <d g bes> <d g bes>
    <c e g> <c e g> <c f> <d g bes> |
  <c f a> <f a c> <e g bes> <e g bes>
    <c f a> <c f a> <f a c> <f a c> |
  <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
    <d8 f> <ees g> <ees g> <g bes> |
  <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
    <c8 ees> <ees a> <c a'> <ees c'> |
  \stemUp r8 bes'32 c d16 bes d c a bes8 r8 r4 |
  r8 bes32 c d16 bes d c a bes8 r8 r4 |
  \stemBoth <bes,,8 g'> <bes g'> <a f'> <c f a>
    <d f bes> <ees a> <f bes> <g c> |
  <f8 a c> <f a c> <f a c> <f bes d>
    <d'8 f> <d16 f> <bes d> <d8 f> <d16 f> <bes d> |
  <d8 f> <ees g> <ees g> <g bes>
    <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c> |
  <c8 a'> <d bes'> <d bes'> <ees c'>
    \stemUp r8 d'32 ees f16 d bes f a |
  \stemBoth <d,8 bes'> <d16 f> <bes d> <d8 f> <d16 f> <bes d>
    <d8 f> <ees g> <ees g> <g bes> |
  <c, ees> <c16 ees> <a c> <c8 ees> <c16 ees> <a c>
    <c8 ees> <ees a> <c a'> <ees c'> |
  \stemUp bes'8. c32 d bes16 d c f,
    bes8. c32 d bes16 d c a |
  bes8 d32 ees f16 d bes c a
    bes8 d32 ees f16 d bes c a |
  <f1 bes> |

  \bar "|."
}

pianoTrebleB = \notes \relative c' {
  \clef "G"
  \key bes \major
  \property Staff.TimeSignature \override #'style = #'() \time 4/4

  s1 | s1 |
  \stemDown d'4 d8 ees d4 d8 ees16 f |
  g4 f8 f ees4 f8 ees |

  % bar 5
  % first and second verses
  \repeat "volta" 2 {
    s1 | s1 | s1 | s1 |
    s1 | s1 |
    s8 d8 d ees d s8 s4 |
    s8 d8 d ees d s8 s4 |
    s1 |
  }
  \alternative {
    {
      \time 2/4 s2 |
      \time 4/4 s1 | s1 |
      \stemDown d4 d8 ees d4 d8 ees16 f |
      g4 f8 f ees4 f8 ees |
    }
    {
      s1 |
    }
  }
  s1 | s2 s8 bes'8 bes ees, | s1 | s1 |
  \stemDown d4 d8 ees d4 d8 ees16 f |
  g4 f8 f ees4 f8 ees |

  % third verse - the angst starts here
  s1 | s1 | s1 | s1 | s1 |
  \time 2/4 s2 |
  \time 4/4 s1 | s1 |
  \stemDown ees4 ees16 g f d ees4 ees16 g f d |
  ees8 c'8 c16 ees, f g ees8 c'8 c16 ees, f d |

  s1 | s1 | s1 | s1 | s1 | s1 | s1 | s1 |
  s1 | \time 2/4 s2 | \time 4/4 s1 |

  s1 | s1 | s1 | s1 | s1 | s1 |
  s8 d8 d ees d s8 s4 |
  s8 d8 d ees d s8 s4 |
  s1 | s1 | s1 | s2 s8 bes'8 bes ees, | s1 | s1 |
  \stemDown d4 d8 ees d4 d8 ees16 f |
  g4 f8 f ees4 f8 ees |
  d1 |

  \bar "|."
}

pianoBass = \notes \relative c' {
  \clef "F"
  \key bes \major
  \property Staff.TimeSignature \override #'style = #'() \time 4/4

  \property Staff.noAutoBeaming = ##t <bes,4 bes'>
    \clef "G"
    \property Staff.noAutoBeaming = ##f <bes' f'>
    <bes g'> <bes g'> |
  <bes ees> <bes ees>
    <bes a'> <bes a'> |
  \property Staff.noAutoBeaming = ##t <bes8 bes'>
    \clef "F"
    \property Staff.noAutoBeaming = ##f bes bes <a c>
    <g d'> <g d'> <f bes> <f c'> |
  <ees d'> <ees d'> <f d'> <f c'>
    <g d'> f16 ees f8 f, |

  % bar 5
  % first and second verses
  \repeat "volta" 2 {
    bes4 bes bes bes |
    a a bes bes |
    bes bes bes a8 bes |
    c4 c f ees |
    <d bes'> <bes aes'> <ees bes'> <d bes'> |
    <c g'> <c bes'> <f c'> <ees c'> |
    <d8 bes'> <d bes'> <ees bes'> <ees bes'>
      <bes bes'> <bes bes'> <c a'> <c a'> |
    <d8 bes'> <d bes'> <ees bes'> <ees bes'>
      <bes bes'> <bes bes'> <d a'> <d bes'> |
    c4 f bes,8 c d ees |
  }
  \alternative {
    {
      \time 2/4 f4 f,4 |
      \time 4/4 bes <bes f'> <bes g'> <bes g'> |
      <bes a'> <bes a'> <bes a'> <bes a'> |
      <bes8 bes'> bes' bes <a c>
        <g d'> <g d'> <f bes> <f c'> |
      <ees d'> <ees d'> <f d'> <f c'>
        <g d'> f16 ees f8 f, |
    }
    {
      f4 f,4 bes <bes f'> |
    }
  }
  <bes g'> <bes g'> <bes g'> <bes f'> |
  <bes8 f'> <bes8 f'> <ees bes'> <ees bes'> <f d'> f <f, f'> <f' a> |
  <bes,4 bes'> <bes f'> <bes g'> <bes g'> |
  <bes a'> <bes a'> <bes a'> <bes a'> |
  <bes8 bes'> bes' bes <a c>
    <g d'> <g d'> <f bes> <f c'> |
  <ees d'> <ees d'> <f d'> <f c'>
    <g d'> f16 ees f8 f, |

  % third verse - the angst starts here
  bes4 bes'4 a bes |
  c d g, f |
  ees d ees b |
  c b c d |
  ees f f ees8 f |
  \time 2/4 g4 g,4 |
  \time 4/4 c <c g'> <c aes'> <c aes'> |
  <d aes'> <d aes'> <d aes'> <d aes'> |
  <c8 g'> <c g'> <bes g'> <bes g'> <aes aes'> <aes aes'> <g g'> <g g'> |
  <f f'> <f f'> <g g'> <g g'> <aes ees'> <f f'> <g g'> <g d' g> |

  <c4 g'> c d d |
  e e f e |
  <d a'> <c a'> <bes f'> <a f'> |
  <g d'> <g d'> <a e'> <g e'> |
  <fis ees'> <d d'> g <f d'> |
  <e c'> <c c'> <f c'> <f c'> |
  <f f'> <f f'> <bes f'> <bes bes'> |
  <g g'> <g g'> <c g'> <c c'> |
  <bes g'> <a f'> <g g'> <g g'> |
  \time 2/4 <a a'> <bes bes'> |
  \time 4/4 <c2 c'> c8 c f f, |

  bes4 bes bes bes |
  a a bes bes |
  bes bes bes a8 bes |
  c4 c f ees |
  <d bes'> <bes aes'> <ees bes'> <d bes'> |
  <c g'> <c bes'> <f c'> <ees c'> |
  <d8 bes'> <d bes'> <ees bes'> <ees bes'>
    <bes bes'> <bes bes'> <c a'> <c a'> |
  <d8 bes'> <d bes'> <ees bes'> <ees bes'>
    <bes bes'> <bes bes'> <d a'> <d bes'> |
  c4 f bes,8 c d ees |
  f4 f,4 bes <bes f'> |
  <bes g'> <bes g'> <bes g'> <bes f'> |
  <bes8 f'> <bes8 f'> <ees bes'> <ees bes'> <f d'> f <f, f'> <f' a> |
  <bes,4 bes'> <bes f'> <bes g'> <bes g'> |
  <bes a'> <bes a'> <bes a'> <bes a'> |
  <bes8 bes'> bes' bes <a c>
    <g d'> <g d'> <f bes> <f c'> |
  <ees d'> <ees d'> <f d'> <f c'>
    <g d'> f16 ees f8 f, |
  <bes1 bes'> |

  \bar "|."
}

\score {
  <
    \addlyrics
      \context Staff = melodyStaff {
        \property Staff.noAutoBeaming = ##t
        \property Staff.automaticMelismata = ##t
        \property Staff.midiInstrument = "bassoon"
        \melody
      }
      \context Lyrics \text
    \context PianoStaff <
      \context Staff = pianoTrebleStaff <
        \context Voice = pianoTrebleVoiceA { \pianoTrebleA }
        \context Voice = pianoTrebleVoiceB { \pianoTrebleB }
      >
      \context Staff = pianoBassStaff {
        \property Staff.VoltaBracket = \turnOff
        \pianoBass
      }
    >
  >

  \midi {\tempo 4=58}
  \paper { papersize="letter" }
}