First of all, please allow me to apologize for writing such a long
email.  I find that feature request is best accompanied with examples in
which where the features are needed.  That is why I put both bug report
and feature request into the same email.  If this is not appropriate,
please suggest an alternative.

I have attached the two .ly files that cause core dumps in 1.3.41 and
1.3.42.  The output of 1.3.40 and 1.3.43 has a number of problems.  I
process them with this command:

ly2dvi -P H*.ly

This produces a PS file called HaveMercyOnMe_OGod_1.ps with 9 pages.

1) Page 3, bar 20.  The hairpins and \p in Alto and Tenor goes below the
staves even though I have specified Voice.dynamicDirection = \up.  Those
two staves have a second voice in them, while Soprano and Bass do not. 
I wonder if the second voice is causing the problem.

2) Page 3, bar 19.  The spacing of the word "Tempo I" from the top of
each staff seems different, yet they have the same value for
Voice.textScriptPadding.

3) Page 6, bar 20.  The hairpin in the Bass clashes with the tuplet
number.  By the way, are tuplet brackets supported?  I have never seen
them.

4) Page 9, bar 46.  The \f in the Bass cannot be specified a height so
that it won't clash with the upper G.  You can see in the source that I
have specified a very large value for Voice.textScriptPadding in
attempting to push the \f upward.

5) Processing HaveMercoOnMe_OGod_2.ly produces the following warning:

HaveMercyOnMe_OGod_2.ly:657:53: warning: no one to print a tuplet start
bracket:
    _4 _8. A16 -- wake,2. __ harp8 and lyre! _ \times
                                                      2/3 {I8 will8 a8}
--

I want to enter the lyrics matching the triplet rhythm in the voice. 
Also, the duration "8" in the tuplet is not carried over, that is why I
have input an explicit "8" for each syllable.  Am I doing it right?

7) This problem is about version 41-43.  I am building an RPM and I get
the following error:

