350 "\relative"s on all parts - is it possible to simply the code?

[MING TSANG]

Hi, lilyponders:

Sorry for the long .ly file.
I am using variables for each measure (bar).  I have trouble use one 
"\relative" for each soprano, alto, tenor, right & left. Now I have 70 
"\relative"s.

1.  Is there a better way to code this, so that I don't need to have 70 
"\relative"s? ( 70 x 5 = 350 for all parts)
2.  How to code dynamic in such a way that it will not affect the variable use 
elsewhere.  bar 13 (right hand piano) is coded with \mf, but when I re used bar 
13 on bar 27 the \mf is there : bar 27 should not have a \mf dynamic? 

Thank for any recommendation.
Ming
\version "2.17.25"
\language "english"

 


\header {
  title = "將 重 檐 交 託 上 帝"
  subtitle = "Cast Thy Burden Upon the Lord" 
    % Remove default LilyPond tagline
  tagline = ##f
}

\paper {
  #(set-paper-size "letter")
}
 %#(set-global-staff-size 12)
\layout {
  \context {
    \Score
    %\remove "Bar_number_engraver"
  }
}



global = {
  \key d \major
  \numericTimeSignature
  \time 4/4
  \tempo "Moderately slow" 4=72
}

ss❶	= r1
ss❷	= r1
ss❸	= r1
ss❹	= r1
ss❺	= r1
ss❻	= r1
ss❼	= \relative c''{ a4. a,8 d4 fs8 a |}
ss❽	= \relative c''{ a8 g16 fs g2. |}
ss❾	= \relative c''{ g4. a,8 cs4 e8 g |}
ss❶❿	= \relative c''{ g8 fs16 e fs4 r8 fs a a, |}
ss❶❶	= \relative c'{ a8 b b4~ b8 b b b |}
ss❶❷	= \relative c'{ b8 e cs4~ cs8 cs cs cs |}
ss❶❸	= \relative c'{ cs8 fs d2 fs8 a |}
ss❶❹	= \relative c''{ a8 b d,2.~ |}
ss❶❺	= \relative c'{ d1 |}
ss❶❻	= \relative c''{ r4 a8 d, d e16 fs e8\fermata d |}
ss❶❼	= \relative c'{ d1 |}
ss❶❽	= r1
ss❶❾	= r1
ss❷❿	= r1
ss❷❶	= \relative c''{ a4. a,8 d4 fs8 a |}
ss❷❷	= \relative c''{ a8 g16 fs g2. |}
ss❷❸	= \relative c''{ g4. a,8 cs4 e8 g |}
ss❷❹	= \relative c''{ g8 fs16 e fs4~ fs8 fs a8 a, |}
ss❷❺	= \ss❶❶
ss❷❻	= \ss❶❷
ss❷❼	= \ss❶❸
ss❷❽	= \ss❶❹
ss❷❾	= \ss❶❺
ss❸❿	= \ss❶❻
ss❸❶	= \relative c'{ d2. d4 \bar"||" }
ss❸❷	= \relative c'{ \key bf\major d4. d8 d d ef4 |}
ss❸❸	= \relative c'{ c2. r8 d |}
ss❸❹	= \relative c'{ c8 d ef f g4 a4 |}
ss❸❺	= \relative c'{ f2. f4 |}
ss❸❻	= \relative c'{ f8 f f f bf f4. |}
ss❸❼	= \relative c'{ r2 r4 r8 f16 f |}
ss❸❽	= \relative c''{ \tuplet 3/2{ef4 d c} bf g |}
ss❸❾	= \relative c''{ c2. f,4 |}
ss❹❿	= \relative c'{ f4 f8 f f g a bf |}
ss❹❶	= \relative c'{ f2. r4 |}
ss❹❷	= r1
ss❹❸	= \relative c'{ r2 r4 ef8 ef |}
ss❹❹	= \relative c'{ d8 d d d d e fs g |}
ss❹❺	= \relative c'{ d4. d8 d4 d8 d |}
ss❹❻	= \relative c'{ d2 g2 |}
ss❹❼	= \relative c''{ g8 a a2. |}
ss❹❽	= { r1 \bar"||" }
ss❹❾	= \relative c''{ \key g\major d4. d,8 g4 b8 d |}
ss❺❿	= \relative c''{ d8 c16 b c2. |}
ss❺❶	= \relative c''{ c4. d,8 fs4 a8 c |}
ss❺❷	= \relative c''{ c8 b16 a b4 r8 b d d, |}
ss❺❸	= \relative c'{ d8 e e4~ e8 e e e |}
ss❺❹	= \relative c'{ e8 a fs4~ fs8 fs fs fs |}
ss❺❺	= \relative c'{ fs8 b g2 b8 d |}
ss❺❻	= \relative c''{ d8 e g,2.~ |}
ss❺❼	= \relative c''{ g1 |}
ss❺❽	= \relative c''{ r4 d8 g, g a16 b a8\fermata g |}
ss❺❾	= \relative c''{ g1 |}
ss❻❿	= { r1 }
ss❻❶	= { r1 }
ss❻❷	= { r1 }
ss❻❸	= \relative c''{ r4\fermata d8 g, g a16 b a8 g |}
ss❻❹	= \relative c''{ \time 2/4 g2~ |}
ss❻❺	= \relative c''{ \time 4/4 g1 |}
ss❻❻	= r1
ss❻❼	= r1
ss❻❽	= \relative c'{ r2 d4 d |}
ss❻❾	= \relative c'{ d4 d8~ d d4~ d |}
ss❼❿	= \relative c'{ d1\fermata |} 

