1 %%1:43 PM Tuesday, January 18, 2022
  2 %% Yukio Yoshida
  3 \version "2.22.1"
  4 #(set-default-paper-size "letter")
  5 #(set-global-staff-size 18)
  6 \include "mourner-cv.ly"
  7 \book{
  8 \bookpart{ %%#2
  9 \header {
 10  dedication = " To the person who will depart. "
 11  title = "Mourner"
 12  %%subtitle = #(string-append "LilyPond version " (lilypond-version))
 13  subtitle = " "
 14  subsubtitle = \markup{\center-column {
 15                    "soprano; C clef on 1st line,       alto; C clef on 3rd line."
 16                    "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 17  %%arranger = \markup{ \italic "Oct 29, 2012" }
 18  arranger = \markup{ \italic "Yukio Yoshida" }
 19  composer = \markup{ "Yukio Yoshida" }
 20  poet = " "
 21  opus = "Op.71(Nov 19, 2012)"
 22  meter = "Largo"
 23  copyright = "public Domain"
 24 }
 25 %% get sheet music ---------------------------------------------------------------
 26 \score {
 27          <<
 28            %% \context ChoirStaff = "FourPartStaffaddchorus" <<
 29         \context StaffGroup <<
 30 %%% soprano
 31            \new Voice = "sopranoS" { \clef soprano \key e\major \time 3/2
 32                    \set Staff.fontSize = #-4
 33                    \override Staff.StaffSymbol #'staff-space = #(magstep -4)
 34                    \override Staff.StaffSymbol #'thickness = #(magstep -4)
 35                    \set Staff.instrumentName = \markup {
 36                                                 \teeny \with-color #red "S-sol(two)" }
 37                                                              \sopranoS }
 38                         \new Lyrics = "mainSL" \lyricsto "sopranoS" { \sopranoSL }
 39                         \new Lyrics = "mainSL" \lyricsto "sopranoSII" { \sopranoSLII }
 40            \new Voice = "soprano" { \clef soprano \key e\major \time 3/2
 41                         \set Staff.instrumentName = "soprano"
 42                                                               \soprano }
 43            \new Lyrics = "mainSL" \lyricsto "sopranoI-tutti-Syllable-m" { \sopranoL }
 44            \new Lyrics = "mainSL" \lyricsto "sopranoII-tutti-Lyrics" { \sopranoLII }
 45            \new Lyrics = "mainSL" \lyricsto "sopranoIII-tutti-Lyrics" { \sopranoLIII }
 46            \new Lyrics = "mainSL" \lyricsto "sopranoIV-tutti-Lyrics" { \sopranoLIV }
 47 
 48 %%% alto
 49            \new Voice = "altoS" { \clef alto \key e\major \time 3/2
 50                    \set Staff.fontSize = #-4
 51                    \override Staff.StaffSymbol #'staff-space = #(magstep -4)
 52                    \override Staff.StaffSymbol #'thickness = #(magstep -4)
 53                    \set Staff.instrumentName = \markup {
 54                                                 \teeny \with-color #red "A-sol(two)" }
 55                                                           \altoS }
 56                         \new Lyrics = "mainAL" \lyricsto "altoS" { \altoSL }
 57                         \new Lyrics = "mainAL" \lyricsto "altoSII" { \altoSLII }
 58            \new Voice = "alto" { \clef alto \key e\major \time 3/2
 59                         \set Staff.instrumentName = "alto   "
 60                                                               \alto }
 61            \new Lyrics = "mainAL" \lyricsto "altoI-tutti-Syllable-m" { \altoL }
 62            \new Lyrics = "mainAL" \lyricsto "altoII-tutti-Lyrics" { \altoLII }
 63            \new Lyrics = "mainAL" \lyricsto "altoIII-tutti-Lyrics" { \altoLIII }
 64            \new Lyrics = "mainAL" \lyricsto "altoIV-tutti-Lyrics" { \altoLIV }
 65 
 66 %%% tenor
 67            \new Voice = "tenorS" { \clef tenor \key e\major \time 3/2
 68                    \set Staff.fontSize = #-4
 69                    \override Staff.StaffSymbol #'staff-space = #(magstep -4)
 70                    \override Staff.StaffSymbol #'thickness = #(magstep -4)
 71                    \set Staff.instrumentName = \markup {
 72                                                 \teeny \with-color #red "T-sol(two)" }
 73                                                           \tenorS }
 74                         \new Lyrics = "mainTL" \lyricsto "tenorS" { \tenorSL }
 75                         \new Lyrics = "mainTL" \lyricsto "tenorSII" { \tenorSLII }
 76            \new Voice = "tenor" { \clef tenor \key e\major \time 3/2
 77                         \set Staff.instrumentName = "tenor  "
 78                                                               \tenor }
 79            \new Lyrics = "mainTL" \lyricsto "tenorI-tutti-Syllable-m" { \tenorL }
 80            \new Lyrics = "mainTL" \lyricsto "tenorII-tutti-Lyrics" { \tenorLII }
 81            \new Lyrics = "mainTL" \lyricsto "tenorIII-tutti-Lyrics" { \tenorLIII }
 82            \new Lyrics = "mainTL" \lyricsto "tenorIV-tutti-Lyrics" { \tenorLIV }
 83 
 84 %%% bass
 85            \new Voice = "bassS" { \clef bass \key e\major \time 3/2
 86                    \set Staff.fontSize = #-4
 87                    \override Staff.StaffSymbol #'staff-space = #(magstep -4)
 88                    \override Staff.StaffSymbol #'thickness = #(magstep -4)
 89                    \set Staff.instrumentName = \markup {
 90                                                 \teeny \with-color #red "B-sol(two)" }
 91                                                           \bassS }
 92                         \new Lyrics = "mainBL" \lyricsto "bassS" { \bassSL }
 93                         \new Lyrics = "mainBL" \lyricsto "bassSII" { \bassSLII }
 94            \new Voice = "bass" { \clef bass \key e\major \time 3/2
 95                         \set Staff.instrumentName = "bass   "
 96                                                               \bass }
 97            \new Lyrics = "mainBL" \lyricsto "bassI-tutti-Syllable-m" { \bassL }
 98            \new Lyrics = "mainBL" \lyricsto "bassII-tutti-Lyrics" { \bassLII }
 99            \new Lyrics = "mainBL" \lyricsto "bassIII-tutti-Lyrics" { \bassLIII }
100            \new Lyrics = "mainBL" \lyricsto "bassIV-tutti-Lyrics" { \bassLIV }
101                                             >>
102 
103            %%\context PianoStaff = "PianoStaff" <<
104            %%\new Voice = "piano" { \clef treble \key \major \time
105            %%             \set Staff.instrumentName = "piano  " \pianoUP }
106            %%\new Voice = "piano" { \clef bass \key \major \time
107            %%             \set Staff.instrumentName = "piano  " \pianoDown }
108            %%                                   >>
109 
110          >>
111 
112   \layout {
113             \context { \RemoveEmptyStaffContext
114                         %% When "\time 3/2" don't "r1." must use "R1."
115                      }
116            }
117 }
118 %% get midi music ----------------------------------------------------------------
119 \score {
120          <<
121 %%% soprano
122            \new Staff { \clef soprano \key e\major \time 3/2 \tempo 4 = 46
123                          \set Staff.midiInstrument = "pad 2 (warm)"
124                                          \unfoldRepeats       \sopranoSM }
125            \new Staff { \clef soprano \key e\major \time 3/2 \tempo 4 = 46
126                          \set Staff.midiInstrument = "pad 2 (warm)"
127                                          \unfoldRepeats       \sopranoM }
128 
129 %%% alto
130            \new Staff { \clef alto \key e\major \time 3/2 \tempo 4 = 46
131                          \set Staff.midiInstrument = "pad 2 (warm)"
132                                          \unfoldRepeats          \altoSM }
133            \new Staff { \clef alto \key e\major \time 3/2 \tempo 4 = 46
134                          \set Staff.midiInstrument = "pad 2 (warm)"
135                                          \unfoldRepeats          \altoM }
136 
137 %%% tenor
138            \new Staff { \clef tenor \key e\major \time 3/2 \tempo 4 = 46
139                          \set Staff.midiInstrument = "pad 2 (warm)"
140                                          \unfoldRepeats          \tenorSM }
141            \new Staff { \clef tenor \key e\major \time 3/2 \tempo 4 = 46
142                          \set Staff.midiInstrument = "pad 2 (warm)"
143                                          \unfoldRepeats       \tenorM }
144 
145 %%% bass
146            \new Staff { \clef bass \key e\major \time 3/2 \tempo 4 = 46
147                          \set Staff.midiInstrument = "pad 2 (warm)"
148                                          \unfoldRepeats          \bassSM }
149            \new Staff { \clef bass \key e\major \time 3/2 \tempo 4 = 46
150                         \set Staff.midiInstrument = "pad 2 (warm)"
151                                          \unfoldRepeats          \bassM }
152 
153            %%\new Staff { \clef treble \key \major \time \tempo 4 =
154            %%             \set Staff.midiInstrument = "acoustic grand"
155            %%                                \unfoldRepeats       \pianoUPm }
156            %%\new Staff { \clef bass \key \major \time \tempo 4 =
157            %%             \set Staff.instrumentName = "acoustic grand"
158            %%                                \unfoldRepeats     \pianoDownm }
159          >>
160 
161    \midi { tempoWholesPerMinute = #(ly:make-moment 46 4) }
162 }
163 %%%%%% Text part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
164 \markup { " " }
165 \markup { " " }
166 \pageBreak
167 \markup { " " }
168 \markup { " " }
169 \markup { " " }
170 \markup { " " }
171 \markup { \column { \line {
172 About location; \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
173 \line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
174 \markup { " " }
175 \markup { \vspace #3 }
176 \markup { \italic \with-color #blue "Coll'8va(or coll'8, and 8va)" %
177 is an abbreviation for \italic "coll ottava" meaning \bold "\"with the octave.\"" }
178 %%%% Example; treble %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
179 \markup { \hspace #6 \raise #6
180  \score { \new Staff { \VoiceColorBlue { \clef treble \key c\major \time 4/4
181                 \set Staff.fontSize = #-4
182                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
183                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
184                 \set Staff.ottavation = #"coll'8va"
185                   c'4^\markup { \large "For example" }
186                   d' e' f' } }
187          \layout { indent = 0.00\mm line-width = 40.00\mm }
188                    }
189           %%%%%%%%%
190            \raise #6
191  \score { \new Staff { \clef treble \key c\major \time 4/4
192                 \set Staff.fontSize = #-4
193                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
194                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
195            <c' c''>4^\markup { \huge "   " }
196                     _\markup { \large "is played:" \hspace #3 }
197            <d' d''> <e' e''> \stemUp <f' f''> }
198          \layout { indent = 10\mm line-width = 40.00\mm }
199                    }
200 }
201 \markup { \hspace #6 \raise #4
202  \score { \new Staff { \VoiceColorBlue { \clef treble \key c\major \time 4/4
203                 \set Staff.fontSize = #-4
204                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
205                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
206                 \set Staff.ottavation = #"coll'8va"
207                 \ottava #-1
208                   c'4
209                   d' e' f' } }
210          \layout { indent = 0.00\mm line-width = 40.00\mm }
211                    }
212           %%%%%%%%%
213            \raise #4
214  \score { \new Staff { \clef treble \key c\major \time 4/4
215                 \set Staff.fontSize = #-4
216                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
217                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
218            <c' c''>4^\markup { \huge "   " }
219                     _\markup { \large "is played:" \hspace #3 }
220            <d' d''> <e' e''> \stemUp <f' f''> }
221          \layout { indent = 10.00\mm line-width = 40.00\mm }
222                    }
223 }
224 %%%% Example; bass %%%%%%%%%%%%%%%%%%%%%%%%
225 \markup { \hspace #6 \raise #4
226   \score { \new Staff { \VoiceColorBlue { \clef bass \key c\major \time 4/4
227                 \set Staff.fontSize = #-4
228                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
229                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
230                 \set Staff.ottavation = #"coll'8va"
231                   c,4
232                   d, e, f, } }
233          \layout { indent = 0.00\mm line-width = 40.00\mm }
234                    }
235           %%%%%%%%%
236            \raise #4
237  \score { \new Staff { \clef bass \key c\major \time 4/4
238                 \set Staff.fontSize = #-4
239                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
240                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
241            <c, c>4^\markup { \huge "   " }
242                   _\markup { \large "is played:" \hspace #3 }
243            <d, d> <e, e> \stemUp <f, f> }
244          \layout { indent = 10.00\mm line-width = 40.00\mm }
245                    }
246 }
247 \markup { \hspace #6 \raise #4
248   \score { \new Staff { \VoiceColorBlue { \clef bass \key c\major \time 4/4
249                 \set Staff.fontSize = #-4
250                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
251                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
252                 \set Staff.ottavation = #"coll'8va"
253                 \ottava #-1
254                   c,4
255                   d, e, f, } }
256          \layout { indent = 0.00\mm line-width = 40.00\mm }
257                    }
258           %%%%%%%%%
259            \raise #4
260  \score { \new Staff { \clef bass \key c\major \time 4/4
261                 \set Staff.fontSize = #-4
262                 \override Staff.StaffSymbol #'staff-space = #(magstep -4)
263                 \override Staff.StaffSymbol #'thickness =#(magstep -4)
264            <c, c>4^\markup { \huge "   " }
265                   _\markup { \large "is played:" \hspace #3 }
266            <d, d> <e, e> \stemUp <f, f> }
267          \layout { indent = 10.00\mm line-width = 40.00\mm }
268                    }
269 }
270 \markup { " " }
271 \markup { \vspace #4 }
272 \markup { \column { \line { \italic \with-color #red "About Clusters;" \hspace #3
273 \with-color #red " Groups of notes a major or minor second apart that are played simultaneously." }
274 \line { \hspace #6 \italic " (A cluster indicatea a continuous range of pitches to be played)" }
275 } }
276 \markup { " " }
277 %%\markup { \vspace #4 }
278 \markup { " " }
279 \markup { \vspace #2 }
280 \markup { \line {\bold "Summary;" Vocal Words} }
281 \markup { \hspace #30 \bold "Soprano" and \bold "Alto" \hspace #20 \bold "Tenor" and \bold "Bass" }
282 \markup { " " }
283 \markup {%%column * 2
284 \fill-line { \italic
285  \column {
286  \line {
287    \column {
288 %% \line { \bold "Soprano" and \bold "Alyo" }
289 "Dómine;"
290 "Dóna éis réquiem; semptérnam."
291 "sempitérnam."
292 "Dómine."
293 " "
294 "et lux perpétua luceat éis,"
295 "Sálva me, fons pietátis."
296 " "
297 "Lacrimósa dies illa,"
298 "Oro súpplex et acclinis,"
299 "Pie Jésu Dómine,"
300 " "
301 "Dóna éis, Dóna éis, réquiem."
302 "Amen."
303             }
304 \hspace #6
305    \column {
306       \column {
307 %% \line { \bold "Tenor" and \bold "Bass" }
308 "Réquiem ætérnam dóna éis, Dómine:"
309 "sempitérnam."
310 " "
311 "et lux perpétua luceat éis,"
312 "Sálva me, fons pietátis."
313 " "
314 "Lacrimósa dies illa,"
315 "Oro súpplex et acclinis,"
316 "Pie Jésu Dómine,"
317 " "
318 "Dóna éis, Dóna éis, réquiem."
319 "Amen."
320             } }
321         }
322 }}}
323 \markup { \vspace #2 }
324 \markup { \hspace #83 \italic "Latin; from Réquiem." }
325 
326 
327 
328 
329 
330 
331 }%% End \bookpart #2
332 }%% close \book {
333 %% ----- To here, Finish all. -----------------
334 %% Latin;
335 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
336 %% Soprano %%%%%%%%%%%%%%%%%%
337 %% Dómine;
338 %% Dóna éis réquiem; semptérnam.
339 %% sempitérnam.
340 %% Dómine.
341 %%
342 %% et lux perpétua luceat éis,
343 %% Sálva me, fons pietátis.
344 %% 
345 %% Lacrimósa dies illa,
346 %% Oro súpplex et acclinis,
347 %% Pie Jésu Dómine,
348 %%
349 %% Dóna éis, Dóna éis, réquiem.
350 %% Amen.
351 %%
352 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
353 %% Alto %%%%%%%%%%%%%%%%%%%%%
354 %% Dómine
355 %% Dóna éis réquiem; sempitérnam.
356 %% sempitérnam.
357 %% Dómine.
358 %%
359 %% et lux perpétua luceat éis,
360 %% Sálva me, fons pietátis.
361 %%
362 %% Lacrimósa dies illa,
363 %% Oro súpplex et acclinis,
364 %% Pie Jésu Dómine,
365 %%
366 %% Dóna éis, Dóna éis, réquiem.
367 %% Amen.
368 %%
369 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
370 %% Tenor %%%%%%%%%%%%%%%%%%%%%%
371 %% Réquiem ætérnam dóna éis, Dómine:
372 %% sempitérnam.
373 %%
374 %% et lux perpétua luceat éis,
375 %% Sálva me, fons pietátis.
376 %%
377 %% Lacrimósa dies illa,
378 %% Oro súpplex et acclinis,
379 %% Pie Jésu Dómine,
380 %%
381 %% Dóna éis, Dóna éis, réquiem.
382 %% Amen.
383 %%
384 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
385 %% Bass %%%%%%%%%%%%%%%%%%%%%
386 %% Réquiem ætérnam dóna éis, Dómine:
387 %% sempitérnam.
388 %%
389 %% et lux perpétua luceat éis,
390 %% Sálva me, fons pietátis.
391 %%
392 %% Lacrimósa dies illa,
393 %% Oro súpplex et acclinis,
394 %% Pie Jésu Dómine,
395 %%
396 %% Dóna éis, Dóna éis, réquiem.
397 %% Amen.
398 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
399