make[1]: Leaving directory `/usr/src/redhat/BUILD/lilypond-1.3.43/scm'
+ mkdir -p /tmp/lilypond-install/usr/../etc/profile.d
+ cp buildscripts/out/lilypond-profile
/tmp/lilypond-install/usr/../etc/profile.d/lilypond.sh
+ cp buildscripts/out/lilypond-login
/tmp/lilypond-install/usr/../etc/profile.d/lilypond.csh
+ mkdir -p htmldocs/out
+ tar -C htmldocs -xzf out/htmldoc.tar.gz
tar (child): Cannot open archive out/htmldoc.tar.gz: No such file or
directory
tar (child): Error is not recoverable: exiting now
tar: Child returned status 2
tar: Error exit delayed from previous errors

The RPMs are still built successfully, but the documentation does not
have the HTML part, which I consider is a very important part of the
doc.

8) Version 43.  lily does not understand the translator
"Staff_margin_engraver".  Is it removed?

-----

The following is feature request (or perhaps I simply don't know how to
do).  Perhaps keep bugging the programmers will do...(or otherwise).

1) Change time/key signatures in the middle of a piece.  I don't know
how to do this, so I have splitted the score into two files.  Even
though page number remains in a series, bar numbers do not.

2) Change the starting number of bar numbering.

3) Is it possible to change the behaviour of certain properties to bind
to a system as opposed to the staff for the whole score?  For example,
the lyrics line for the Bass starting on page 4 have a larger spacing
from the staff when compared to other voices.  This is because it has to
avoid clashing the fermata in page 9.  It would be nice if I can defer
the change until bar 46 in page 9.  A few other properties are also
useful to have this behaviour, such as StaffVerticalExtent.

4) How to adjust the space between the two staves in a PianoStaff
context?

5) Page 3, bar 18.  I am using the \addlyrics feature there, and the
word extension (the underline) extends past the rest.  Ideally, it
should stop at the dotted half note, or at most right at the rest, but
not past the rest.  In this case, the visual effect is minor.  However,
if I use \addlyrics in passages which have multiple bars of rests (e.g.
page 6, Tenor, bar 18-20), the line then would not make sense.  What
about modifying the syntax of "__" such that it can accept a duration? 
In the case of bar 18, I would have "God, __4*9".  If duration is not
specified, then the default behaviour is used.  An even more useful
scenario is the end of page 3, where a word extension would go all the
way to the end of the system even if there is no "next note" for the
line to end.  Right now, I cannot find a way to put a word extension
there.

6) Page 6, bar 21.  This is an example of why I suggest to have hairpins
to be able to stop at a barline.  In this case, it would be nice if the
hairpins stop at the end of bar 20.

7) About hairpins.  Currently, all hairpins are horizontal, and the
location is determined by lily.  (The only thing I can set is whether it
is above or below a staff.)  Why is the syntax for hairpins designed not
to accept above/below staff, slant, and spacing?  Consider a 20-tuplet
of a scale running up.  I could have a crescendo that starts from the
first note and ends on the last note, above the tuplet, is slanted such
that the lower line of the hairpin runs parallel to the beam of the
tuplet, and is specified a spacing above the tuplet.  Compare this to a
horizontal crescendo that is also placed above that tuplet.  This
crescendo will have a large gap between its beginning and the first note
of the tuplet.

8) Page margins.  The default margin for all 4 sides are too much for me
(e.g. in this case, where I wanted to cram the voice and the piano parts
together into one score, but lily decides that there is not enough space
and only prints one system per page).  I tried changing textheight to 11
\in, but the whole score will shift up such that part of the title is
clipped.  Is there any way around it?

9) Graphical clashes.  Sometimes I see that slurs and hairpins tend to
clash with texts, especially \textscript.  Can such clashes be detected
and avoided?

I would appreciate if someone (perhaps HWN) can update me on these
issues.  Somehow, one of my postings about lyrics a week ago went
unnoticed.  Moreover, this piece is for my composition assignment which
is due Friday.  It would be nice if those graphical glitches could be
fixed by the time I hand in the assignment.  The most critical one is
the hairpins and the \pp get moved below the staff in page 3, bar 20.  I
apologize if this request is too much.

Desmond Lam
[EMAIL PROTECTED]
\include "paper16.ly"


%\version "1.3.40";


\header {
    filename = "HaveMercyOnMe_OGod_1.ly";
    title = "Have Mercy On Me, O God";
    subtitle = "Based on Psalm 57";
    composer = "Desmond Lam";
    date = "March 26, 2000";
    tagline = "";
    enteredby = "dfylam";
}


VoiceGlobal = \notes {
    \emptyText
    \property Voice.noAutoBeaming = ##t
}


SATBVoiceGlobal = \notes {
    \property Voice.dynamicDirection = \up
}


StaffGlobal = \notes {
    \tempo 2. = 48;
    \key f \minor;
    \time 6/4;
    \partial 4;
    \property Staff.automaticMelismata = ##t
    \property Staff.skipBars = ##f
}


SopranoVoice = \notes \relative c' {
    \VoiceGlobal

    \context Voice = SopranoVoiceOne {
        \SATBVoiceGlobal
        \property Voice.textScriptPadding = 15
        f4^\textscript "Earnest and prayerful" "Large"^\p

        % 1
        aes g aes bes2 ees4 |
        des2. () c2 bes4 |
        des c des f2 g4 |
        f2. () e2 f4^\pp |

        % 5
        f2. ees2 ees4 |
        ees2. ~ ees2 f4 |
        f ( e ) f d2 d4 |
        d2. () e2 f4 |
        \property Voice.textScriptPadding = 5
          c2.^\textscript "accel." "italic" ees2 ees4 |

        % 10
        ees2. ~ ees2 bes4 |
        f' ( e ) f d2 d4 |
        c2. ~ c2 [c8^\mf c] |
        f2^\textscript "cresc." "italic" c4 g'2 g4 |
        aes aes, bes bes () c [des8 des] |

        % 15
        ges2 aes,4 b () des des |
        des \< c2 ~ c \! c4 |
        g'2.^\ff () f ~ |
        f2. r4^\textscript "rit." "italic" f,-- g-- |
        \property Voice.textScriptPadding = 10
          aes2^\textscript "Tempo I" "Large"^\p f4 bes () aes g |

        % 20
        g2. \> f ~ |
        \! f^\pp ~ f2^\fermata \bar "||";
    }
}


AltoVoice = \notes \relative c' {
    \VoiceGlobal

    \context Voice = AltoVoiceOne {
        \SATBVoiceGlobal
        f4^\pp |

        % 1
        f e f g2 g4 |
        g2. () aes2 aes4 |
        g g g g2 g4 |
        g2. ~ g2 f4^\p |

        % 5
        aes4 g aes bes2 ees4 |
        des2. () c2 bes4 |
        des c des f,2 g4 |
        aes2. () g2 f4 |
        f2.^\textscript "accel." "italic" ees2 ees4 |

        % 10
        aes2. ~ aes2 aes4 |
        bes2. b2 b4 |
        c2. () b!2 c4^\mf |
        c2.^\textscript "cresc." "italic" bes |
        aes2 aes4 g () aes [aes8 aes] |

        % 15
        ges4 aes2 aes f4 |
        g!2 \< () bes4 c () bes \! bes ( |
        ) aes2.^\f ~ <
            {\stemdown aes ~ | aes}
            \context Voice = AltoVoiceTwo {
                \SATBVoiceGlobal
                \property Voice.fontSize = -2
                \stemup des ~ | des
            }
        > \stemboth r4^\textscript "rit." "italic"  f-- g-- |

        % 19
        \property Voice.textScriptPadding = 10
          des2^\textscript "Tempo I" "Large"^\p des4 e2 e4 |

        % 20
        c2. \> c ~ |
        \! c^\pp ~ c2^\fermata
    }
}


TenorVoice = \notes \relative c {
    \VoiceGlobal
    \clef "G_8";

    \context Voice = TenorVoiceOne {
        \SATBVoiceGlobal
        f4^\pp |

        % 1
        c' c c ees2 ees4 |
        ees2. ~ ees2 bes4 |
        f' e f d2 d4 |
        d2. () c2 f4 |

        % 5
        f e f g2 g4 |
        g2. () aes2 aes4 |
        g g f f2 b,4 |
        c2. ~ c2 f,4 |
        aes^\textscript "accel." "italic" g aes bes2 ees4 |

        % 10
        des2. () c2 bes4 |
        des c des f2 g4 |
        f2. () e2 f4 |
        f2. ees2 ees4 |
        aes,2. ~ aes2 aes4^\textscript "cresc." "italic" |

        % 15
        bes2. b2 b4 |
        c2. \< ~ c2 \! c4 ( |
        <
            {\stemup ) des2.^\f ~ des ~ | des}
            \context Voice = TenorVoicetwo {
                \property Voice.fontSize = -2
                \stemdown aes ~ aes ~ | aes
            }
        > \stemboth r4^\textscript "rit." "italic" f,-- g-- |

        % 19
        \property Voice.textScriptPadding = 10
          f^\textscript "Tempo I" "Large"^\p () g aes g2 bes4 |

        % 20
        bes2. \> ( ~ bes4 aes ) g |
        \! aes2.^\pp ~ aes2^\fermata
    }
}


BassVoice = \notes \relative c {
    \VoiceGlobal
    \clef "bass";

    \context Voice = BassVoiceOne {
        \SATBVoiceGlobal
        f4^\pp |

        % 1
        f f f ees2 ees4 |
        aes2. ~ aes2 aes4 |
        bes bes bes b2 b,4 |
        c2. ~ c2 c4 |

        % 5
        f f f ees2 ees4 |
        aes2. ~ aes2 aes4 |
        bes bes bes b2 g4 |
        c,2. ~ c2 f4^\p |
        f^\textscript "accel." "italic" e f g2 g4 |

        % 10
        g2. () aes2 aes4 |
        g g g g2 g4 |
        g2. ~ g2 f,4^\mp |
        aes g aes bes2 ees4 |
        des2. () c2 bes4^\textscript "cresc." "italic" |

        % 15
        des c des f2 g4 |
        f2. \< () e2 \! e4 ( |
        ) des2.^\p ~ des ~ |
        des r4^\textscript "rit." "italic" f-- g-- |
        \property Voice.textScriptPadding = 10
          bes,2^\textscript "Tempo I" "Large"^\p bes4 c2 c4 |

        % 20
        f2. \> f ~ |
        \! f^\pp ~ f2^\fermata
    }
}


PianoVoiceR = \notes \relative c' <
    \VoiceGlobal

    \context Voice = PianoVoiceROne {
        f4 |

        % 1
        <f aes> <e g> <f aes> <g2 bes> <g4 ees'> |
        <g2. des' ( > <aes2 ) c> <aes4 bes> |
        <g des'> <g c> <g des'> <g2 f'> <g4 g'> |
        <g2. f' ( > ~ <g2 ) e'> <f4 f'> |

        % 5
        <
            {\stemup f'2.}
            \context Voice = PianoVoiceRTwo {\stemdown aes,4 g aes}
        > \stemboth <bes,2 ees> ees4 |
        <des2. ees> ~ < c2 ees> <bes4 f'> |
        <des f ( > <c e> <des ) f> <f,2 d'> <g4 d'> |
        <aes2. d ( > <g2 ) e'> <f4 f'> |
        <f2. c'> <ees2 ees'> <ees4 ees'> |

        % 10
        <aes2. ees'> ~ <aes2 ees'> <aes4 bes> |
        <
            {\stemup f'4 ( e ) f}
            \context Voice = PianoVoiceRTwo {\stemdown bes,2.}
        > \stemboth <b,2 d> <b4 d> |
        c2. ~ <bes2 c>
          <
            {\stemup [c8 c]}
            \context Voice = PianoVoiceRTwo {\stemdown c4}
          > |
        <
            {\stemup f2 c4 g'2 g4 | aes aes,}
            \context Voice = PianoVoiceRTwo {\stemdown c2. bes | aes2}
        > \stemboth <aes4 bes> <g bes ( > <aes ) c> [<aes8 des> <aes des>] |

        % 15
        <
            {\stemup ges'2 aes,4 b () des}
            \context Voice = PianoVoiceRTwo {\stemdown ges,4 aes2 aes}
        > \stemboth <des4 f,> |
        <
            {\stemup des c2 ~ c2}
            \context Voice = PianoVoiceRTwo {\stemdown g2 () bes4 c bes}
        > \stemboth <bes4 c> |
        <aes2. g'> ~ <aes des f> ~ |
        <aes des f> r4 f g |
        <aes2 des,> <f4 d> <
            {\stemup bes () aes}
            \context Voice = PianoVoiceRTwo {\stemdown e2}
        > \stemboth <g4 es> |

        % 20
        <g2. c,> ~ <f c> ~ |
        <f c> ~ <f2 c> \bar "||";
    }
>


PianoVoiceL = \notes \relative c <
    \VoiceGlobal
    \clef "bass";

    \context Voice = PianoVoiceLOne {
        f4 |

        % 1
        <f c'> <f c'> <f c'> <ees2 ees'> <ees4 ees'> |
        <aes2. ees'> ~ <aes2 ees'> <aes4 bes> |
        <bes f'> <bes e> <bes f'> <b2 d> <b,4 d'> |
        <c2. d' ( > ~ <c2 ) c'> <c4 f'> |
        
        % 5
        <f f'> <f e'> <f f'> <ees2 g'> <ees4 g'> |
        <aes2. g'> ~ <aes2 aes'> <aes4 aes'> |
        <bes g'> <bes g'> <bes f'> <b2 f'> <g4 b> |
        <c,2. c'> ~ <c2 c'> f4 |
        <f aes> <e g> <f aes> <g2 bes> <g4 ees'> |

        % 10
        <g2. des' ( > <aes2 ) c> <aes4 bes> |
        <g des'> <g c> <g des'> <g2 f'> <g4 g'> |
        <g2. f' ( > ~ <g2 ) e'> <f'4 f,,> |
        <
            {\stemup f2.}
            \context Voice = PianoVoiceLTwo {\stemdown aes,,4 g aes}
          > \stemboth <ees2 bes,> <ees4 ees,> |
        <aes,2. des,> ~ <aes2 c,> <aes4 bes,> |

        % 15
        <
            {\stemup bes2.}
            \context Voice = PianoVoiceLTwo {\stemdown des,4 c des}
        > \stemboth <b2 f,> <b4 g> |
        <c2. f,> ~ <c2 e,> <c4 e, ( > |
        <des2. aes ) des,> ~ <des aes des,> ~ |
        <des aes des,> r4 f, g |
        <
            {\stemup f () g}
            \context Voice = PianoVoiceLTwo {\stemdown bes,2}
        > \stemboth <bes4 bes,> <g2 c,> <bes4 c,> |

        % 20
        <
            {\stemdown bes2. ~ \stemup bes4 aes g | aes2. ~ aes2}
            \context Voice = PianoVoiceLTwo {
              \stemdown f2. ~ f2. ~ | f2. ~ f2
            }
        >
    }
>


LineBreaker = \notes {
    \skip 4;

    % 1
    \skip 4*18;
    \break

    % 4
    \skip 4*18;
    \break

    % 7
    \skip 4*24;
    \break

    % 11
    \skip 4*24;
    \break

    % 15
    \skip 4*24;
    \break

    % 19
    %\skip 4*18;
    %\break
}


SopranoLyrics = \lyrics {
    Have4 mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy, O God, __ Have mer -- cy, O God, __
    Have mer -- cy, O God, __ Have mer -- cy, O God, __
    for in you my soul takes re -- fuge, O God, __
    for in you my soul __ takes re -- fuge, __ O God, __
    for in you my soul __ takes re -- fuge. __ _
}


AltoLyrics = \lyrics {
    Have4 mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy, O God, __ Have mer -- cy, O God, __
    my soul takes re -- fuge, God, __
    for in you my soul takes re -- fuge, __ Ah __
    for in you my soul takes re -- fuge. __
}


TenorLyrics = \lyrics {
    Have4 mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy, O God, __ Have mer -- cy, O God, __ Ah __
    for in you __ my soul takes re -- fuge. __
}


BassLyrics = \lyrics {
    Have4 mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __
    Have mer -- cy on me, O God, __ Have mer -- cy on me, O God, __ Ah __
    for in you my soul takes re -- fuge. __
}


ChoirStaffSpacing = \notes {
    \property Staff.StaffVerticalExtent = #'(-3.5 . 9.0)
}
    

SopranoStaff = \context Staff = contextSopranoStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    \property Staff.instrument = "Soprano"
    \property Staff.midiInstrument = "synth voice"
    \property Staff.StaffVerticalExtent = #'(-3.5 . 12.0)
    <
        \context Voice = contextSopranoVoice \SopranoVoice
        \context Voice = contextLineBreaker \LineBreaker
    >
}


AltoStaff = \context Staff = contextAltoStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    \property Staff.StaffVerticalExtent = #'(-4.0 . 9.0)
    \property Staff.instrument = "Alto"
    \property Staff.midiInstrument = "synth voice"
    \AltoVoice
}


TenorStaff = \context Staff = contextTenorStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    \property Staff.instrument = "Tenor"
    \property Staff.midiInstrument = "synth voice"
    \TenorVoice
}


BassStaff = \context Staff = contextBassStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    \property Staff.instrument = "Bass"
    \property Staff.midiInstrument = "synth voice"
    \BassVoice
}


ChoirStaffSATB = \context ChoirStaff <
    %\SopranoStaff
    %\context Lyrics = SopranoVoice \SopranoLyrics
    \addlyrics
        \context Staff = contextSopranoStaff \SopranoStaff
        \context Lyrics = contextSopranoLyrics \SopranoLyrics
    \addlyrics
        \context Staff = contextAltoStaff \AltoStaff
        \context Lyrics = contextAltoLyrics \AltoLyrics
    \addlyrics
        \context Staff = contextTenorStaff \TenorStaff
        \context Lyrics = contextTenorLyrics \TenorLyrics
    \addlyrics
        \context Staff = contextBassStaff \BassStaff
        \context Lyrics = contextBassLyrics \BassLyrics
>


PianoStaffR = \context Staff = contextPianoStaffR {
    \StaffGlobal
    \property Staff.instrument = " "
    \property Staff.midiInstrument = "acoustic grand"
    \PianoVoiceR
}


PianoStaffL = \context Staff = contextPianoStaffL {
    \StaffGlobal
    \property Staff.instrument = " "
    \property Staff.midiInstrument = "acoustic grand"
    \PianoVoiceL
}


PianoStaffRL = \context PianoStaff <
    %\property PianoStaff.StaffVerticalExtent = #'(-5.0 . 9.0)
    \context Staff = contextPianoStaffR {
        \property PianoStaff.instrument = "Piano (for\\nrehearsal\\nonly)"
        \PianoStaffR
    }
    \context Staff = contextPianoStaffL {
        \PianoStaffL
    }
>


\score {
    \midi {}
    \paper {
        %linewidth = 18.0 \cm;
        linewidth = 6.5 \in;
        textheight = 9.0 \in;
        \translator {
            \StaffContext
              %\consists Bar_number_engraver;
              %\consists Staff_margin_engraver;
        }
        \translator {
            \PianoStaffContext
              %\consists Staff_margin_engraver;
        }
        \translator {
            \ScoreContext
              \consists Bar_number_engraver;
        }
    }
    <
        \property Score.barNumberScriptPadding = 10
        \ChoirStaffSATB
        %\PianoStaffRL
    >
}
\include "paper16.ly"


%\version "1.3.40";


\header {
    filename = "HaveMercyOnMe_OGod_2.ly";
    tagline = "";
    enteredby = "dfylam";
}


VoiceGlobal = \notes {
    \emptyText
    \property Voice.noAutoBeaming = ##t
    \property Voice.tupletBracketVisibility = ##t
}


SATBVoiceGlobal = \notes {
    \property Voice.dynamicDirection = \up
}


StaffGlobal = \notes {
    \tempo 2 = 60;
    \key g \minor;
    \time 4/4;
    \property Staff.automaticMelismata = ##t
}


SATBStaffGlobal = \notes {
    \property Staff.skipBars = ##f
}


SopranoVoice = \notes \relative c'' {
    \VoiceGlobal
    \SATBStaffGlobal

    \context Voice = SopranoVoiceOne {
        \SATBVoiceGlobal

        \property Voice.textScriptPadding = 10
          r4^\textscript "Joyful" "Large"
          \property Voice.textScriptPadding = 0
          d^\mp g d |
        ees ees2 [d8 () c] |
        d4 [c8 bes] c4 [d8 ees] |
        d4 g, r2 |

        % 5
        r4 [g8^\p a] bes4 [c8 () bes] |
        a2. () cis4 |
        cis d r d ~ |
        d [c8 ( bes] ) a4 c ( |
        ) bes [a8 ( g] ~ ) g4 fis ( |

        % 10
        ) g d'^\mp d d |
        d2 () ees4 ees |
        f ( d ) e e ~ |
        e d r2 |
        r4 g ~ g^\fermata \< [f8 () g] |

        % 15
        \! aes4^\f [ees8 () des] c4 ( [d8 ) ees] |
        d4 g, r2 |
        R1*2 |
        r4 r8. c16^\mf e2 ~ |

        % 20
        e4 [e8 d] e r8 \times 2/3 {[cis \< cis cis]} |
        \! fis2.^\f [b,8 b] |
        cis4 r2 \times 2/3 {[fis8 fis fis]} |
        g2. [e8 e] |
        fis4 r2 \times 2/3 {[d8 d d]} |

        % 25
        g2. [fis8 g] |
        g r r2 [ees8^\mf f] ~ |
        f4 e ~ e8 d ~ d4 |
        <
            {\stemup e}
            \context Voice = SopranoVoiceTwo {
                \property Voice.fontSize = -2
                \stemdown c
            }
        > \stemboth r2. |
        r4 r8. a,16^\mp d4 a |

        % 30
        c () b r2 |
        r4 r8. g16^\textscript "cresc." "italic" c4 [c8. g16] |
        b4 () a r2 |
        r4 a^\mf d a |
        c b2 f'4 |

        % 35
        e [d8 c] d4 [c8 b] |
        c4 a2^\textscript "cresc." "italic" ees'4 |
        d [c8 bes] c4 [bes8 a] |
        bes4 d^\f g d |
        ees ees2 [d8 () c] |

        % 40
        d4 d2^\mf bes4 |
        c2. () d4 |
        d d r2 |
        r4 d g d |
        ees ees2 [d8 () c] |

        % 45
        d4 [c8^\textscript "rit." "italic" bes] c4 [a8 bes] |
        b2^\f b^\fermata \bar "||";
    }
}

AltoVoice = \notes \relative c' {
    \VoiceGlobal
    \SATBStaffGlobal

    \context Voice = AltoVoiceOne {
        \SATBVoiceGlobal

        R1*9 |

        % 10
        r4 d^\mf d' a |
        bes bes2 [a8 () g] |
        a4 [g8 f] g4 [a8 bes] |
        a4 d, r2 |
        bes'2 \< ~ bes4^\fermata bes |

        % 15
        \! aes^\f aes fis2 |
        g4 d r2 |
        R1 |
        r2 r4 r8. g16^\mf |
        c1 ~ |

        % 20
        c4 [c8 b] c r \times 2/3 {[cis \< cis cis]} |
        \! a2^\f () gis4 [gis8 gis] |
        e4 r2 \times 2/3 {[a8 a a]} |
        b2 () a4 [a8 a] |
        a4 r r8. g16 b4 |

        % 25
        c2 () a4 [a8 a] |
        g8 r r8. g16^\mf aes4 [aes8 aes] |
        aes4 [g8. g16] g4 [f8. f16] |
        <
            {\stemdown e4}
            \context Voice = AltoVoiceTwo {
                \property Voice.fontSize = -2
                \stemup g
            }
        > \stemboth e a e |
        f f2. |

        % 30
        r4 [f8 e] f4 [e8 d] |
        e4 c2. |
        r4 r8. c16^\mp f4. c8 |
        d2 r2 |
        r4 r8. e16 gis4 [a8 () gis] |

        % 35
        a2 aes |
        fis4 [ees8. d16^\p] ees4 [bes'8. a16] |
        bes4 [a8^\textscript "cresc." "italic" g] fis4 [fis8 fis] |
        g4 g r2 |
        r4 a^\f d a |

        % 40
        bes4 bes2 [a8 () g] |
        a4 a^\mf () g fis |
        g2. ( [a8 ) bes] |
        a4 a r2 |
        ees4 ees () g a |

        % 45
        bes [bes8^\textscript "rit." "italic" bes] [a () g] [fis fis] |
        g2^\f g^\fermata
    }
}


TenorVoice = \notes \relative c {
    \VoiceGlobal
    \SATBStaffGlobal
    \clef "G_8";

    \context Voice = TenorVoiceOne {
        \SATBVoiceGlobal

        R1*3 |
        r4 d^\mp d' a |

        % 5
        bes bes2 [a8 () g] |
        a4 [g8 f] g4 [a8 bes] |
        a4 d, r2 |
        r4 [a'8^\p bes] c4 [bes8 () a] |
        bes2 () a |

        % 10
        bes4 bes r d^\mp ~ |
        d d () g ees ( |
        ) d d () a a ~ |
        a r2 ees'4 \< ~ |
        ees2 ~ ees4^\fermata ees |

        % 15
        \! ees^\f [c8 () bes] a2 |
        bes4 bes r2 |
        r4 r8. g16^\mf b2 ~ |
        b4 a b8 r8 r4 |
        R1 |

        % 20
        r2. \times 2/3 {[cis8 \< cis cis]} |
        \! d2.^\f [d8 d] |
        cis4 r8. d16 fis2 |
        d2 () cis4 [cis8 cis] |
        d4 r8. b16 d2 |

        % 25
        e2 () d4 [d8 d] |
        bes8 r8 r8. bes16^\f c4 [c8 c] |
        d4 [c8. c16] c4 [b8. b16] |
        <
            {\stemdown g4}
            \context Voice = TenorVoiceTwo {
                \property Voice.fontSize = -2
                \stemup c
            }
        > \stemboth g^\mf c g |
        a a2. |

        % 30
        r4 [a8 g] a4 [g8 f] |
        g4 g2. |
        r4 r8. f16^\mp a4. f8 |
        f2 r |
        r4 r8. gis16 b4 [c8 () d] |

        % 35
        c2 c |
        c4 [c8. b16^\p] c4 [c8. c16] |
        bes!4 [c8^\textscript "cresc." "italic" c] a4 [bes8 c] |
        bes4 bes r2 |
        R1 |

        % 40
        r4 d^\f g d |
        ees ees2 [d8 () c] |
        d4. d8^\mf () ees4 [ees8 () d] |
        c1 |
        bes4 bes r [d8 () ees] |

        % 45
        bes4 [c8^\textscript "rit." "italic" d] ees4 [d8 c] |
        b2^\f d^\fermata
    }
}


BassVoice = \notes \relative c {
    \VoiceGlobal
    \SATBStaffGlobal
    \clef "bass";

    \context Voice = BassVoiceOne {
        \SATBVoiceGlobal

        R1*6

        % 7
        r4 d^\mp g d |
        ees ees2 [d8 () c] |
        d4 [c8 bes] c4 [d8 ees] |

        % 10
        d4 g r2 |
        r4 [g8^\mp fis] g4 [c8 () bes] |
        a2. () cis,4 |
        cis d ees2 \< ~ |
        ees ~ ees4^\fermata des |

        % 15
        \! c^\f c d!2 |
        g,4 g r r8. d'16^\mf |
        g1 ~ |
        g4 fis g8 r r4 |
        R1 |

        % 20
        r2. \times 2/3 {[cis,8 \< cis cis]} |
        \! d2^\f () e4 [e8 e] |
        a,8 r16 a d2. |
        g2 () a4 [a8 a] |
        d,8 r16 d g2. |

        % 25
        c2 () d4 [d,8 d] |
        ees r16 ees^\f aes2. |
        g4 [g8. g16] g4 [g8. g16] |
        c,4 r2. |
        r4 r8. d16^\mp a4 d |

        % 30
        g,2 r |
        r4 [c8.^\textscript "cresc." "italic" c16] e4 [e8. e16] |
        f2 r |
        r4 b,^\mf b b |
        e e2 e4 |

        % 35
        a, [d8 e] f4 [e8 d] |
        ees!4 fis2^\textscript "cresc." "italic" fis4 |
        g [ees8 ees] d4 [d8 d] |
        g4 g, r2 |
        R1*2 |

        % 41
        r4 a'^\f d a |
        bes bes2 [a8 () g] |
        a4 a^\mf g fis |
        g g r fis |

        % 45
        g [a8^\textscript "rit." "italic" g] a4 [d,8 d] |
        <
            {\stemdown \property Voice.textScriptPadding = 100
              g,2^\textscript "e" "dynamic" g_\fermata}
            \context Voice = BassVoiceTwo {
                \property Voice.fontSize = -2
                \stemup
                g' g^\fermata
            }
        >
    }
}


PianoVoiceR = \notes \relative c'' <
    \VoiceGlobal

    \context Voice = PianoVoiceROne {
        r4 d g d |
        ees ees2 [d8 () c] |
        d4 [c8 bes] c4 [d8 ees] |
        d4 g, r2 |

        % 5
        r4 [g8 a] bes4 [c8 () bes] |
        a2. () cis4 |
        cis d r d ~ |
        d [c8 ( bes] ) a4 c ( |
        ) bes [a8 ( g] ~ ) g4 fis ( |

        % 10
        ) g \stemup d' d d
        d2 () ees4 ees |
        f ( d ) e e ~ |
        e d r2 |
        r4 g ~ g^\fermata [f8 () g] |

        % 15
        aes4 [ees8 () des] c4 ( [d8 ) ees] |
        d4 g, r2 |
        R1*2 |
        r4 r8. c16 e2 ~ |

        % 20
        e4 [e8 d] e r8 \times 2/3 {[cis cis cis]} |
        fis2. [b,8 b] |
        cis4 r2 \times 2/3 {[fis8 fis fis]} |
        g2. [e8 e] |
        fis4 s2 \times 2/3 {[d8 d d]} |

        % 25
        g2. [fis8 g] |
        g r s2 [ees8 f] ~ |
        f4 e ~ e8 d ~ d4 |
        <c e> s2. |
        r4 r8. a16 d4 a |

        % 30
        c () b r2 |
        r4 r8. g16 c4 [c8. g16] |
        b4 () a r2 |
        r4 a d a |
        c b2 f'4 |

        % 35
        e [d8 c] d4 [c8 b] |
        c4 a2 ees'4 |
        d [c8 bes] c4 [bes8 a] |
        bes4 d g d |
        ees ees2 [d8 () c] |

        % 40
        d4 d2 bes4 |
        c2. () d4 |
        d d r2 |
        r4 d g d |
        ees ees2 [d8 () c] |
        d4 [c8 bes] c4 [a8 bes] |
        b2 b^\fermata
    }
    \context Voice = PianoVoiceRTwo \relative c' {
        \skip 1*9;

        % 10
        \stemdown r4 d d' a |
        bes bes2 [a8 () g] |
        a4 [g8 f] g4 [a8 bes] |
        a4 d, s2 |
        bes'2 ~ bes4 bes |

        % 15
        aes aes fis2 |
        g4 d s2 |
        R1 |
        r2 r4 r8. g16 |
        c1 ~ |

        % 20
        c4 [c8 b] c s \times 2/3 {[cis cis cis]} |
        a2 () gis4 [gis8 gis] |
        e4 s2 \times 2/3 {[a8 a a]} |
        b2 () a4 [a8 a] |
        a4 r r8. g16 b4 |

        % 25
        c2 () a4 [a8 a] |
        g8 s r8. g16 a4 [a8 a] |
        a4 [g8. g16] g4 [f8. f16] |
        <e4 g> e a e |
        f f2. |

        % 30
        r4 [f8 e] f4 [e8 d] |
        e4 c2. |
        r4 r8. c16 f4. c8 |
        d2 r2 |
        r4 r8. e16 gis4 [a8 () gis] |

        % 35
        a2 aes |
        fis4 [ees8. d16] ees4 [bes'8. a16] |
        bes4 [a8 g] fis4 [fis8 fis] |
        g4 g r2 |
        r4 a d a |

        % 40
        bes4 bes2 [a8 () g] |
        a4 a () g fis |
        g2. ( [a8 ) bes] |
        a4 a r2 |
        ees4 ees () g a |

        % 45
        bes [bes8 bes] [a () g] [fis fis] |
        g2 g \bar "||";
    }
>


PianoVoiceL = \notes \relative c <
    \VoiceGlobal
    \clef "bass";

    \context Voice = PianoVoiceLOne {
        R1*3 |
        r4 d d' a |

        % 5
        bes bes2 [a8 () g] |
        a4 [g8 f] g4 [a8 bes] |
        a4 \stemup d, s2 |
        s4 [a'8 bes] c4 [bes8 () a] |
        bes2 () a |

        % 10
        bes4 bes r d ~ |
        d d () g ees ( |
        ) d d () a a ~ |
        a r2 ees'4 ~ |
        ees2 ~ ees4^\fermata ees |

        % 15
        ees [c8 () bes] a2 |
        bes4 bes r2 |
        r4 r8. g16 b2 ~ |
        b4 a b8 r8 r4 |
        R1 |

        % 20
        r2. \times 2/3 {[cis8 cis cis]} |
        d2. [d8 d] |
        cis4 r8. d16 fis2 |
        d2 () cis4 [cis8 cis] |
        d4 r8. b16 d2 |

        % 25
        e2 () d4 [d8 d] |
        bes8 r8 r8. bes16 c4 [c8 c] |
        d4 [c8. c16] c4 [b8. b16] |
        <g4 c> g c g |
        a a2. |

        % 30
        r4 [a8 g] a4 [g8 f] |
        g4 g2. |
        r4 r8. f16 a4. f8 |
        f2 r |
        r4 r8. gis16 b4 [c8 () d] |

        % 35
        c2 c |
        c4 [c8. b16] c4 [c8. c16] |
        bes!4 [c8 c] a4 [bes8 c] |
        bes4 bes r2 |
        R1 |

        % 40
        r4 d g d |
        ees ees2 [d8 () c] |
        d4. d8 () ees4 [ees8 () d] |
        c1 |
        bes4 bes r [d8 () ees] |

        % 45
        bes4 [c8 d] ees4 [d8 c] |
        b2 d
    }
    \context Voice = PianoVoiceLTwo \relative c {
        \skip 1*6;

        % 7
        \stemdown s4 d g d |
        ees ees2 [d8 () c] |
        d4 [c8 bes] c4 [d8 ees] |

        % 10
        d4 g s2 |
        r4 [g8 fis] g4 [c8 () bes] |
        a2. () cis,4 |
        cis d ees2 ~ |
        ees ~ ees4 des |

        % 15
        c c d!2 |
        g,4 g r r8. d'16 |
        g1 ~ |
        g4 fis g8 s s4 |
        R1 |

        % 20
        s2. \times 2/3 {[cis,8 cis cis]} |
        d2 () e4 [e8 e] |
        a,8 r16 a d2. |
        g2 () a4 [a8 a] |
        d,8 r16 d g2. |

        % 25
        c2 () d4 [d,8 d] |
        ees r16 ees a2. |
        g4 [g8. g16] g4 [g8. g16] |
        c,4 s2. |
        r4 r8. d16 a4 d |

        % 30
        g,2 r |
        r4 [c8. c16] e4 [e8. e16] |
        f2 r |
        r4 b, b b |
        e e2 e4 |

        % 35
        a, [d8 e] f4 [e8 d] |
        ees!4 fis2 fis4 |
        g [ees8 ees] d4 [d8 d] |
        g4 g, s2 |
        R1*2 |

        % 41
        r4 a' d a |
        bes bes2 [a8 () g] |
        a4 a g fis |
        g g s fis |

        % 45
        g [a8 g] a4 [d,8 d] |
        <g,2 g'> <g_\fermata g'>
    }
>


LineBreaker = \notes {
    \skip 1*4;
    \break

    % 5
    \skip 1*4;
    \break

    % 10
    \skip 1*4;
    \break

    % 15
    \skip 1*4;
    \break

    % 20
    \skip 1*4;
    \break

    % 25
    \skip 1*4;
    \break

    % 30
    \skip 1*4;
    \break

    % 35
    \skip 1*4;
    \break

    % 40
    \skip 1*4;
    \break
}


SopranoLyrics = \lyrics {
    _4 My heart is stead -- fast,2 O4 __ God, I8 will sing4 and8 make
      mu4 -- sic. _2

    % 5
    _4 I8 will sing4 and __ make1 __ mu4 -- sic.
    _4 Stead2 -- fast __ is __ my __ heart. __

    % 10
    My4 heart will sing2. __ and4 make2. __ mu2 -- sic.4 _2
    _4 I2 __ will4 __ sing and __ make2 __ mu4 -- sic. _2 _1 _

    % 19
    _4 _8. A16 -- wake,2. __ harp8 and lyre! _ \times 2/3 {I8 will8 a8} --
      wak2. -- en8 the dawn.4 _2
    \times 2/3 {I8 will8 a8} -- wak2. -- en8 the dawn.4 _2

    % 24
    \times 2/3 {I8 will8 a8} -- wak2. -- en8 the dawn.4 _2
    a8 -- wak4. -- en __ the __ dawn.4 _2.

    % 29
    _4 _8. A16 -- wake,4 my soul!2 __ _
    _4 _8. A16 -- wake,4 harp8. and16 lyre!2 __ _

    % 33
    _4 My heart is stead -- fast,2 O4 God, I8 will sing4 and8 make
      mu4 -- sic.2
    O4 God, I'll8 a -- wak4 -- en8 the dawn.4

    % 38
    My heart is stead -- fast,2 O4 __ God, I2 will4 sing1 __ mu4 -- sic. _2
    _4 My heart is stead -- fast,2 O4 __ God, I8 will sing4 and8 make
      mu2 -- sic.
}


AltoLyrics = \lyrics {
    _1*9

    % 10
    _4 My heart is stead -- fast,2 O4 __ God, I8 will sing4 and8 make
      mu4 -- sic. _2

    % 14
    I2. __ will4 sing and make2 mu4 -- sic. _2 _1

    % 18
    _2 _4 _8. A16 -- wake,4*5 __ harp8 and lyre! _ \times 2/3 {I8 will8 a8} --
      wak2. -- en8 the dawn.4 _2
    
    % 22
    \times 2/3 {I8 will8 a8} -- wak2. -- en8 the dawn.4 _4 _8.
    and16 lyre!4 wak2. -- en8 the dawn.8

    % 26
    _8 _8. A16 -- wake,4 harp8 and lyre!4 will8. a16 -- wak4 -- en8.
      the16 dawn.4

    % 28
    My heart is stead -- fast,2.
    _4 I8 will sing4 and8 make mu4 -- sic2.

    % 32
    _4 _8. A16 -- wake,4 my soul!2 _
    _4 _8. A16 -- wake,4 my __ soul!2 make mu4 -- sic8.

    % 36
    A16 -- wake,4 harp8 and lyre!4 I8 will sing4 and8 make mu4 -- sic. _2

    % 39
    _4 My heart is stead -- fast,2 O4 __ God, I2 __ will4 sing1 __
      mu4 -- sic. _2

    % 44
    stead4 -- fast,2 __ O4 God, I8 will sing4 __ and8 make mu2 -- sic.
}


TenorLyrics = \lyrics {
    _1*3 _4 My heart is stead -- fast,2 O4 __ God, I8 will sing4 and8 make
      mu4 -- sic. _2

    % 8
    _4 I8 will sing4 and __ make1 __ mu4 -- sic.
    _4 Stead2 -- fast __ is __ my __ heart. __
    _2 I1 __ will4 sing __ and __ make2 __ mu4 -- sic. _2

    % 17
    _4 _8. A16 -- wake,2. __ my4 soul!8 _4. _1
    _2. \times 2/3 {I8 will8 a8} -- wak2. -- en8 the dawn.4

    % 22
    _8. my16 soul!2 wak2. -- en8 the dawn.4
    _8. O16 harp2 wak2. -- en8 the dawn.8 _8

    % 26
    _8. A16 -- wake,4 my8 soul! I4 will8. a16 -- wak4 -- en8. the16 dawn.4

    % 28
    My heart is stead -- fast,2. _4
    I8 will sing4 and8 make mu4 -- sic.2.

    % 32
    _4 _8. A16 -- wake,4. my8 soul!2 _
    _4 _8. A16 -- wake,4 my __ soul!2 make mu4 -- sic.8.
    
    % 36
    A16 -- wake,4 harp8. and16 lyre!4
    I8 will sing4 and8 make mu4 -- sic. _2 _1

    % 40
    _4 My heart is stead -- fast,2 O4 __ God,4. I4. __ will4 __ sing1
      mu4 -- sic.
    _ O __ God, I8 will sing4 and8 make mu2 -- sic.
}


BassLyrics = \lyrics {
    _1*6 _4 My heart is stead -- fast,2 O4 __ God, I8 will sing4 and8 make
      mu4 -- sic. _2

    % 11
    _4 I8 will sing4 and __ make1 __ mu4 -- sic.
    I4*5 __ will4 sing __ and __ make2 __ mu4 -- sic.

    % 16
    _4 _8. A16 -- wake,4*5 __ my4 soul!8 _4. _1
    _2. \times 2/3 {I8 will8 a8} -- wak2. -- en8 the dawn.8

    % 22
    _16 A -- wake,2. wak2. -- en8 the dawn.8
    _16 A -- wake,2. wak2. -- en8 the dawn.8

    % 26
    _16 A -- wake,2. I4 will8. a16 -- wak4 -- en8. the16 dawn.4 _2.

    % 29
    _4 _8. A16 -- wake,4 my soul!2 _
    _4 I'll8. a16 -- wak4 -- en8. the16 dawn.2 _

    % 33
    _4 My heart is stead -- fast,2 O4 God, I8 will sing4 and8 make mu4 -- sic.2
    O4 God, I8 will sing4 and8 make mu4 -- sic _2 _1*2
    
    % 41
    _4 My heart is stead -- fast,2 O4 __ God, I will sing mu -- sic.
    _ O God, I8 will sing4 and8 make mu2 -- sic.
}


ChoirStaffSpacing = \notes {
    \property Staff.StaffVerticalExtent = #'(-5.0 . 8.0)
}
    

SopranoStaff = \context Staff = contextSopranoStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    %\property Staff.instrument = "Soprano"
    \property Staff.midiInstrument = "synth voice"
    \property Staff.StaffVerticalExtent = #'(-5.0 . 12.0)
    <
        \context Voice = contextSopranoVoice \SopranoVoice
        \context Voice = contextLineBreaker \LineBreaker
    >
}


AltoStaff = \context Staff = contextAltoStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    %\property Staff.instrument = "Alto"
    \property Staff.midiInstrument = "synth voice"
    \AltoVoice
}


TenorStaff = \context Staff = contextTenorStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    %\property Staff.instrument = "Tenor"
    \property Staff.midiInstrument = "synth voice"
    \TenorVoice
}


BassStaff = \context Staff = contextBassStaff {
    \StaffGlobal
    \ChoirStaffSpacing
    \property Staff.StaffVerticalExtent = #'(-6.5 . 8.0)
    %\property Staff.instrument = "Bass"
    \property Staff.midiInstrument = "synth voice"
    \BassVoice
}


ChoirStaffSATB = \context ChoirStaff <
    %\addlyrics
        \context Staff = contextSopranoStaff \SopranoStaff
        %\context Lyrics = contextSopranoLyrics \SopranoLyrics
        \context Lyrics = contextSopranoVoice \SopranoLyrics
    %\addlyrics
        \context Staff = contextAltoStaff \AltoStaff
        \context Lyrics = contextAltoVoice \AltoLyrics
    %\addlyrics
        \context Staff = contextTenorStaff \TenorStaff
        \context Lyrics = contextTenorVoice \TenorLyrics
    %\addlyrics
        \context Staff = contextBassStaff \BassStaff
        \context Lyrics = contextBassVoice \BassLyrics
>


PianoStaffR = \context Staff = contextPianoStaffR {
    \StaffGlobal
    \property Staff.instrument = " "
    \property Staff.midiInstrument = "acoustic grand"
    \PianoVoiceR
}


PianoStaffL = \context Staff = contextPianoStaffL {
    \StaffGlobal
    \property Staff.instrument = " "
    \property Staff.midiInstrument = "acoustic grand"
    \PianoVoiceL
}


PianoStaffRL = \context PianoStaff <
    %\property PianoStaff.StaffVerticalExtent = #'(-8.0 . 8.0)
    \context Staff = contextPianoStaffR {
        %\property PianoStaff.instrument = "Piano\\n(rehearsal\\nonly)"
        \PianoStaffR
    }
    \context Staff = contextPianoStaffL {
        \PianoStaffL
    }
>


\score {
    \midi {}
    \paper {
        indent = 0.0 \cm;
        %linewidth = 18.0 \cm;
        linewidth = 6.5 \in;
        textheight = 9.0 \in;
        \translator {
            \ScoreContext
              \consists Bar_number_engraver;
        }
    }
    <
        \property Score.barNumberScriptPadding = 10
        \ChoirStaffSATB
        %\PianoStaffRL
    >
}

Reply via email to