On 30.03.2018 01:21, Karlin High wrote:
On 3/29/2018 3:16 PM, Ali Cuota wrote:
in IMSLP the big e-minor prelude from Nikolaus Bruhns exists in pdf,
with a reference to Mutopiaproject. In Mutopia, Bruhns ist not
(anymore) in the composers list.


I would be happy to have the source file if possible.

Archive.org is an amaaaaazing service!

<https://web.archive.org/web/20051111074129/http://www.mutopiaproject.org:80/cgibin/make-table.cgi?Composer=BruhnsN>

So is convert-ly: version 1.3.117->2.19.80 worked pretty well.
And then I did a run of Frescobaldi’s (python-ly’s) auto-formatting, and corrected a whole lot of things manually, but just in terms of coding:
\new instead of \context
use \voiceXXX commands
remove unnecessary overrides
use \tempo instead of \mark "Adagio" &c.
And lastly I took the single liberty of correcting g natural in m.12 to g sharp – I’m quite certain that that’s a typo.

What I did not fix:
Unnecessary R R R instead of R*x
Unnecessarily complicated durations like R1*24/16

That would be an important step before recontributing to Mutopia.

Also, I made no changes to staff distribution &c.

Best, Simon
%%%%%
%
% Nicolaus Bruhns: Prelude and Fugue in E Minor
%
% My apologies to anyone who has the misfortune of having to read and try to
% make sense of this source file. My quest to duplicate the polyphony of the
% original score has made for an ugly mess of many different voices. The
% idea in general is this:
%
% 	1. bass.1 and treble.1 are the upstem voices on their respective staves,
% 	   and bass.2 and treble.2 are the downstem voices. Most of the time.
% 	2. bass.3 and treble.3 are used when a third voice is present.
% 	3. all tempo markings and time signature changes are in "global"
%
% If someone knows of a better way to achieve the same effect, please let me
% know!
%
% Other notes:
% 	1. When the paper is set to "letter," lilypond makes terrible use of the
% 	   page, leaving a big space across the bottom (it seems there's just
% 	   barely too little space to put another system)
%	2. Lilypond doesn't know how to auto-beam funny time signatures like
%	   18/16, and when I input it I didn't know how to set up custom
%	   auto-beaming, so I put in all the beams for those sections explicitly
%	3. [In its current form, compiling this score results in several "too
%	   many notes for rest collision" and "too many colliding rests"
%	   warnings. They're not resolved because I don't know how to resolve
%	   them. I think perhaps I read once that it's possible to manually
%	   position rests, but I don't know how to do it.]
%          (fixed sja 2018)
%
% -- Joshua Haberman <jos...@haberman.com>, March 2001
%
%%%%%

\header {
  title =       "Prelude and Fugue in E Minor"
  source =      "Peters Urtext"
  composer =    "Nicolaus Bruhns (1665-1697)"
  enteredby =   "jmh"

  copyright = "Public Domain"
  footer = "Mutopia-2000/12/23-56"
  maintainer = "jos...@haberman.com"
  lastupdated = "2000/Dec 23"

}

\version "2.19.80"

\include "english.ly"

global =  {
  \key e \minor
  \time 4/4
  \skip 1*5
  \time 18/16
  \skip 1*5*18/16
  \time 4/4
  \skip 1*2
  \time 12/8
  \skip 1*3*12/8
  \time 4/4
  \skip 1*5
  \bar "||"
  \skip 1*60
  \bar "||"
  \skip 1*3
  s2 s4 \tempo "Adagio" s4 |
  \skip 1*4
  s2 s4 \tempo "Adagio" s4 |
  \time 12/8
  \skip 1*5*12/8
  \time 6/8
  \skip 1*17*6/8
  \time 3/2
  \skip 1*8*3/2
  \tempo "Presto"
  \skip 1*6*3/2
  \time 4/4
  s2 \tempo "Adagio" s2 |
  \skip 1*5
  \time 12/8
  \skip 1*23*12/8
  \time 24/16
  \skip 1*7*24/16
  \bar "|."
}

treble.1 = \new Voice = "one"  \relative c'' {
  \oneVoice
  R1 |
  R |
  r2 \voiceOne r8 e16 ds e ds e ds |
  e ds e ds e ds e ds e ds e ds e ds e ds |
  e1 |
  %%5
  r4. r16  e[ b cs d e ] d4. |
  c8[ b16 a gs a ] b4. ~  b16[ a b gs a b ] |
  r  c[ a g fs e ] r  a[ b c b a ] b4. |
  r16  b[ c d! c b ]  c[ b cs d cs b ]  cs[ cs d e d cs ] |
  d[ cs ds e ds cs ]  ds[ ds e fs e ds ] e8 r r |
  %%10
  r8 g, gs4 a b16 c d8 |
  c4 gs a \oneVoice r32 gs a b c d e f |
  e4 a, 8 f'4 a,8 e' d c d c b |
  c4. d c8 b a f' e d |
  e d c d c b c b a b a gs |
  %%15
  \voiceOne a2 r4 r8 a16 ~ a64 g fs e |
  r4 r8 b'16 ~ b64 a g fs r8 e'8 ~ e4 |
  r4 r16 e fs g e2 ~ |
  e4. g32 fs e16 ds4. ds8 |
  e1 |
  %%20
  e,2 b' |
  as a |
  gs g |
  fs d' |
  cs b ~ |
  %%25
  b as |
  b r4 g8 c |
  fs, fs fs fs b4 r8 b8 |
  e, e e e a a a a |
  ds,4 ~ ds16 ds e fs
  b,4
  b' |
  %%30
  a4. b8 c2 |
  fs,1 |
  g8 a16 b g8. fs16 fs4 r4 |
  r fs' cs2 |
  e b4 ~ b8. as32 b |
  %%35
  cs4 ~ cs16 b as gs fs4 b |
  as2 b |
  cs1 |
  d4 ds e g,8. a16 |
  b2 r4 fs' |
  %%40
  e2. a,4 |
  b2 ~ b8 b16 a g fs e8 |
  a2 g4. g32 fs g a |
  b2 ~ b8. c16 a8. g16 |
  g2 ~ g16 a g a b4 |
  %%45
  fs2 ~ fs8 fs16 b fs8. gs16 |
  a2 ~ a8. g16 fs g a8 |
  ds,2 e ~ |
  e ds |
  e r |
  %% 50
  R1*5 |
  %% 55
  b'2 e |
  ds d |
  cs c |
  b g' |
  fs e ~ |
  %% 60
  e ds |
  e4 e2 d8 g |
  cs, cs cs cs fs4 ~ fs16. e32 ds cs b16 |
  b8 b b b e e e16. d32 cs b as16 |
  as4 r r b |
  %% 65
  as2 b |
  cs1 |
  d4 ds e4. d16 e |
  fs2 ~ fs4. fs8 |
  g2 ~ g4. fs8 |
  %% 70
  fs4 ~ fs16 e ds cs r4 e ~ |
  e ds e4. fs8 |
  g4 ~ g16 a g fs fs4. e16 fs |
  e2 ~ e4 s8 e |
  fs2 ~ fs4 s8 e |
  %% 75
  e2 ~ e4 s8 < b d > |
  d4. cs16 d e2 |
  e d4. d32 cs b16 |
  cs1 |
  b |
  %% 80 - double bar
  R1
  r 4 r8. fs16 b4 r |
  b8 r b r b r  b[ r16 a ~ ] |
  a2 ~ a8 a16 b a8. g16 |
  g4. ~ g32 a g fs g16 b, ds e \oneVoice r4 |
  %% 85
  r4 r8. e16 a4.^\mordent e16^\prall d |
  r4 r8. e16 a4^\mordent r |
  a8 r a r a r  a[ r16 g ~ ] |
  g2 ~ \voiceOne g8 g16 a g8. fs16 |
  r8. d'16 a8 b8. c16 b8 a4 a8 d8. e16 d8 |
  %% 90
  d4 g,8 c8. d16 c8 c4 fs,8 b8. c16 b8 |
  b8. e16 a,8 a8. g16 a8 b4 g8 d'8. e16 d8 |
  d4 g,8 c8. d16 c8 c4 fs,8 b8. c16 b8 |
  b8. e16 a,8 a8. g16 a8 b4 r8 r4 r8 |
  r32 b d b r b d b r b d b r a ds a r a ds a r a ds a |
  %% 95
  r b e b    r b e b    r b e b    r b fs' b,  r b fs' b,  r b fs' b, |
  r b g' b,  r b g' b,  r b g' b,  r c fs c    r c fs c    r c fs c |
  r b e b r b e b r b e b r a ds a r a ds a r a ds a |
  r b e b r b e b r b e b r a d! a r a d a r a d a |
  r g c g r g c g r g c g r fs b fs r fs b fs r fs b fs |
  %% 100
  r e b' e, r e b' e, r e b' e, r e as e r e as e r e as e |
  r ds b' ds, r ds b' ds, r ds b' ds, r g b g r g b g r g b g |
  r fs b fs r fs b fs r fs b fs r b e b r b e b r b e b |
  r b ds b r b ds b r b ds b r b g' b, r b g' b, r b g' b, |
  r b fs' b, r b fs' b, r b fs' b, r b e b r b e b r b e b |
  %% 105
  r b ds b r b ds b r b ds b r b ds b r b ds b r b ds b |
  r b e b r b e b r b e b r b e b r b e b r b e b |
  r b ds b r b ds b r b ds b r b ds b r b ds b r b ds b |
  r b e b r b e b r b e b r b e b r b e b r b e b |
  r b ds b r b ds b r c e c r b e b r b e b r b ds b |
  %% 110
  < b e >8 s8 s s4. |
  \oneVoice R1*3/2 |
  R1*3/2 |
  R1*3/2 |
  r2 \voiceOne d ds |
  %% 115
  \oneVoice r \voiceOne e es |
  \oneVoice r \voiceOne fs1 |
  \oneVoice r2 \voiceOne fs g |
  \oneVoice r \voiceOne ds1 |
  \oneVoice r2 \voiceOne fs fs |
  %% 120
  g1 ~ g4. fs16 g |
  fs1 ~ fs4. e16 fs |
  g1 ~ g4. fs16 g |
  fs1 ~ fs4. e16 fs |
  g1 ~ g4. fs16 g |
  %% 125
  fs4 r r16 < ds b > r16 < ds b > r16 < ds b > r16 < ds b > |
  r < e b > r < e b > r < e b > r < e b >
  r < e b > r < e b > r < e b > r < e b > |
  r < as, e' > r < as e' > r < as e' > r < as e' >
  r < a e' > r < a e' > r < a e' > r < a e' > |
  r < b e > r < b e > r < b e > r < b e >
  r < cs e > r < cs e > r < cs e > r < cs e > ~ |
  e4 ds r r8 < cs e > |
  %% 130
  e2 ds |
  e4 b8 g8. fs16 e8 r r e' ~ e ds4^\prall |
  e8 b cs d!4. r8 r d cs fs4 |
  d8 ds4 e4. r8 r e fs4 fs16. e64 fs |
  g8. fs16 e8 fs b, r r r d cs4 fs8 |
  %% 135
  d4. cs8. d16 cs d e8. as,16 b8 d cs8. d16 |
  b8 e ds e4 r8 r r b a16 b b8. a16 |
  g4. fs4 r8 r r g cs,! fs8. e16 |
  ds8. e16 fs8 g4 r8 r r g fs4 g8 |
  a g fs g fs8. e16 e4 r8 r4. |
  %% 140
  r4. r8 r e' ds8. cs16 b8 e8. fs16 g8 |
  fs4 fs8 ds8. cs16 b8 e4. ~ e4 e8 |
  cs8. b16 a8 d4. ~ d4 d8 b8. a16 g8 |
  c4. b8. a16 b8 a8. b32 c d8 c8. b16 c8 |
  b4 r8 r4. d8. c16 b8 a4 d8 |
  %% 145
  b8. cs16 b cs d4. a'8. g16 fs8 e4 a8 |
  fs8. e16 fs8 g4 r8 r2. |
  r r8 b,8 cs d4 r8 |
  fs8. e16 d8 cs4 fs8 d ds4 e r8 |
  r r g fs8. g16 fs g a8 e fs g fs8. g16 |
  %% 150
  e4 \oneVoice r8 r4. r8 r \voiceOne e32 fs g16 fs8. g16 fs g |
  a8 e fs g fs8. e16 e4 \oneVoice r8 r4. |
  r8 r \voiceOne g fs8. g16 fs g a8 e fs g fs4 |
  \oneVoice R1*12/8 |
  s4. r r8. \voiceOne ds \oneVoice r4. |
  %% 155
  r  \voiceOne ds16[ e fs ] ds8. e2. |
  \oneVoice r8. r16 r b  e8[ d!16 ]  b[ e, ] r16 r8. r16 r b'  e8[ d16]  \voiceOne b[ e, d'] |
  c8.[ b ]  a8.[ ~ a16 a gs ]  a8[ e'16 ]
  c16.[ b32 a16 ~ ]  a8[ e'16 ]  c16.[ b32 a16 ~ ] |
  a8[ e'16 ]  c16.[ b32 a16 ~ ]  a8[ e'16 ]
  c16.[ b32 a16 ~ ]  a8[ e'16 ]  c16.[ b32 a16 ]  gs8.[ a] |
  b4. r16 r e,  a16.[ b32 a16 ] r r b  d16.[ e32 d16 ]  c8.[ b ] |
  r16.  b32[ e16 ]  ds16.[ cs32 ds16]  e16.[ b32 e16]  ds16.[ cs32 ds16]
  e16.[ b32 e16]  ds16.[ cs32 ds16] e4.^\fermata |




}

treble.2 = \new Voice = "two"  \relative c'' {
  \voiceTwo

  s1 |
  s |
  s2 r16 b8 a16 b a b a |
  b a b a b a b a b a b a b a b a |
  b1 |
  %%5
  r16  e[ d c b a ] gs4. ~  gs16[ fs gs e fs gs ] |
  a4 r8 r16  e[ b cs d e ] d4. |
  e ds r16  fs[  g a g fs ] |
  g8 gs4  a2. ~ |
  a g8 r r |
  %%10
  r8 e e4 e2 |
  e4 d c s |
  s1*12/8 |
  s1*12/8 |
  s1*12/8 |
  %%15
  e2 e8 e ~ e16 e8. |
  ds8 ds ~ ds4 e2 |
  r2 r4 cs' |
  b1 |
  < b g >
  %%20
  s1 |
  s |
  s |
  s |
  s |
  %%25
  s |
  b,2 e |
  ds d |
  cs c |
  b g' |
  %%30
  fs e ~ |
  e ds |
  e8 b e2 d8 g |
  cs, cs cs cs fs4. fs8 |
  b, b b b e e e e |
  %%35
  as,4 r r fs' |
  e4. fs8 g2 |
  e fs ~ |
  fs e |
  r4 b' fs2 |
  %%40
  a e |
  fs4 ~ fs16 e ds cs b4 e |
  ds2 e |
  fs1 ~ |
  fs4 ~ fs16 b, cs ds e2 ~ |
  %%45
  e4. ds16 e ds2 |
  e2. r4 |
  \tweak staff-position -6 R1 |
  \tweak staff-position -8 R |
  e2 b' |
  %%50
  as a |
  gs g |
  fs d' |
  cs b ~ |
  b as |
  %% 55
  b4 g2 g8 c |
  fs, fs fs fs b4. b8 |
  e, e e e a a a a |
  d,4 r r b'8 e |
  a,4. b8 c4 ~ c16 b a g |
  %% 60
  fs2. b8. a16 |
  g8 a16 b g8. fs16 fs4 b |
  r fs cs2 |
  e b |
  cs4 ~ cs16
  \change Staff = bass \voiceOne
  b as gs fs4
  \change Staff = treble \voiceTwo
  fs' |
  %% 65
  e4. fs8 g2 |
  e fs ~ |
  fs g4 b8 g |
  a1 |
  g2 e4 a |
  %% 70
  fs r b2 ~ |
  b4 b2 a4 |
  b1 ~ |
  b2 ~ b4 r8 a |
  a2 ~ a4 r8 g |
  %% 75
  fs2 ~ fs4 r8 fs |
  fs2 e |
  fs gs |
  fs1 |
  fs |
  %% 80 - double bar
  r4 r8. fs16 b4. fs16 e |
  ds fs b, ds fs b,
  \change Staff = bass \voiceOne
  b,8
  \change Staff = treble \voiceTwo
  r4 r8 r32 g'' fs e |
  ds16 fs b, cs ds fs b, cs ds fs b, cs ds fs b,8 |
  r2 r16 fs'8. ~ fs16 fs fs fs |
  e4. ~ e32 fs e ds e8 r s4 |
  %% 85
  s1 |
  s |
  s |
  s2 r16 e8. ~ e16 e e e |
  d4 r8 d4 r8 d4 r8 r r < fs a > |
  %% 90
  < e g b >4 r8 r r < e g > < d fs a >4 r8 r r < d g > |
  e4 e8 d4. d4 r8 r r < fs a > |
  < e g b >4 r8 r r < e g > < d fs a >4 r8 r r < d g > |
  e4. d d4 s8 s4 s8 |
  g8 g g fs fs fs |
  %% 95
  g g g ds ds ds |
  e e e a a a |
  g g g fs fs fs |
  g g g fs fs fs |
  e e e d d d |
  %% 100
  c c c cs cs cs |
  b b b e e e |
  ds ds ds g g g |
  fs fs fs e e e |
  ds ds ds g g g |
  %% 105
  fs fs fs fs fs fs |
  g g g g g g |
  fs fs fs fs fs fs |
  g g g g g g |
  fs fs g fs fs fs |
  %% 110
  < e g > \oneVoice r r r4. |
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  s2 \voiceTwo fs fs |
  %% 115
  s e b' |
  s < fs as >1 |
  s2 fs e |
  s < fs b >1 |
  s2 b b |
  %% 120
  b1. ~ |
  b1. ~ |
  b1. ~ |
  b1. ~ |
  b1. ~ |
  %% 125
  b4 r r16 fs r fs r fs r fs |
  r e r e r e r e r e r e r e r e |
  r e r e r e r e r e r e r e r e |
  r gs r gs r gs r gs r g r g r g r g ~ |
  g4 fs r r8 g |
  %% 130
  < fs b >1 |
  <e g >4 r8 r4. r2. |
  r8 r e d8. cs16 b8 r r b' ~ b as4 |
  b4 fs8 g4. r8 r g a b4 |
  b4. ~ b4 r8 r r fs g fs4 ~ |
  %% 135
  fs4. g8 fs4 e4. fs4 e8 |
  ds g fs g4 r8 r r g fs4. |
  e8 b cs d!4 r8 r2. |
  \change Staff = bass \voiceOne
  r8 r b g8. fs16 e8
  \change Staff = treble \voiceTwo
  r8 r e' ~ e ds4 |
  e4. ~ e8 ds4 b s8 s4. |
  %% 140
  r8 r b' g8. fs16 e8 r r b' b4. ~ |
  b4 r8 r r b b8. cs16 d8 cs4 r8 |
  r r a a8. b16 c8 b4 r8 r r g |
  g4. ~ g ~ g4 r8 r r fs |
  g4 s8 s4. r2. |
  %% 145
  r8 r g fs8. e16 d8 r r d' ~ d cs4 |
  d4. ~ d8. c!16 b8 d8. c16 b8 a4 d8 |
  g,4 c8 fs,4 b8 g4. fs4 r8 |
  r r fs g fs4 ~ fs8 fs4 g r8 |
  r r e' e ds4 e4. e8 ds4 |
  %% 150
  e4 s8 s4. s8 s e8 ~ e ds4 |
  e4. ~ e8 ds4 e s8 s4. |
  s8 s e8 ~ e ds4 e4. ~ e8 ds4 |
  s1*12/8 |
  ds16[ e fs ]  ds[ cs b ] s4. s8. b s4. |
  %% 155
  s4. r8. r16  cs[ b ] b2. |
  s4. s s s8. s16 s b ~ |
  b8[ a16 ~ ]  a[ fs gs ] r16 r e d8. e r e r |
  e r e r r4.  e8[ d16] \change Staff = bass \voiceOne
  c16.[ b32 a16 ] \change Staff = treble \voiceTwo |
  r16 r b  d16.[ e32 d16 ]  c8.[ e ] e4. ~  e8.[ fs ] |
  gs[ < fs a > < gs b > < fs a > ] < gs b >[ < fs a > ] < gs b >4.


}

treble.3 = \new Voice = "three"  \relative c' {
  s1*5 |
  %%5
  s1*5*18/16 |
  %%10
  s1 |
  \voiceThree s4 e e s |
  s1*3*12/8 |
  %%15
  s1 |
  \voiceFour s4 r16 fs8. r16 b8. ~ b4 |
  s1 |
  r2 r4 a |
  %% 20
  \skip 1*57
  \voiceThree
  b2 ~ b8. d16 cs d b8 |
  as2 b _~ |
  b as |
  b1 |
  %% 80 - double bar
  \skip 1*9
  \voiceFour
  fs4 s8 g4 s8 fs4 s8 s s \voiceThree b |
  %% 90
  s4 s8 s s a s4 s8 s s s |
  \voiceFour g4. ~ g4 fs8 s4 s8 s s \voiceThree b |
  s4 s8 s s a s4 s8 s s s |
  \voiceFour g4. ~ g4 fs8 s4 s8 s4 s8 |
  \skip 1*17*6/8
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  %% 115
  \voiceThree
  s2 b b |
  s b s |
  s s s |
  s2 b b |
  s s s |
  %% 120
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  %% 125
  s1*3/2 |
  s1 |
  s1 |
  s1 |
  s1 |
  %% 130
  b2 s |
  s1 |
  \skip1*17*12/8
  s2. s8 b4 b s8 |
  \skip1*5*12/8
  \skip1*5*24/16
  s2. \voiceFour gs8.[ b ~ ]  b8[ a16 ] \voiceThree  a16.[ gs32 a16]


}

bass.1 = \new Voice = "four"  \relative c' {
  \oneVoice
  r8 e16 e' ds fs, gs d' cs a c fs, g b e, c' |
  fs, a ds, b' e, g b, gs' a c, cs as' b d, ds b' |
  e, c' cs e, fs d' ds fs, \voiceOne g8. fs16 g fs g fs |
  g fs g fs g fs g fs g fs g fs g fs g fs |
  g1 |
  %%5
  \clef bass
  \oneVoice R1*18/16 |
  s1*18/16 |
  \voiceOne c,4. a4  b16[ c ] b4. ~ |
  b  a16[ gs a b a gs ] a4. ~ |
  a2. b8 r r |
  %%10
  r8 b b4 c b |
  a b a s |
  s1*12/8 |
  s1*12/8 |
  s1*12/8 |
  %%15
  c2 r16 c8. ~ c4 |
  r16 b8. ~ b4 r b |
  \clef treble
  s2 s4 g' ~ |
  g4. e32 fs g16 fs2 |
  e1
  %%20
  \oneVoice
  R1 |
  R |
  R |
  R |
  R |
  %%25
  R |
  R |
  R |
  R |
  R |
  %%30
  R |
  R |
  \clef bass
  e,2 b' |
  as a |
  gs g |
  %%35
  fs d' |
  cs b ~ |
  b as |
  b4. a8 g4 g8 c |
  fs, fs fs fs b4. b8 |
  %%40
  e, e e e a a a a |
  ds,4 r4 b'2 |
  a4. b8 c!2 |
  b1 ~ |
  b |
  %%45
  c2 b |
  e,4. fs16 gs a2 |
  fs b4. a16 g |
  fs2. b8. a16 |
  g8 a16 b g8. fs16 fs4 fs' |
  %% 50
  e2. ~ e16 e fs e |
  ds4 d ~ d16 cs d e d8. cs16 |
  cs4 ~ cs 16 b as gs fs4 fs' |
  g2 e4 ~  e16[ e d32 cs b cs ] |
  d4. e16 fs cs4 ~ cs16 e ds e |
  %% 55
  ds4 e c!4.a8 |
  b2 gs4 ~ gs8. fs32 gs |
  a2 fs4 ~ fs8. e32 fs |
  g4 ~ g16 a g fs e4 r |
  R1 |
  %% 60
  R |
  R |
  R |
  R |
  \voiceTwo R |
  %% 65
  \oneVoice R |
  R |
  b'2 e |
  ds d |
  cs c |
  %% 70
  b g' |
  fs e ~ |
  e d ~ |
  d ~ d4 r8 c |
  b2 ~ b4 r8 b |
  %% 75
  cs2 ~ cs4 r8 b |
  b1 |
  cs2 b4. b32 cs d16 |
  cs2. ~ cs16 e ds e |
  \voiceOne ds1 |
  %% 80
  R1 |
  \voiceTwo R |
  \oneVoice R |
  \clef treble
  r4 r16 g fs32 e ds cs b4 ~ b16 b b b |
  b2 ~ b8 r \clef bass b32 e g, a b e, fs g |
  %% 85
  R1 |
  cs16 e, a cs, e a a,8 r4 r8 g''32 fs e d |
  cs16 e a, b cs e a, b cs e a, b cs e a,8 |
  r4 r8 e'32 d cs b a4 ~ a16 a a a |
  a4 r8 g4 r8 a4 r8 r r b |
  %% 90
  b4 r8 r r a a4 r8 r r g |
  g4 a8 a4. g4 r8 r r < b fs > |
  < g b >4 r8 r r < a c > a4 r8 r r g |
  g4 a8 \voiceTwo a4 a8 g4 \oneVoice r8 r4 r8 |
  R1*6/8 |
  %% 95
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  %% 100
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  %% 105
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  %% 110
  R1*6/8 |
  \clef treble
  r2 \voiceOne g' gs |
  \oneVoice r \voiceOne a as |
  \oneVoice r \voiceOne b1 |
  s1*3/2 |
  %% 115
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  s1*3/2 |
  s2 ds, ds |
  %% 120
  e1 ~ e4. ds16 e |
  ds1 ~ ds4. cs16 ds |
  e1 ~ e4. ds16 e |
  ds1 ~ ds4. cs16 ds |
  e1 ~ e4. ds16 e |
  %% 125
  ds4 s4 s s |
  s1
  s
  s
  s
  %% 130
  s
  s1*12/8
  s1*12/8
  s1*12/8
  s1*12/8
  %% 135
  s1*12/8
  s1*12/8
  s1*12/8
  s1*12/8
  s2. g,4 s8 s4. |
  %% 140
  s2. s8 s ds' e4. |
  ds4 s8 s s ds e4. ~ e4 s8 |
  s s cs d4. ~ d4 s8 s s b |
  c8. d16 e8 d4. ~ d4 s8 s s d |
  d4 d8 b8. a16 g8 \clef treble \oneVoice r8 r g' ~ g fs4 |
  %% 145
  g r8 r4. r2. |
  r8 r d b8. a16 g8 r8 r g' ~ g fs4 ~ |
  fs8 e4 ~ e8 ds4 e4. b4 r8 |
  r r b e cs4 b8 \clef bass r16 c b a g8. fs16 e8 |
  \clef treble r r \voiceOne b'' c b4 a4. b ~ |
  %% 150
  b4 r8 r4. \oneVoice r8 r \voiceOne b c b4 |
  a4. b4. ~ b4 r8 r4. |
  \oneVoice r8 r \voiceOne b c b4 a4. b |
  \oneVoice R1*12/8
  r4.  ds,16[ e fs ]  ds[ cs b ] r8. fs' r4. |
  %% 155
  ds16[ e fs ]  ds[ cs b ] r8. fs' e2. |
  s4. s8. s16 s \clef bass \oneVoice b16  e8[ d16 ]  b16[ e, ] r16 r8. \clef treble r16 r \voiceOne e' |
  e8.[ d c b ] c r c r |
  c r c r \clef bass \voiceTwo r2. |
  \voiceOne gs4.  a8.[ c ] b4.  a16.[ b32 c16 ]  fs,8[ b16 ] |
  %% 160
  e1*24/16

}

bass.2 = \new Voice = "five"  \relative c' {
  \voiceTwo
  s1 |
  s |
  s2 e ~ |
  e1 |
  e |
  %%5
  \clef bass
  s1*18/16 |
  \oneVoice r16  e[ d c b a ] gs4. ~  gs16[ fs gs e fs gs ] |
  \voiceTwo a4. fs ds |
  e2. ~  e16[ e fs g fs e ] |
  fs[ e fs g fs e ]  fs[ fs g a g fs ] e8 r r |
  %%10
  r8 e e4 e2 |
  e e4 \oneVoice r32 e fs gs a b c d |
  c4. d c8 b a f' e d |
  e4 a,8 f'4 a,8 e' d c d c b |
  c b a f' e d e d c d c b |
  %%15
  \voiceTwo a2 r8 r16 a ~ a4 |
  r8 r16 fs ~ fs4 r8 r16 gs ~ \voiceFour gs gs8. |
  \oneVoice r2 r4 \clef treble \voiceTwo cs8 e |
  b1 |
  b
  %%20
  \skip 1*59
  r4 r8 r32 cs b as b16 es, fs cs ds b b'8^\mordent
  %% 80
  \skip 1*9
  \skip 1*4*12/8
  \voiceOne s4 s8 r c ~ c16 c b4 s8 s4 s8 |
  \skip 1*17*6/8
  \voiceTwo s2 e d |
  s c cs |
  s ds1 |
  \clef bass
  \oneVoice r2 b b |
  r b b |
  r cs1 |
  r2 b b |
  r b1 |
  \clef treble
  \voiceTwo r2 b b |
  b1. ~ |
  b1. ~ |
  b1. ~ |
  b1. ~ |
  b1. ~ |
  %% 125
  b4 \oneVoice r
  \clef bass
  r16 b r b r b r b |
  r b r b r b r b r b r b r b r b |
  r e, r e r e r e r e r e r e r e |
  r b' r b r b r b r e r e r e r e |
  b2 r4 r8 e, |
  %% 130
  b'1 |
  b4 r8 r4. r2. |
  R1*12/8 |
  r8 r b g8. fs16 e8 r r e' ~ e ds4 |
  e8. fs16 g8 fs4 r8 r r b, e cs4 ~ |
  %% 135
  cs b8 ~ b as4 b4. ~ b8 as4 |
  b4. ~ b4 r8 r2. |
  r8 r e, d8. cs16 b8 r r b' ~ b as4 |
  \voiceTwo b ds,8 e4 r8 r r \oneVoice c' a b4 |
  c8 b a b b,4  \voiceTwo e \oneVoice r8 r r e' |
  %% 140
  ds8. cs16 b8 r4. r8 r \voiceTwo b b4. ~ |
  b4 r8 r r b b8. a16 gs8 a4 r8 |
  r r a a8. g!16 fs8 g4 r8 r r g |
  g4. ~ g a4 r8 r r a |
  g4 r8 r4. s2. |
  %% 145
  s s |
  s s |
  s s |
  s s |
  s8 s e' a fs4 e4. ~ e8 fs4 |
  %% 150
  g b8 g8. fs16 e8 s s e a fs4 |
  e4. ~ e8 fs4 g b8 g8. fs16 e8 |
  s s e a fs4 e4. ~ e8 fs4 |
  s1*12/8
  s4. s s8. b, s4. |
  %% 155
  s4. s8. b b2. |
  s4. s s s8. s16 s b |
  a2. ~ a8. s a s |
  a s a s s2. |
  r2. r8.  gs[ a ds, ] |
  %% 160
  < e b' >1

}