soprano =  {  \global
  \ss❶		\ss❷		\ss❸ \break
  \ss❹		\ss❺		\ss❻ \break
  \ss❼		\ss❽		\ss❾ \break
  \ss❶❿	\ss❶❶		\ss❶❷ \break  
  \ss❶❸	\ss❶❹		\ss❶❺		\ss❶❻ \break
  \ss❶❼	\ss❶❽		\ss❶❾		\ss❷❿ \break
  \ss❷❶	\ss❷❷		\ss❷❸ \break
  \ss❷❹	\ss❷❺		\ss❷❻ \break
  \ss❷❼	\ss❷❽		\ss❷❾ \break
  \ss❸❿	\ss❸❶		\ss❸❷ \break
  \ss❸❸	\ss❸❹ \break
  \ss❸❺	\ss❸❻ \break
  \ss❸❼	\ss❸❽		\ss❸❾ \break
  \ss❹❿	\ss❹❶		\ss❹❷ \break
  \ss❹❸	\ss❹❹		\ss❹❺ \break
  \ss❹❻	\ss❹❼		\ss❹❽		\ss❹❾ \break
  \ss❺❿	\ss❺❶		\ss❺❷ \break
  \ss❺❸	\ss❺❹		\ss❺❺ \break
  \ss❺❻	\ss❺❼		\ss❺❽ \break
  \ss❺❾	\ss❻❿		\ss❻❶		\ss❻❷ \break
  \ss❻❸	\ss❻❹		\ss❻❺ \break
  \ss❻❻	\ss❻❼		\ss❻❽		\ss❻❾		\ss❼❿
  \label #'lastPage
}


aa❶to❸❻	= {\ss❶	\ss❷	\ss❸  \ss❹ \ss❺ \ss❻ \ss❼	\ss❽ \ss❾  \ss❶❿ \ss❶❶
                   \ss❶❷ \ss❶❸ \ss❶❹ \ss❶❺ \ss❶❻  \ss❶❼ \ss❶❽	 \ss❶❾	 \ss❷❿ 
                   \ss❷❶ \ss❷❷ \ss❷❸ \ss❷❹ \ss❷❺ \ss❷❻ \ss❷❼ \ss❷❽ \ss❷❾ 
                   \ss❸❿ \ss❸❶ \ss❸❷ \ss❸❸ \ss❸❹ \ss❸❺ \ss❸❻ } 
   