bass.3 = \new Voice = "six"  \relative c {
  s1*5 |
  %%5
  s1*2*18/16 |
  \voiceThree s4.*2 fs4. |
  s1*2*18/16 |
  %%10
  s1*2 |
  s1*3*12/8 |
  %%15
  s1 |
  \voiceTwo s2 s4 r8 e |
  s1 * 3
  %%20
  \skip 1*60
  %% 80
  \skip 1*9
  \skip 1*5*12/8
  \skip 1*17*6/8
  \voiceThree
  s2 s e' |
  s e e |
  s fs1
}

pedal = \new Voice = "seven"  \relative c, {
  \clef bass
  R1 |
  R |
  r2 e ~ |
  e1 ~ |
  e |
  %% 5
  e1*18/16 ~ |
  e1*18/16 ~ |
  e1*18/16 ~ |
  e1*18/16 ~ |
  e1*18/16 |
  %%10
  e8 e' d4 c gs |
  a1 ~ |
  a1. ~ |
  a ~ |
  a ~ |
  %%15
  a1 ~ |
  a2 gs |
  r r4 as |
  b1 |
  e,1 |
  %%20
  R1 |
  R |
  R |
  R |
  R |
  %%25
  R |
  R |
  R |
  R |
  R |
  %%30
  R |
  R |
  R |
  R |
  R |
  %%35
  R |
  R |
  R |
  b'2 e |
  ds d |
  %%40
  cs c |
  b g' |
  fs e ~ |
  e ds |
  e g, |
  %% 45
  a b |
  \voiceTwo c1 |
  b ~ |
  b |
  \oneVoice e,4 e'2 d8 g |
  %% 50
  cs, cs cs cs fs4. fs8 |
  b, b b b e e e e |
  as,4. fs'8 d4 b |
  e4. fs8 g2 |
  fs1 |
  %% 55 |
  b,4 r r2 |
  R1 |
  R |
  R |
  R |
  %% 60
  R |
  e2 b' |
  as a |
  gs g |
  fs d' |
  %% 65
  cs b ~ |
  b as |
  b4. a!8 g4. c8 |
  fs, fs fs fs b4. b8 |
  e, e e e a a a a |
  %% 70
  ds,4 r r e |
  b2 c |
  b2. b'8 d |
  gs, gs gs gs c4 r8 c |
  ds, ds ds ds g4 r8 g |
  %% 75
  as, as as as d4 r8 d |
  g1 |
  fs2 es |
  fs1 |
  b,
  %% 80 - double bar
  R1 |
  R |
  R |
  ds2 ~ ds4 ~ ds16 ds ds ds |
  e2 ~ e8 r r4 |
  %% 85
  cs4 r r2 |
  R1 |
  R |
  cs2 ~ cs4 ~ cs16 cs cs cs |
  d4 r8 g,4 r8 d'4 r8 r r b |
  %% 90
  e4 r8 r r a, d4 r8 r r g, |
  c,4 cs8 d4. g4 r8 r r b |
  e4 r8 r r a, d4 r8 r r g, |
  c,4 cs8 d4. g4 r8 r4 r8 |
  R1*6/8 |
  %% 95
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  R1*6/8 |
  %% 100
  R1*6/8 |
  b8 r r b r r |
  b r r b r r |
  b r r b r r |
  b r r b r r |
  %% 105
  b' r r a r r |
  g r r a r r |
  \voiceTwo b, \oneVoice r r a r r |
  g r r a r r |
  b r a b r b |
  %% 110
  e, r r r4.
  R1*3/2
  R1*3/2
  R1*3/2
  r2 b'' a |
  %% 115
  r g gs |
  r fs1 |
  r2 ds e |
  r b1 |
  r2 b' a |
  %% 120
  g fs e |
  b b' a |
  g fs e |
  b b' a |
  g fs e |
  %% 125
  b4 r a'8 a a a |
  gs gs gs gs g g g g |
  cs, cs cs cs c c c c |
  b b b b as as as as |
  b2 r4 r8 as |
  %% 130
  b1 |
  e,4 r8 r4. r2. |
  R1*12/8 |
  R1*12/8 |
  r8 r e' d8. cs16 b8 r r b' ~ b as4 |
  %% 135
  b d,8 e fs4 g4. fs |
  b,8 r b g8. fs16 e8 r r e' ~ e ds4 |
  e r8 r4. r2. |
  R1*12/8 |
  r2. r8 r b' g8. fs16 e8 |
  %% 140
  r2. r8 r b' g8. fs16 e8 |
  b4 r8 r r a' gs8. fs16 e8 a4 r8 |
  r r g! fs8. e16 d8 g4 r8 r r f |
  e8. d16 c8 g'4 g,8 d'4 r8 r r d, |
  g4 r8 r4. r2. |
  %% 145
  R1*12/8 |
  R1*12/8 |
  r2. r8 r e' d8. cs16 b8 |
  r8 r b' ~ b as4 b b,8 e4 r8 |
  r r g, a b4 c4. b |
  %% 150
  e,4 r8 r4. r8 r g a b4 |
  c4. b e,4 r8 r4. |
  r8 r g a b4 c4. b |
  R1*12/8 |
  r2. a4. r |
  %% 155
  r r8. a gs2. |
  r2. r4. r8. r16 r gs |
  a2. ~ a8. r b r |
  c r a r r2. |
  e1*24/16 ~ |
  %% 160
  e1*24/16
}