aa❸❼		= \ss❸❼
aa❸❽		= \relative c''{ \tuplet 3/2{g4 g g} d d |}
aa❸❾		= \relative c'{ ef2. f4 |}
aa❹❿		= \ss❹❿
aa❹❶		= \ss❹❶
aa❹❷		= \ss❹❷
aa❹❸		= \ss❹❸
aa❹❹		= \relative c'{ d8 d d d d d d d |}
aa❹❺		= \relative c'{ b4. b8 b4 b8 b |}
aa❹❻		= \relative c'{ c2 e2 |}
aa❹❼		= \relative c'{ e8 fs fs2. |}
aa❹❽		= r1
aa❹❾		= \relative c''{ \key g\major d4. d,8 d4 d8 fs |}
aa❺❿		= \relative c'{ e8 e16 e e2. |}
aa❺❶		= \relative c''{ c4. d,8 d4 d8 d |}
aa❺❷		= \relative c'{ e8 d16 d d4 r8 b'8 d d, |}
aa❺❸		= \relative c'{ g8 g g4~ g8 g g g |}
aa❺❹		= \relative c'{ a8 a a4~ a8 a a a |}
aa❺❺		= \relative c'{ b8 ds b2 d8 g |}
aa❺❻		= \relative c''{ g8 g e2.( |}
aa❺❼		= \relative c'{ d1) |}
aa❺❽		= \ss❺❽
aa❺❾		= \ss❺❾
aa❻❿		= \ss❻❿
aa❻❶		= \ss❻❶
aa❻❷		= \ss❻❷
aa❻❸		= \relative c''{ r4\fermata d8 g, g a16 b a8 e |}
aa❻❹		= \relative c'{ \time 2/4 d2~ |}
aa❻❺		= \relative c'{ \time 4/4 d1 |}
aa❻❻		= \ss❻❻
aa❻❼		= \ss❻❼
aa❻❽		= \ss❻❽
aa❻❾		= \relative c'{ d4 d8~ d c4~ c |}
aa❼❿		= \relative c'{ b1 |}

alto =   {  \global
  \aa❶to❸❻
  
  \aa❸❼	\aa❸❽		\aa❸❾
  \aa❹❿	\aa❹❶		\aa❹❷
  \aa❹❸	\aa❹❹		\aa❹❺
  \aa❹❻	\aa❹❼		\aa❹❽		\aa❹❾
  \aa❺❿	\aa❺❶		\aa❺❷
  \aa❺❸	\aa❺❹		\aa❺❺
  \aa❺❻	\aa❺❼		\aa❺❽
  \aa❺❾	\aa❻❿		\aa❻❶		\aa❻❷
  \aa❻❸	\aa❻❹		\aa❻❺
  \aa❻❻	\aa❻❼		\aa❻❽		\aa❻❾		\aa❼❿
}

tt❶to❷❿	= \repeat unfold 20 { r1 }
tt❷❶		= \relative c'{ a4. g8 fs4 a8 cs |}
tt❷❷		= \relative c'{ b8 b16 b b2. |}
tt❷❸		= \relative c'{ g4. g8 a4 cs8 e |}
tt❷❹		= \relative c'{ e8 d16 cs d4~ d8 d a fs |}
tt❷❺		= \relative c'{ g8 g  g4~ g8 g g g |}
tt❷❻		= \relative c'{ gs8 gs a4~ a8 a a a |}
tt❷❼		= \relative c'{ as8 as b2 a8 cs |}
tt❷❽		= \relative c'{ cs8 d b2.( |}
tt❷❾		= \relative c'{ a1) |}
tt❸❿		= \relative c'{ r4 a8 d, d e16 fs e8_\fermata d |}
tt❸❶		= \relative c'{ d2. d8( c) \bar"||" }
tt❸❷		= \relative c'{ \key bf\major b4. b8 b a g4 |}
tt❸❸		= \relative c{ f2. r8 d8 |}
tt❸❹		= \relative c{ c8 d ef f g4 a |}
tt❸❺		= \relative c{ f2. r4 |}
tt❸❻		= \relative c{ r2 r4 r8 bf |}
tt❸❼		= \relative c{ f8 f f bf f4. f16 f |}
tt❸❽		= \relative c'{ \tuplet 3/2{ c4 bf ef, } e bf' |}
tt❸❾		= \relative c'{ bf2( a4) r4 |}
tt❹❿		= r1
tt❹❶		= \relative c{ r2 r4 f8 f |}
tt❹❷		= \relative c{ ef8 ef ef ef ef8. ef16 f8 g |}
tt❹❸		= \relative c{ ef2. ef8 ef |}
tt❹❹		= \relative c{ d8 d d e fs g a c |}
tt❹❺		= \relative c'{ a4. g8 fs4 g8 g |}
tt❹❻		= \relative c'{ g2 c |}
tt❹❼		= \relative c'{ c8 d ef2. |}
tt❹❽		= r1
tt❹❾		= \relative c'{ \key g\major d4. c8 b4 g8 b |}
tt❺❿		= \relative c'{ c8 c16 c c2. |}
tt❺❶		= \relative c'{ c4. c8 c4 c8 fs, |}
tt❺❷		= \relative c'{ g8 g16 g g4 r8 b d d, |}
tt❺❸		= \relative c{ c8 c c4~ c8 c c c |}
tt❺❹		= \relative c{ cs8 cs d4~ d8 d d d |}
tt❺❺		= \relative c{ ds8 fs e2 g8 b |}
tt❺❻		= \relative c'{ e8 e c2.( |}
tt❺❼		= \relative c'{ b1) |}
tt❺❽		= \relative c'{ r4 d8 g, g a16 b a8_\fermata g |}
tt❺❾		= \relative c'{ g1 |}
tt❻❿		= r1
tt❻❶		= r1
tt❻❷		= r1
tt❻❸		= \relative c'{ r4\fermata d8 g, g a16 b a8 c |}
tt❻❹		= \relative c'{ \time 2/4 b2~ |}
tt❻❺		= \relative c'{ \time 4/4 b1 |}
tt❻❻		= r1
tt❻❼		= r1
tt❻❽		= \relative c{ r2 d4 d |}
tt❻❾		= \relative c{ d4 d8 d e4( g) |}
tt❼❿		= \relative c'{ g1\fermata |}

tenor =  {  \global
  \tt❶to❷❿
  \tt❷❶	\tt❷❷		\tt❷❸
  \tt❷❹	\tt❷❺		\tt❷❻
  \tt❷❼	\tt❷❽		\tt❷❾
  \tt❸❿	\tt❸❶		\tt❸❷
  \tt❸❸	\tt❸❹		
  \tt❸❺	\tt❸❻
  \tt❸❼	\tt❸❽		\tt❸❾
  \tt❹❿	\tt❹❶		\tt❹❷
  \tt❹❸	\tt❹❹		\tt❹❺
  \tt❹❻	\tt❹❼		\tt❹❽		\tt❹❾
  \tt❺❿	\tt❺❶		\tt❺❷
  \tt❺❸	\tt❺❹		\tt❺❺
  \tt❺❻	\tt❺❼		\tt❺❽
  \tt❺❾	\tt❻❿		\tt❻❶		\tt❻❷
  \tt❻❸	\tt❻❹		\tt❻❺
  \tt❻❻	\tt❻❼		\tt❻❽		\tt❻❾		\tt❼❿
}

bass = \relative c {
  \global
  % Music follows here.
  
}

verseOne = \lyricmode {
  \set stanza = "1."
  將 沈 重 負 擔 交 託 上 帝, 卸 全 部 煩 惱
  專 心 靠 主, 上 主 無 窮 力 量, 步 步 扶 持 呵 護, 日 日 輔
  導 牽 引; 上 帝 愛 寬 宏! 將 重 擔 卸 給 主, 信
  靠!
  
  將 沈 重 負 擔 交 託 上 帝, 卸 全 部 煩 惱
  專 心 靠 主, 上 主 無 窮 力 量, 步 步 扶 持 呵 護, 日 日 輔
  導 牽 引; 上 帝 愛 寬 宏! 
  將 重 擔 卸 給 主, 信 靠! 恩 主 的 應 許 確
  定, 即 使 地 老 天 荒 不
  變, 這 世 界 縱 有 困 難,
  然 而 主 應 許 賜 平 安. 神
  完 全 仁 慈, 無 限 愛 憐,
  怨 懟, 嫉 妒, 毒 恨, 狂 傲, 自 我, 無 情 誼, 仍 蒙
  神 赦 免, 珍 惜! 將 沈 重 負 擔 交 託 上 帝, 卸 全 部 煩 惱 專 心 靠 主, 上 主 無 
  窮 力 量, 步 步 扶 持 呵 護, 日 日 輔 導 牽 引; 上 帝 
  愛 寬 宏! 將 重 擔 卸 給 主, 信 
  靠! 
  將 重 擔 卸 給 主, 信 靠! 
  將 重 擔 卸 給 主, 信 靠! 
}