pedalextra = \new Voice = "eight"  \relative c' {
  \skip 1*5
  \skip 1*5*18/16
  \skip 1*2
  \skip 1*3*12/8
  \skip 1*5

  \skip 1*26
  \voiceOne
  r2 r4 a ~ |
  a2 g4. a8 |
  b1 |
  \skip 1*31
  %% 80
  \skip 1*9
  \skip 1*5*12/8
  \skip 1*13*6/8
  b8
}

\score {
  <<
    \new PianoStaff <<
      \new Staff = "treble" <<
        \global
        \treble.1
        \treble.2
        \treble.3
      >>
      \new Staff = "bass" <<
        \global
        \bass.1
        \bass.2
        \bass.3
      >>
    >>
    \new Staff = "pedal" <<
      \global
      \pedal
      \pedalextra
    >>
  >>
  }
}

%{
convert-ly (GNU LilyPond) 2.19.80  convert-ly: Processing `'...
Applying conversion: 1.3.120, 1.3.122, 1.3.136, 1.3.138, 1.3.138,
1.3.139, 1.3.141, 1.3.144, 1.3.145, 1.3.146, 1.3.147, 1.3.148, 1.5.33,
1.5.38, 1.5.40, 1.5.49, 1.5.52, 1.5.56, 1.5.58, 1.5.59, 1.5.62,
1.5.67, 1.5.68, 1.5.71, 1.5.72, 1.6.5, 1.7.1, 1.7.2, 1.7.3, 1.7.4,
1.7.5, 1.7.6, 1.7.10, 1.7.11, 1.7.13, 1.7.15, 1.7.16, 1.7.17, 1.7.18,
1.7.19, 1.7.22, 1.7.23, 1.7.24, 1.7.28, 1.9.0, 1.9.1, 1.9.2, 1.9.3,
1.9.4, 1.9.5, 1.9.6, 1.9.7, 1.9.8, 2.1.1, 2.1.2, 2.1.3, 2.1.4, 2.1.7,
2.1.10, 2.1.11, 2.1.12, 2.1.13, 2.1.14, 2.1.15, 2.1.16, 2.1.17,
2.1.18, 2.1.19, 2.1.20, 2.1.21, 2.1.22, 2.1.23, 2.1.24, 2.1.25,
2.1.26, 2.1.27, 2.1.28, 2.1.29, 2.1.30, 2.1.31, 2.1.33, 2.1.34,
2.1.36, 2.2.0, 2.3.1, 2.3.2, 2.3.4, 2.3.6, 2.3.8, 2.3.9, 2.3.10,
2.3.11, 2.3.12, 2.3.16, 2.3.17, 2.3.18, 2.3.22, 2.3.23, 2.3.24,
2.3.25, 2.4.0, 2.5.0, 2.5.1, 2.5.2, 2.5.3, 2.5.12, 2.5.13, 2.5.17,
2.5.18, 2.5.21, 2.5.25, 2.6.0, 2.7.0, 2.7.1, 2.7.2, 2.7.4, 2.7.6,
2.7.10, 2.7.11, 2.7.12, 2.7.13, 2.7.14, 2.7.15, 2.7.22, 2.7.24,
2.7.28, 2.7.29, 2.7.30, 2.7.31, 2.7.32, 2.7.32, 2.7.36, 2.7.40, 2.9.4,
2.9.6, 2.9.9, 2.9.11, 2.9.13, 2.9.16, 2.9.19, 2.10.0, 2.11.2, 2.11.3,
2.11.5, 2.11.6, 2.11.10, 2.11.11, 2.11.13, 2.11.15, 2.11.23, 2.11.35,
2.11.38, 2.11.46, 2.11.48, 2.11.50, 2.11.51, 2.11.52, 2.11.53,
2.11.55, 2.11.57, 2.11.60, 2.11.61, 2.11.62, 2.11.64, 2.12.0, 2.12.3,
2.13.0, 2.13.1, 2.13.4, 2.13.10, 2.13.16, 2.13.18, 2.13.20, 2.13.27,
2.13.29, 2.13.31, 2.13.36, 2.13.39, 2.13.40, 2.13.42, 2.13.44,
2.13.46, 2.13.48, 2.13.51, 2.14.0, 2.15.7, 2.15.9, 2.15.10, 2.15.16,
2.15.17, 2.15.18, 2.15.19, 2.15.20, 2.15.25, 2.15.32, 2.15.39,
2.15.40, 2.15.42, 2.15.43, 2.16.0, 2.17.0, 2.17.4, 2.17.5, 2.17.6,
2.17.11, 2.17.14, 2.17.15,  Not smart enough to convert #(ly:set-
option 'old-relative). Please refer to the manual for details, and
update manually. convert-ly: error: Error while converting Stopping at
last successful rule   convert-ly: warning: There was 1 error.
%}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to