verseTwo = \lyricmode {
  \set stanza = "2."
  % Lyrics follow here.
  
}



rh❶	= \relative c''{ <a fs e d>4 q4 q4 q4 |}
rh❷	= \relative c''{ <a g d>4 q4 q4 q4 |}
rh❸	= \rh❶
rh❹	= \rh❷
rh❺	= \rh❶
rh❻	= \rh❷
rh❼	= \rh❶
rh❽	= \relative c''{ <a g d b>4 <g d b> q4 q4 |}
rh❾	= \relative c'{ <e cs a g>4 q4 q4 q4 |}
rh❶❿	= \relative c''{ <g d a>4 <fs d a> q4 <a d, cs> |}
rh❶❶	= \relative c'{ a8. b16 d g a d b2 |}
rh❶❷	= \relative c'{ b4 b16 cs e a e'2 |}
rh❶❸	= \relative c'{ cs4 e16 fs cs' e <d b d,>4 <cs fs, cs> |}
rh❶❹	= \relative c''{ <<{a8 b d4~ d8 a, b d}\\{<d b>1}>> |}
rh❶❺	= \relative c'{ cs8( d^~ <a' d, cs>2.) |}
rh❶❻	= \relative c''{ <a d, b>2 <d, b>2\fermata |}
rh❶❼	= \rh❶
rh❶❽	= \rh❷
rh❶❾	= \rh❸
rh❷❿	= \rh❹
rh❷❶	= \rh❺
rh❷❷	= \rh❽
rh❷❸	= \rh❾
rh❷❹	= \relative c''{ <g d a>4 <fs d a> q4 <a d,cs>4 |}
rh❷❺	= \relative c'{ a8. b16 d g a d b2 |}
rh❷❻	= \relative c'{ b4 b16 cs e a e'2 |}
rh❷❼	= \rh❶❸
rh❷❽	= \rh❶❹
rh❷❾	= \rh❶❺
rh❸❿	= \rh❶❻
rh❸❶	= \relative c'{ <d a g>4 q4 q4 q4 |}
rh❸❷	= \relative c'{ \key bf\major r1 |} 
rh❸❸	= \relative c'{ <f c bf>4 c16 f bf c <a f c>4 <bf f bf,> |}
rh❸❹	= \relative c'{ <ef bf g>4 <g ef bf> q4 <a f c> |}
rh❸❺	= \relative c'{ r4 bf16 c d f~ f4 c16 d f bf |}
rh❸❻	= \relative c'{ <<{ f8 g ef'16 d c bf a bf f bf f'4}\\{f,4 s2.}>> }
rh❸❼	= \rh❸❻
rh❸❽	= \relative c''{ <ef bf g ef>4 <c g ef c> <bf g d bf> <g d bf g> |}
rh❸❾	= \relative c''{ <c bf f c>4 ef,16 f bf ef <f c a f>2 |}
rh❹❿	= \relative c'{ <f ef bf>2 q2 |}
rh❹❶	= \relative c'{ <<{<f f,>1}\\{c4 bf8 a bf2}>> }
rh❹❷	= \relative c'{ <ef df bf af>2 q2 |}
rh❹❸	= \relative c'{ <<{<ef c>1}\\{bf2 af4 g}>> |}
rh❹❹	= \relative c'{ <<{d2 d8 e fs4}\\{c2 <c a>4 d4}>> }
rh❹❺	= \relative c'{ d4 g d8 g g a |}
rh❹❻	= \relative c''{ <d c g e>1 |}
rh❹❼	= \relative c''{ <<{d1}\\{<g, e>4 <a fs>2.}>> } 
rh❹❽	= \relative c'{ <e c>4 <fs d> <g e c> <a fs d> |}  
rh❹❾	= \relative c''{ \key g\major <d b a g>4 q4 q4 q4 |}
rh❺❿	= \relative c''{ <d c g e>4 <c g e> q4 q4 |}
rh❺❶	= \relative c''{ <a fs d c>4 q4 q4 q4 |} 
rh❺❷	= \relative c''{ <c g d>4 <b g d>4 q4 <e g, fs> |}
rh❺❸	= \relative c'{ d8. e16 g c d g e2 |}
rh❺❹	= \relative c'{ e4 e16 fs a d fs2 |}
rh❺❺	= \relative c'{ fs4 a16 b fs' a <g e g,>4 <fs b, fs> |}
rh❺❻	= \relative c''{ <<{d8 e g4~ g8 d, e g}\\{<g e>1}>> |}
rh❺❼	= \relative c'{ fs8( g^~ <d' g, fs>2.) |}
rh❺❽	= \relative c''{ <d g, e>2 <g, e>2\fermata |}
rh❺❾	= \relative c''{ <d b a g>4 q4 q4 q4 |}
rh❻❿	= \relative c''{ <d c g>4 q4 q4 q4 |}
rh❻❶	= \rh❺❾
rh❻❷	= \relative c''{ <<{d4. e8 c b g a}\\{g2 g4 g}>> }
rh❻❸	= \relative c''{ <d b a g>4~\fermata q4 <g, e>2 |}
rh❻❹	= \relative c''{ \time 2/4 r2 |}
rh❻❺	= \relative c'{ \time 4/4 r2 b8 g' fs d |}
rh❻❻	= \relative c'{ c8 g' d' c a d g fs |}
rh❻❼	= \relative c''{ d8 fs g a d2 |}
rh❻❽	= \relative c'{ <d c>1 |}
rh❻❾	= q1
rh❼❿	= \relative c'{ <d b a>1\fermata |} 
  
right =  {  \global \override Score.BarNumber  #'stencil  = #(make-stencil-circler 0.1 0.25 ly:text-interface::print) 
  \rh❶		\rh❷		\rh❸  
  \rh❹		\rh❺		\rh❻  
  \rh❼		\rh❽		\rh❾  
  \rh❶❿	\rh❶❶		\rh❶❷  
  \rh❶❸	\rh❶❹		\rh❶❺		\rh❶❻  
  \rh❶❼	\rh❶❽		\rh❶❾		\rh❷❿  
  \rh❷❶	\rh❷❷		\rh❷❸  
  \rh❷❹	\rh❷❺		\rh❷❻
  \rh❷❼	\rh❷❽		\rh❷❾
  \rh❸❿	\rh❸❶		\rh❸❷
  \rh❸❸	\rh❸❹
  \rh❸❺	\rh❸❻
  \rh❸❼	\rh❸❽		\rh❸❾
  \rh❹❿	\rh❹❶		\rh❹❷
  \rh❹❸	\rh❹❹		\rh❹❺
  \rh❹❻	\rh❹❼		\rh❹❽		\rh❹❾
  \rh❺❿	\rh❺❶		\rh❺❷
  \rh❺❸	\rh❺❹		\rh❺❺
  \rh❺❻	\rh❺❼		\rh❺❽
  \rh❺❾	\rh❻❿		\rh❻❶		\rh❻❷
  \rh❻❸	\rh❻❹		\rh❻❺
  \rh❻❻	\rh❻❼		\rh❻❽		\rh❻❾		\rh❼❿
}

lh❶	= r1
lh❷	= r1
lh❸	= \relative c,{ d4. a'8 fs' g a b |}
lh❹	= \relative c'{ a4. g8 fs e d e |}
lh❺	= \relative c{ a4. a8 d e a4 |}
lh❻	= \relative c'{ a4. b8 g fs d e |}
lh❼	= \relative c,{ d4. a'8 fs'2 |}
lh❽	= \relative c,{ d4. a'8 d g a4 |}
lh❾	= \relative c,{ d4. a'8 e'2 |}
lh❶❿	= \relative c,{ d4. a'8 fs'4 <a d, fs,>4 |}
lh❶❶	= \relative c'{ <g d g,>1 |}
lh❶❷	= \relative c{ <e gs,>4 <a e a,>2. |}
lh❶❸	= \relative c{ <fs as,>4 <cs' fs, b,> <b fs b,> <a fs a,> |}
lh❶❹	= \relative c'{ <g d g,>1 |}
lh❶❺	= \relative c'{ <a d, fs,>1 |}
lh❶❻	= \relative c'{ <g b, e,>2 <g a,>\fermata |}
lh❶❼	= \relative c,{ d4. a'8 fs' g a b |}
lh❶❽	= \relative c'{ a4. g8 fs e d e |}
lh❶❾	= \relative c{ <<{a4. a8 d e a4}\\{d,,1}>> }
lh❷❿	= \relative c'{ <<{a4. b8 g fs d e}\\{d2 d4 a}>> }
lh❷❶	= \relative c,{ d4. a'8 fs'2 |}
lh❷❷	= \relative c,{ d4. a'8 d g a4 |}
lh❷❸	= \relative c,{ d4. a'8 e'2 |}
lh❷❹	= \lh❶❿
lh❷❺	= \lh❶❶
lh❷❻	= \lh❶❷
lh❷❼	= \lh❶❸
lh❷❽	= \lh❶❹	
lh❷❾	= \lh❶❺
lh❸❿	= \lh❶❻
lh❸❶	= \relative c,{ fs4. a8 <d d,>4 q4 |}
lh❸❷	= \relative c{ \key bf\major bf16 f' bf c d f d c bf c bf f g, ef' bf' ef |}
lh❸❸	= \relative c,{ f16 c' f bf~ bf4 <f f,>8 <ef ef,> d,16 bf' d f |}
lh❸❹ 	= \relative c,{ c16 g' c ef g8 ef f,16 ef' g ef f, c' f8 |}
lh❸❺	= \relative c,{ bf16 f' d' f f4 d,16 d' f bf~ bf4 |}
lh❸❻	= \relative c'{ <bf g c,>2 <c bf d,> |}
lh❸❼	= \lh❸❻
lh❸❽	= \relative c{ <ef ef,>4 q4 <e e,>4 q4 |}
lh❸❾	= \relative c,{ f16 c' f bf~ bf4 <c f, bf,>2 |} 
lh❹❿	= \relative c'{ <g c,>2 c,,8 g' ef' bf' |}
lh❹❶	= \relative c{ <d d,>1 |}
lh❹❷	= \relative c{ <f bf,>2 ef,8 bf' ef4 |}
lh❹❸	= \relative c,{ af8 ef' af2. |}
lh❹❹	= \relative c'{ <<{g2 fs8 g a4}\\{a,?2 d4 c}>> }
lh❹❺	= \relative c'{ <a b,>2 <g b,>2 |}
lh❹❻	= \relative c'{ <c e, a,>1 |}
lh❹❼	= \relative c'{ <c d,>2 d,4 d, |}
lh❹❽	= \relative c'{ <g d>2 d,8 d' c'4 |}
lh❹❾	= \relative c{ \key g\major g4. d'8 b'2 |}
lh❺❿	= \relative c{ g4. d'8 g c d4 |}
lh❺❶	= \relative c{ g4. d'8 a'2 |}
lh❺❷	= \relative c{ g4. d'8 b'4 <d g, b,> |}
lh❺❸	= \relative c{ c8 g' c d g2 |}
lh❺❹	= \relative c'{ <a cs,>4 d,8 a' d2 |}
lh❺❺	= \transpose d g \lh❶❸
lh❺❻	= \transpose d g \lh❶❹
lh❺❼	= \transpose d g \lh❶❺
lh❺❽	= \transpose d g \lh❶❻
lh❺❾	= \transpose d g \lh❶❼
lh❻❿	= \transpose d g \lh❶❽
lh❻❶	= \transpose d g \lh❶❾
lh❻❷	= \relative c'{ <c e,>2 q4 q4 |}
lh❻❸	= \relative c'{ <d b d,>4~\fermata q4 <c d,>2 |}
lh❻❹	= \relative c{ \time 2/4 r2 |}
lh❻❺	= \relative c{ \time 4/4 g4. d'8~ d2 |}
lh❻❻	= \relative c'{ <g e a,>2 <d' c e,> |}
lh❻❼	= \relative c''{ <a g b,>1 |}
lh❻❽	= \relative c'{ <g e a,>1 |}
lh❻❾	= \relative c'{ <g e a, d,>1 |}
lh❼❿	= \relative c'{ <g d g,>1\fermata |}

left =  {  \global
  \lh❶		\lh❷		\lh❸
  \lh❹		\lh❺		\lh❻
  \lh❼		\lh❽		\lh❾
  \lh❶❿	\lh❶❶		\lh❶❷
  \lh❶❸	\lh❶❹		\lh❶❺		\lh❶❻
  \lh❶❼	\lh❶❽		\lh❶❾		\lh❷❿
  \lh❷❶	\lh❷❷		\lh❷❸
  \lh❷❹	\lh❷❺		\lh❷❻
  \lh❷❼	\lh❷❽		\lh❷❾
  \lh❸❿	\lh❸❶		\lh❸❷
  \lh❸❸	\lh❸❹
  \lh❸❺	\lh❸❻
  \lh❸❼	\lh❸❽		\lh❸❾
  \lh❹❿	\lh❹❶		\lh❹❷
  \lh❹❸	\lh❹❹		\lh❹❺
  \lh❹❻	\lh❹❼		\lh❹❽		\lh❹❾
  \lh❺❿	\lh❺❶		\lh❺❷
  \lh❺❸	\lh❺❹		\lh❺❺
  \lh❺❻	\lh❺❼		\lh❺❽
  \lh❺❾	\lh❻❿		\lh❻❶		\lh❻❷
  \lh❻❸	\lh❻❹		\lh❻❺
  \lh❻❻	\lh❻❼		\lh❻❽		\lh❻❾		\lh❼❿
}

choirPart = \new ChoirStaff << 
  \new Staff \with { 
    midiInstrument = "choir aahs"
    instrumentName = \markup \center-column { "S." "A." }
    shortInstrumentName = \markup \center-column { "S." "A." }
  } <<
    \new Voice = "soprano" { \voiceOne \soprano }
    \new Voice = "alto" { \voiceTwo \alto }
  >>
  \new Lyrics \with {
    \override VerticalAxisGroup #'staff-affinity = #CENTER
  } \lyricsto "soprano" \verseOne
  \new Lyrics \with {
    \override VerticalAxisGroup #'staff-affinity = #CENTER
  } \lyricsto "soprano" \verseTwo
  \new Staff \with {
    midiInstrument = "choir aahs"
    instrumentName = \markup \center-column { "T." "B." }
    shortInstrumentName = \markup \center-column { "T." "B." }
  } <<
    \clef bass
    \new Voice = "tenor" { \voiceOne \tenor }
    \new Voice = "bass" { \voiceTwo \bass }
  >>
>>

pianoPart = \new PianoStaff \with {
  instrumentName = "Pno."
  shortInstrumentName = "Pno."
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
>>

\score {
  <<
    \choirPart
    \pianoPart
  >>
  \layout { indent = 0
     \context { 
        \RemoveEmptyStaffContext
        \override VerticalAxisGroup #'remove-first = ##t
   }
  }
  \midi { }
}

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user