author: Isaac David <isacdaavid@at@isacdaavid@dot@info>

More info at https://isacdaavid.info/log/pachelbels-canon-piano-transcription

INSTRUCTIONS: i won't be duplicating the sources at Mutopia except
under popular demand. instead, you can apply this patch to the
contents of the Lilypond ZIP (version 2015/Sep/02) at
http://www.mutopiaproject.org/cgibin/piece-info.cgi?id=2047

place the original folder and this file side by side, then run the
`patch` program:

    patch -p0 < 'Canone_per_tre_violini_e_basso_(piano_transcription).patch'

this will create a new folder with extra files. then there you can run
lilypond on piano_transcription.ly, or

    make canon_per_3_violini_e_basso_piano_transcription

END OF INSTRUCTIONS

diff -ruN orig/canon_per_3_violini_e_basso.ly new/canon_per_3_violini_e_basso.ly
--- orig/canon_per_3_violini_e_basso.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/canon_per_3_violini_e_basso.ly	2015-09-02 06:41:57.000000000 -0500
@@ -0,0 +1,57 @@
+\version "2.18.2"
+
+#(set-global-staff-size 18)
+
+\include "header.ily"
+
+\include "violin_one.ily"
+\include "violin_two.ily"
+\include "violin_three.ily"
+\include "violoncello.ily"
+
+\score {
+  <<
+    \context StaffGroup = strings <<
+      \new Staff = violinI \with {
+        midiInstrument = #"violin"
+        instrumentName = \markup {
+          \center-column { "Violin I"  }
+        }
+   %     shortInstrumentName = #"Vl.I"
+      }
+      \violinone
+
+      \new Staff = violinII \with {
+        midiInstrument = #"violin"
+        instrumentName = \markup {
+          \center-column {"Violin II" }
+        }
+  %      shortInstrumentName = #"Vl.II"
+      }
+      \violintwo
+      
+      \new Staff = violinIII \with {
+        midiInstrument = #"violin"
+        instrumentName = \markup {
+          \center-column { "Violin III" }
+        }
+%        shortInstrumentName = #"Vl.III"
+      }
+      \violinthree 
+
+      \context Staff = violoncello \with {
+        midiInstrument = #"cello"
+        instrumentName = \markup {
+          \center-column { "Violoncello" }
+        }
+ %       shortInstrumentName = #"Vc."
+      } <<
+        \clef "bass"
+	\violoncello 
+      >>
+    >>
+>>
+
+\include "paper.ily"
+\include "midi.ily"
+}
diff -ruN orig/header.ily new/header.ily
--- orig/header.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/header.ily	2017-12-05 19:37:44.142700000 -0600
@@ -0,0 +1,25 @@
+\version "2.18.2"
+
+\header {
+ mutopiatitle = "Canon per 3 Violini e Basso"
+ mutopiacomposer = "PachelbelJ"
+ mutopiainstrument = "3 Violins, Cello"
+ date = "1694"
+ source = "IMSLP"
+ style = "Baroque"
+ license = "Creative Commons Attribution 4.0"
+ maintainer = "Michael Fischer v. Mollard"
+ maintainerEmail = "konfusator@gmail.com"
+ title = " Canone per 3 Violini e Basso"
+ composer = "Johann Pachelbel (1653-1706)"
+
+ footer = "Mutopia-2015/09/02-2047"
+ copyright =  \markup { \override #'(baseline-skip . 0 ) \right-column { \sans \bold \with-url #"http://www.MutopiaProject.org" { \abs-fontsize #9  "Mutopia " \concat{ \abs-fontsize #12 \with-color #white \char ##x01C0 \abs-fontsize #9 "Project " } } } \override #'(baseline-skip . 0 ) \center-column { \abs-fontsize #11.9 \with-color #grey \bold { \char ##x01C0 \char ##x01C0 } } \override #'(baseline-skip . 0 ) \column { \abs-fontsize #8 \sans \concat { " Typeset using " \with-url #"http://www.lilypond.org" "LilyPond " \char ##x00A9 " " 2015 " by " \maintainer " " \char ##x2014 " " \footer } \concat { \concat { \abs-fontsize #8 \sans { " " \with-url #"http://creativecommons.org/licenses/by/4.0/" "Creative Commons Attribution 4.0 International License " \char ##x2014 " free to distribute, modify, and perform" } } \abs-fontsize #13 \with-color #white \char ##x01C0 } } }
+ tagline = ##f
+}
+
+\layout {
+  indent = 20.0 \mm
+  short-indent = 10.0 \mm
+  \pointAndClickOff
+}
diff -ruN orig/Makefile new/Makefile
--- orig/Makefile	1969-12-31 18:00:00.000000000 -0600
+++ new/Makefile	2017-12-05 22:18:24.005340961 -0600
@@ -0,0 +1,36 @@
+LILYPOND=lilypond
+COMMON_FILES = violin_common.ily header.ily midi.ily paper.ily
+
+all: canon_per_3_violini_e_basso violin_one_part violin_two_part violin_three_part violoncellopart canon_per_3_violini_e_basso_piano_transcription
+
+canon_per_3_violini_e_basso: canon_per_3_violini_e_basso.pdf
+
+violin_one_part: violin_one_part.pdf
+
+violin_two_part: violin_two_part.pdf
+
+violin_three_part: violin_three_part.pdf
+
+violoncellopart: violoncellopart.pdf
+
+canon_per_3_violini_e_basso_piano_transcription: canon_per_3_violini_e_basso_piano_transcription.pdf
+
+canon_per_3_violini_e_basso.pdf: canon_per_3_violini_e_basso.ly $(COMMON_FILES) violin_one.ily violin_two.ily violin_three.ily violoncello.ily
+	$(LILYPOND) canon_per_3_violini_e_basso.ly
+
+violin_one_part.pdf: violin_one_part.ly violin_one.ily $(COMMON_FILES)
+	$(LILYPOND) violin_one_part.ly
+
+violin_two_part.pdf: violin_two_part.ly violin_two.ily $(COMMON_FILES)
+	$(LILYPOND) violin_two_part.ly
+
+violin_three_part.pdf: violin_three_part.ly violin_three.ily $(COMMON_FILES)
+	$(LILYPOND) violin_three_part.ly
+
+violoncellopart.pdf: violoncellopart.ly violoncello.ily $(COMMON_FILES)
+	$(LILYPOND) violoncellopart.ly
+
+canon_per_3_violini_e_basso_piano_transcription.pdf: piano_one.ily piano_two.ily piano_three.ily piano_bass.ily piano_color.ily piano_header.ily $(COMMON_FILES)
+	$(LILYPOND) piano_transcription.ly
+clean:
+	rm -f *.aux *.log *.pdf *.midi *.~?~
diff -ruN orig/midi.ily new/midi.ily
--- orig/midi.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/midi.ily	2015-09-02 06:41:59.000000000 -0500
@@ -0,0 +1,3 @@
+\version "2.18.2"
+
+\midi { \tempo 4=55 }
diff -ruN orig/paper.ily new/paper.ily
--- orig/paper.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/paper.ily	2017-05-22 22:59:00.670443000 -0500
@@ -0,0 +1,10 @@
+\version "2.18.2"
+
+\layout { 
+
+  \context  {
+    \Score
+    \override TimeSignature.style = #'C
+    \override BarNumber.padding = #3
+  }
+}
diff -ruN orig/piano_bass.ily new/piano_bass.ily
--- orig/piano_bass.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_bass.ily	2017-06-01 19:08:20.652098000 -0500
@@ -0,0 +1,65 @@
+\version "2.18.2"
+
+violoncello = \relative c {
+  \connectArpeggioArrowUp
+  \set Staff.pedalSustainStyle = #'mixed
+  \time 4/4
+  \key d \major
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 \sustainOn a \sustainOff \sustainOn b \sustainOff \sustainOn fis \sustainOff \sustainOn |
+  g \sustainOff _\markup { \small \italic { "Ped. simile ad lib." } } d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g  d g a |
+  d4 a b fis  |
+  g  d \override Stem.direction = #DOWN g  \deadNote a64~a32.~a8. |
+  \once \override NoteColumn.force-hshift = #-.6 \deadNote d64~d32.~d8. \override Stem.direction = #UP a4  b fis |
+  g\arpeggio d g  a  |
+  d4  a  b  fis  |
+  g  d  g  a  |
+  d4   a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-1.5 d4 \override Stem.direction = #UP a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a\arpeggio |
+  d4 a b fis |
+  g d g a\arpeggio |
+  d4 a b fis |
+  g d g a  |
+  d4  a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4 a b fis |
+  g d g a |
+  d4  a  b fis |
+  g d g a |
+  d4 a b fis |
+  g d g \deadNote a64~a32.~a8. |
+  d4 a b fis |
+  g d g\arpeggio a\arpeggio |
+  d4 a b fis\arpeggio |
+  g d g a |
+  d r 4 r 2 \bar "|."
+}
diff -ruN orig/piano_color.ily new/piano_color.ily
--- orig/piano_color.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_color.ily	2017-07-15 13:57:13.910640000 -0500
@@ -0,0 +1,28 @@
+\version "2.18.2"
+
+colorOne = #(rgb-color 0 0 .9)
+colorOneTwo = #(rgb-color 0 .8 .8)
+colorTwo = #(rgb-color 0 .7 0)
+colorTwoThree = #(rgb-color .6 .6 0)
+colorThree = #(rgb-color .5 0 0)
+colorOneThree = #(rgb-color .6 0 .6)
+
+changeColor =
+#(define-music-function
+  (parser location color)
+  (list?)
+  #{
+          \override Voice.NoteHead.color = #color
+  #})
+
+changeColors =
+#(define-music-function
+  (parser location color)
+  (list?)
+  #{
+          \override Voice.NoteHead.color = #color
+          \override Voice.Rest.color = #color
+          \override Voice.Stem.color = #color
+          \override Voice.Beam.color = #color
+          \override Voice.Dots.color = #color
+  #})
diff -ruN orig/piano_header.ily new/piano_header.ily
--- orig/piano_header.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_header.ily	2017-12-05 19:37:03.332640000 -0600
@@ -0,0 +1,72 @@
+\version "2.18.2"
+
+\header {
+ mutopiatitle = "Canon per 3 Violini e Basso"
+ mutopiacomposer = "PachelbelJ"
+ mutopiainstrument = "3 Violins, Cello"
+ date = "1694"
+ source = "IMSLP"
+ style = "Baroque"
+ license = "Creative Commons Attribution 4.0"
+ maintainer = "Michael Fischer v. Mollard"
+ maintainerEmail = "konfusator@gmail.com"
+ title = " Canone per 3 violini e basso"
+ composer = "Johann Pachelbel (1653-1706)"
+ pianoTranscriber = "Isaac David"
+ pianoTranscriberEmail = "mailto:isacdaavid@isacdaavid.info"
+
+ footer = "Mutopia-2015/09/02-2047"
+ copyright =  \markup {
+   \override #'(baseline-skip . 0 )
+   \override #'(baseline-skip . 0 )
+   \center-column {
+     \abs-fontsize #8 \sans \concat {
+       " Typeset using "
+       \with-url #"http://www.lilypond.org" "LilyPond "
+       \char ##x00A9
+       " "
+       2015
+       " by "
+       \maintainer
+       " "
+       \char ##x2014
+       " "
+       \with-url #"http://www.MutopiaProject.org" "Mutopia Project"
+     }
+     \abs-fontsize #8 \sans \concat {
+       \with-url #"http://isacdaavid.info/log/pachelbels-canon-piano-transcription" " Piano transcription "
+       \char ##x00A9
+       " "
+       2017
+       " by "
+       \with-url \pianoTranscriberEmail \pianoTranscriber
+     }
+     \concat {
+       \concat {
+         \abs-fontsize #8 \sans {
+           " "
+           \with-url #"http://creativecommons.org/licenses/by/4.0/" "Creative Commons Attribution 4.0 International License "
+           \char ##x2014
+           " free to distribute, modify, and perform"
+         }
+       }
+       \abs-fontsize #13 \with-color #white \char ##x01C0
+     }
+   }
+ }
+
+ tagline = ##f
+}
+
+\layout {
+  indent = 10.0 \mm
+  short-indent = 10.0 \mm
+  \pointAndClickOff
+}
+
+\paper {
+  top-margin = 1\cm
+  left-margin = .5\cm
+  ragged-bottom=##f
+  ragged-last-bottom=##f
+}
diff -ruN orig/piano_one.ily new/piano_one.ily
--- orig/piano_one.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_one.ily	2017-12-05 19:14:18.460638000 -0600
@@ -0,0 +1,78 @@
+\version "2.18.2"
+
+%% \include "violin_common.ily"
+violinCommon  =  \relative c'' {
+	\connectArpeggioArrowUp fis4 e d cis |
+	b a b cis |
+				% \barNumberCheck #5
+	d cis b a |
+	g fis g e |
+	\shiftOff \override Stem.direction = #DOWN \change Staff = "down" d8 \change Staff = "up" fis a g fis d  fis e |
+	d b d a' \changeColor \colorOneTwo \once \override NoteColumn.force-hshift = #.3 g \changeColor \colorOne b a g \shiftOn |
+	\override Stem.direction = #UP fis \change Staff = "down" d \change Staff = "up" \once \override NoteColumn.force-hshift = #-1 e cis'  \once \override NoteColumn.force-hshift = #-1 d fis \once \override NoteColumn.force-hshift = #-1 a\arpeggio a, |
+				% \barNumberCheck #10
+	\once \override NoteColumn.force-hshift = #-.5 b g \once \override NoteColumn.force-hshift = #-.5 a fis \once \override NoteColumn.force-hshift = #.5 d d' \once \override NoteColumn.force-hshift = #-.1 d8. cis16 |
+	 \shiftOff d cis d d, \once \override NoteColumn.force-hshift = #-.1 cis a' e fis  d d' cis b cis\arpeggio \once \override Fingering.staff-padding = #'() fis-3 \once \override Fingering.staff-padding = #'() a-4 b |
+	g fis e g fis e d cis b a g fis e g fis e |
+	\override Stem.direction = #DOWN d e fis g  \once \override NoteColumn.force-hshift = #0 a e a g  \once \override NoteColumn.force-hshift = #0 fis b a g  a \change Staff = "down" g fis e \change Staff = "up" |
+	< \deadNote d d'> \change Staff = "down" \override Stem.direction = #UP b \change Staff = "up" \override Stem.direction = #DOWN b' cis d cis b a g fis e b' a b a g |
+				% \barNumberCheck #15
+	\override Stem.direction = #UP \autoBeamOff \once \override NoteColumn.force-hshift = #.3 fis8 \once \override NoteColumn.force-hshift = #1 \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.2 fis' \override Stem.direction = #UP e4\arpeggio r8 \set fingeringOrientations = #'(up) <d-4> fis4 |
+	b a b\arpeggio cis |
+	d8 \override Stem.direction = #DOWN d, cis4 r8  \once \override NoteColumn.force-hshift = #-1.8 b d4 |
+	\autoBeamOn \once \override NoteColumn.force-hshift = #-.2 d4.\arpeggio \override Stem.direction = #UP d8 d\arpeggio g e\arpeggio a |
+	\once \override NoteColumn.force-hshift = #-.65 a16 \once \override Fingering.staff-padding = #'() fis32-3 \once \override Fingering.staff-padding = #'() g-4 a16 \once \override Fingering.staff-padding = #'() fis32-3 \once \override Fingering.staff-padding = #'() g-4  a a, b cis d e fis g  fis16 \once \override Fingering.staff-padding = #'() d32-3 \once \override Fingering.staff-padding = #'() e-4 fis16 \once \override Fingering.staff-padding = #'() fis,32-2 \once \override Fingering.staff-padding = #'() g-1  a b a g a \change Staff = "down" fis g \change Staff = "up" \once \override Fingering.staff-padding = #'() a-1 |
+				% \barNumberCheck #20
+	\connectArpeggioArrowDown g16\arpeggio b32 a g16 fis32 e  fis e d e fis \once \override Fingering.staff-padding = #'() g-1 a \once \override Fingering.staff-padding = #'() b-1  \once \override NoteColumn.force-hshift = #.8 g16\arpeggio b32 a \once \override NoteColumn.force-hshift = #.6 b16 \once \override Fingering.staff-padding = #'() cis32-4 \once \override Fingering.staff-padding = #'() d-1  \once \override NoteColumn.force-hshift = #.8 a\arpeggio b cis d \once \override NoteColumn.force-hshift = #.8 e fis \once \override Fingering.staff-padding = #'() g-1 a |
+	\connectArpeggioArrowUp 	fis16 d32 e fis16 e32 d e cis d e fis e d cis d16 b32 cis d16 d,32 e fis g fis e fis d' cis d |
+	b16 d32 cis b16 a32 g  \once \override Fingering.staff-padding = #'() \set fingeringOrientations = #'(up) <a-4> g fis g \once \override Fingering.staff-padding = #'() \set fingeringOrientations = #'(up) <a-4> b cis d  b16 d32 cis d16 \changeColor \colorOneTwo cis32 \changeColor \colorOne b  cis d e d cis d b cis |
+	\shiftOn \override Stem.direction = #UP  d8 r cis r b r \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1.2 d  r |
+	\once \override NoteColumn.force-hshift = #.5 d, r \once \override NoteColumn.force-hshift = #.5 d r \once \override NoteColumn.force-hshift = #.5 d r \once \override NoteColumn.force-hshift = #.5 e r |
+				% \barNumberCheck #25
+	\change Staff = "down" r a r a r fis r \change Staff = "up" \once \override NoteColumn.force-hshift = #1.2 \once \override Fingering.staff-padding = #'() \set fingeringOrientations = #'(up) <a-3> |
+	\change Staff = "down" r g r fis r g r \change Staff = "up" \once \override NoteColumn.force-hshift = #1.2 e' |
+	\override Stem.direction = #UP fis16 fis, g fis \once \override NoteColumn.force-hshift = #-.5 e e' fis e d fis, d b' \override Stem.direction = #DOWN a \change Staff = "down" \override Stem.direction = #UP a, g a \change Staff = "up" |
+	b-2 b'-4 cis b  \override Stem.direction = #DOWN a \override Stem.direction = #UP \change Staff = "down" a, g a \override Stem.direction = #UP \change Staff = "up"  b b' a b \override Stem.direction = #DOWN cis \override Stem.direction = #UP \change Staff = "down" cis, b cis \change Staff = "up" |
+	\change Staff = "down" \once \override NoteColumn.force-hshift = #-.2 d \change Staff = "up" \set fingeringOrientations = #'(up) <d'-3> \once \override NoteColumn.force-hshift = #-.5 \set fingeringOrientations = #'(up) <e-4> d \override Stem.direction = #DOWN \set fingeringOrientations = #'(up) <cis-3> \override Stem.direction = #UP \change Staff = "down"  cis, d cis \change Staff = "up"  b b' a \changeColor \colorOneTwo b \changeColor \colorOne cis cis, fis e |
+				% \barNumberCheck #30
+	d \set fingeringOrientations = #'(up) <d'-3> \once \override NoteColumn.force-hshift = #-.2 \set fingeringOrientations = #'(up) <e-4> g   fis fis, \once \override NoteColumn.force-hshift = #-.2 a fis'   d g \once \override NoteColumn.force-hshift = #-.1 \set fingeringOrientations = #'(up) <fis-4> g   e a, \once \override NoteColumn.force-hshift = #-.3 g a |
+	\autoBeamOff \shiftOff \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.6 fis \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.5 a \once \override NoteColumn.force-hshift = #.8 a \once \override NoteColumn.force-hshift = #.5 a  \once \override NoteColumn.force-hshift = #.5 a \once \override NoteColumn.force-hshift = #.3 a \once \override NoteColumn.force-hshift = #.3 a \once \override NoteColumn.force-hshift = #.3 a   \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.5 fis \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.3 \changeColor \colorOneThree fis \changeColor \colorOne \once \override NoteColumn.force-hshift = #.3 fis \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.8 fis  \once \override NoteColumn.force-hshift = #-.2 fis \once \override NoteColumn.force-hshift = #.8 fis \once \override NoteColumn.force-hshift = #.8 a \once \override NoteColumn.force-hshift = #.8 a |
+	\override Stem.direction = #DOWN \shiftOff \once \override NoteColumn.force-hshift = #.4 g \once \override NoteColumn.force-hshift = #-.1 g \once \override NoteColumn.force-hshift = #-.2 g \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.1 d' \once \override NoteColumn.force-hshift = #.3 d \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1.1 d \once \override NoteColumn.force-hshift = #1.1 d d  \changeColor \colorOneTwo \set fingeringOrientations = #'(up) <d-3> \changeColor \colorOne \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.4 \set fingeringOrientations = #'(down) <d-3> \once \override NoteColumn.force-hshift = #.8 \set fingeringOrientations = #'(down) <b-1> \changeColor \colorOneThree b \changeColor \colorOne \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.2 a \changeColor \colorOneTwo a \changeColor \colorOne \once \override NoteColumn.force-hshift = #1.2 e' \once \override NoteColumn.force-hshift = #1.25 cis |
+	\autoBeamOn a fis' fis fis   e e e e   d d d d   a'\arpeggio a a a |
+	\shiftOn \override Stem.direction = #UP  \once \override NoteColumn.force-hshift = #-.2 b\arpeggio b b \once \override NoteColumn.force-hshift = #0 b  \once \override NoteColumn.force-hshift = #-.2 a a a \once \override NoteColumn.force-hshift = #-.2 a   \once \override NoteColumn.force-hshift = #-.2 \set fingeringOrientations = #'(up) <b-5> \once \override NoteColumn.force-hshift = #-.2 \set fingeringOrientations = #'(up) <b-5> \once \override NoteColumn.force-hshift = #-.2 b \once \override NoteColumn.force-hshift = #-.2 b  \once \override NoteColumn.force-hshift = #-.2 cis\arpeggio \once \override NoteColumn.force-hshift = #-.2 cis, \once \override NoteColumn.force-hshift = #-.2 cis \changeColor \colorOneTwo cis \changeColor \colorOne |
+				% \barNumberCheck #35
+	\override Stem.direction = #DOWN \shiftOff \once \override NoteColumn.force-hshift = #-1 d \shiftOn  \change Staff = "down" d,32 e fis16 d  \change Staff = "up" \autoBeamOff \shiftOff \once \override NoteColumn.force-hshift = #-.2 cis\arpeggio \once \override NoteColumn.force-hshift = #-.4 cis'32 \shiftOn d \once \override NoteColumn.force-hshift = #-.4 \changeColor \colorOneTwo e16 \changeColor \colorOne \shiftOff \once \override NoteColumn.force-hshift = #0 cis  \autoBeamOn \once \override NoteColumn.force-hshift = #-1 b \shiftOn \change Staff = "down" b,32 cis d16 b \change Staff = "up"  < \deadNote cis cis'>\arpeggio  \change Staff = "down" a'32 g fis16 e \change Staff = "up" |
+< \deadNote d d'>\arpeggio \change Staff = "down" \changeColor \colorOneThree g32 \changeColor \colorOne fis e16 g \change Staff = "up" \shiftOff \once \override NoteColumn.force-hshift = #-.3 fis\arpeggio \shiftOn \change Staff = "down" d32 e fis16 a \change Staff = "up"  \shiftOff \once \override NoteColumn.force-hshift = #-.3 g\arpeggio \shiftOn \change Staff = "down" b32 a g16 fis \change Staff = "up"  e\arpeggio \changeColor \colorOneThree \once \override NoteColumn.force-hshift = #.4 a32 \changeColor \colorOne g fis16 \once \override NoteColumn.force-hshift = #-1 e |
+	fis d'32 cis d16 fis, a\arpeggio a32 b cis16 a   fis \changeColor \colorOneThree d'32 \changeColor \colorOne e fis16 \changeColor \colorOneThree d \changeColor \colorOne  \once \override NoteColumn.force-hshift = #.1 fis fis32 e d16 cis |
+	\once \override NoteColumn.force-hshift = #.1 b b32 a b16 cis  \once \override NoteColumn.force-hshift = #.1 d\arpeggio fis32 e d16 fis   \once \override NoteColumn.force-hshift = #.1 g\arpeggio d32 cis b16 b   \once \override NoteColumn.force-hshift = #-.3 a\arpeggio \once \override NoteColumn.force-hshift = #.5 e \once \override NoteColumn.force-hshift = #-.3 a \once \override NoteColumn.force-hshift = #-.3 a |
+	\shiftOff \once \override NoteColumn.force-hshift = #-.2 a4. a8 d,4. \change Staff = "down" \override Stem.direction = #UP a'8  \change Staff = "up" |
+				% \barNumberCheck #40
+	\autoBeamOff \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.5 g4 \once \override NoteColumn.force-hshift = #-.5 a4 \override Stem.direction = #UP \changeColor \colorOneThree g8 \changeColor \colorOne \override Stem.direction = #DOWN \set fingeringOrientations = #'(right) <d-1> d8. cis16 |
+	d8 \changeColor \colorOneThree d' \changeColor \colorOne cis4 \once \override NoteColumn.force-hshift = #2.15 b a |
+	d,8. e16   fis4 \override Stem.direction = #UP  b   \once \override NoteColumn.force-hshift = #.2 e,8. e16 |
+	\autoBeamOn fis8. fis'16   fis g fis e   d8. d16   d e d cis |
+	b4   d4   d16 c  b c   a8. a16 |
+				% \barNumberCheck #45
+	\shiftOn \once \override NoteColumn.force-hshift = #-.15 a8. a'16  \once \override NoteColumn.force-hshift = #-.1 a b a g \once \override NoteColumn.force-hshift = #-.15 fis8. fis16  \once \override NoteColumn.force-hshift = #-.1 fis g fis e |
+	d c b c   a8. a16 g8 d' cis8. cis16 |
+        d8 d4 cis b a8~ |
+	\override Stem.direction = #DOWN a g4 fis8~ \once \override NoteColumn.force-hshift = #.8 fis8. e16 \once \override NoteColumn.force-hshift = #.2 e4 |
+	fis8 fis'4 \override Stem.direction = #UP e8 d-1 d'4 \set fingeringOrientations = #'(up) <c-5>8 |
+				% \barNumberCheck #50
+	\override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.2 \set fingeringOrientations = #'(up) <b-5>4 \override Stem.direction = #UP d8\arpeggio a \once \override NoteColumn.force-hshift = #0 b4\arpeggio \once \override NoteColumn.force-hshift = #-.2 a |
+	\once \override NoteColumn.force-hshift = #0 a\arpeggio a,8. g16 fis4 fis'8. e16 |
+	d4. d8 d4 \once \override NoteColumn.force-hshift = #.4 cis |
+	% end of common part - the rest is written in the violin parts
+      }
+
+violinone =  \relative c'' {
+	\time 4/4
+	\key d \major
+	s1*2
+	\violinCommon
+	\override Stem.direction = #DOWN d8\arpeggio  \change Staff = "down" \override Stem.direction = #UP d,  \change Staff = "up" \override Stem.direction = #DOWN cis cis'  b  \change Staff = "down" \override Stem.direction = #UP b,  \change Staff = "up" \override Stem.direction = #DOWN < \deadNote a a'>  \change Staff = "down" a'  \change Staff = "up" |
+	g\arpeggio g' fis \change Staff = "down" \override Stem.direction = #UP fis,  \change Staff = "up" \override Stem.direction = #DOWN e\arpeggio b' e,\arpeggio e' |
+	fis fis, e e'   \once \override NoteColumn.force-hshift = #-.4 d d, \once \override NoteColumn.force-hshift = #-.2 cis\arpeggio cis' |
+	b b'  a a,  g8. e'16   a,8 a |
+	a4 r r2 \bar "|."
+      }
diff -ruN orig/piano_three.ily new/piano_three.ily
--- orig/piano_three.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_three.ily	2017-12-05 19:14:11.220627000 -0600
@@ -0,0 +1,75 @@
+\version "2.18.2"
+
+%% \include "violin_common.ily"
+violinCommon  =  \relative c'' {
+        \connectArpeggioArrowUp \override Stem.direction = #UP \shiftOff fis4 e d cis |
+	b a b cis |
+				% \barNumberCheck #5
+        \override Stem.direction = #DOWN d \once \override NoteColumn.force-hshift = #-1.7 cis  \once \override NoteColumn.force-hshift = #-1 b \once \override NoteColumn.force-hshift = #-1 a\arpeggio |
+        \once \override NoteColumn.force-hshift = #-1 g \once \override NoteColumn.force-hshift = #-1 fis \override Stem.direction = #UP \changeColor \colorTwoThree g \changeColor \colorThree e |
+	\override Stem.direction = #DOWN d8 fis a \once \override NoteColumn.force-hshift = #-.2 g fis \override Stem.direction = #UP \change Staff = "down" d \override Stem.direction = #DOWN \change Staff = "up" fis\arpeggio \override Stem.direction = #UP \change Staff = "down" e \change Staff = "up" |
+	\override Stem.direction = #DOWN  <d' \deadNote d,> \override Stem.direction = #UP \change Staff = "down" b, \override Stem.direction = #DOWN \change Staff = "up" <d' \deadNote d,> a g b a g |
+	\shiftOn \autoBeamOff \override Stem.direction = #UP fis \once \override NoteColumn.force-hshift = #.2 d \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1.3 e  \once \override NoteColumn.force-hshift = #1.1 cis' \once \override NoteColumn.force-hshift = #1.3 d \once \override NoteColumn.force-hshift = #1.2 fis \once \override NoteColumn.force-hshift = #1.2 a \change Staff = "down" \override Stem.direction = #UP a, \change Staff = "up" |
+				% \barNumberCheck #10
+	\override Stem.direction = #DOWN b \once \override NoteColumn.force-hshift = #.3 g \once \override NoteColumn.force-hshift = #.3 a \once \override NoteColumn.force-hshift = #.3 fis \once \override NoteColumn.force-hshift = #.3 d \once \override NoteColumn.force-hshift = #1.15 d' \once \override NoteColumn.force-hshift = #1.15 d8. \once \override NoteColumn.force-hshift = #1.25 cis16 |
+        \autoBeamOn \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #0 d cis \once \override NoteColumn.force-hshift = #-.7 d d,  \once \override NoteColumn.force-hshift = #.2 cis\arpeggio a' e fis  d d' cis-3 b-2  cis fis a b |
+	g fis e g fis e d cis b\arpeggio \change Staff = "down" a g fis e \once \override NoteColumn.force-hshift = #-.6 g fis e \change Staff = "down" |
+	\once \override NoteColumn.force-hshift = #-.3 d e fis g  \change Staff = "up" \override Stem.direction = #DOWN  \once \override NoteColumn.force-hshift = #.3 a e a g fis b a g  \once \override NoteColumn.force-hshift = #.3 a g fis e |
+        \once \override NoteColumn.force-hshift = #0 d\arpeggio \change Staff = "down" \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #2  b \change Staff = "up" \override Stem.direction = #DOWN b' cis d cis b a \once \override NoteColumn.force-hshift = #-.3 g\arpeggio \change Staff = "down" \override Stem.direction = #UP fis e \change Staff = "up" \override Stem.direction = #DOWN b' \once \override NoteColumn.force-hshift = #-.3 a\arpeggio \change Staff = "down" \override Stem.direction = #UP b a g |
+				% \barNumberCheck #15
+	\override Stem.direction = #DOWN \change Staff = "up" < \deadNote fis fis'>8 fis' e4 r8 d \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #-.1 fis4 |
+        \shiftOn \connectArpeggioArrowDown \once \override NoteColumn.force-hshift = #-.2 b\arpeggio   \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-.4 < \deadNote a a,>   \override Stem.direction = #UP  \once \override NoteColumn.force-hshift = #-.2 b\arpeggio \once \override NoteColumn.force-hshift = #-.2 cis\arpeggio |
+	\autoBeamOff \once \override NoteColumn.force-hshift = #1 d8  \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.5 d, \once \override NoteColumn.force-hshift = #.5 cis4  r8  \once \override NoteColumn.force-hshift = #.5 b \once \override NoteColumn.force-hshift = #-.5 d4 |
+	\once \override NoteColumn.force-hshift = #1.2 d4. \change Staff = "down" d8 \change Staff = "up" \once \override NoteColumn.force-hshift = #1.2 d \change Staff = "down" g \change Staff = "up" \once \override NoteColumn.force-hshift = #1.2 e \change Staff = "down" a \change Staff = "up" |
+	\shiftOff \autoBeamOn  \override Stem.direction = #UP a16 fis32 g a16 fis32 g a a, b cis d \changeColor \colorTwoThree e \changeColor \colorThree fis g fis16 d32 e fis16 fis,32 g  a b a g a fis g a |
+				% \barNumberCheck #20
+	g16 b32 a g16 fis32 e  fis e d e fis g a b  g16 b32 a b16 \changeColor \colorTwoThree cis32 \changeColor \colorThree d  a \set fingeringOrientations = #'(down) <b-1> cis \changeColor \colorTwoThree d \changeColor \colorThree e fis \set fingeringOrientations = #'(down) <g-5> \set fingeringOrientations = #'(down) <a-5> |
+	fis16-4 d32 e fis16 e32 d  e cis d e fis e d cis  d16 b32 cis d16 \set fingeringOrientations = #'(down) <d,-2>32 \set fingeringOrientations = #'(down) <e-1>  \set fingeringOrientations = #'(down) <fis-2> \set fingeringOrientations = #'(down) <g-1> \set fingeringOrientations = #'(down) <fis-2> \set fingeringOrientations = #'(down) <e-1> \set fingeringOrientations = #'(down) <fis-2> d' cis d |
+	b16 d32 cis b16 \set fingeringOrientations = #'(down) <a-1>32 \set fingeringOrientations = #'(down) <g-2>  \once \override Fingering.staff-padding = #'() a-3 g fis g \set fingeringOrientations = #'(down) <a-1> b cis d  b16 d32 cis d16 cis32 b cis d e d cis d b cis |
+	\override Stem.direction = #DOWN d8 r \once \override NoteColumn.force-hshift = #.7 cis r b r \override Stem.direction = #UP d r |
+	\override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1.5 \set fingeringOrientations = #'(up) \once \override Fingering.staff-padding = #'() \once \override Fingering.extra-offset = #'(0 . .3) <d,-1> \override Stem.direction = #UP r d r \once \override NoteColumn.force-hshift = #1.5 \override Stem.direction = #DOWN d \override Stem.direction = #UP r e r |
+				% \barNumberCheck #25
+        r \override Stem.direction = #DOWN \set fingeringOrientations = #'(down)
+\once \override Fingering.extra-offset = #'(.5 . 1) <a-1> r a r \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.8 fis r \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1.3 a \override Stem.direction = #UP |
+	r \set fingeringOrientations = #'(right) <g-1> r \once \override NoteColumn.force-hshift = #.2 fis r \set fingeringOrientations = #'(down) <g-1> r \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.8 e' |
+	\shiftOn \once \override NoteColumn.force-hshift = #.7 fis16 fis, \once \override NoteColumn.force-hshift = #0 g fis \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #-.8 e \once \override NoteColumn.force-hshift = #0 e' \once \override NoteColumn.force-hshift = #0 fis \once \override NoteColumn.force-hshift = #0 e \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.2 d \once \override NoteColumn.force-hshift = #.3 \changeColor \colorOneThree fis, \changeColor \colorThree d \changeColor \colorTwoThree b' \changeColor \colorThree a \change Staff = "down" \override Stem.direction = #UP a, g a \change Staff = "up" \override Stem.direction = #DOWN |
+	b \once \override NoteColumn.force-hshift = #-.3 b' cis \once \override NoteColumn.force-hshift = #-.2 b  a \change Staff = "down" \override Stem.direction = #UP a, g a \override Stem.direction = #DOWN \change Staff = "up" \once \override NoteColumn.force-hshift = #-1 \set fingeringOrientations = #'(down) < \deadNote b b'-2> \set fingeringOrientations = #'(down) <b'-2> \once \override NoteColumn.force-hshift = #0 \set fingeringOrientations = #'(down) <a-1> \changeColor \colorOneThree b \changeColor \colorThree  cis \change Staff = "down" \override Stem.direction = #UP cis, b cis \change Staff = "up" |
+        \connectArpeggioArrowUp	\change Staff = "down" \override Stem.direction = #DOWN d d' e d  \change Staff = "up"  cis \override Stem.direction = #UP \change Staff = "down" cis, d cis \override Stem.direction = #DOWN b b' a b \change Staff = "up" cis\arpeggio \change Staff = "down" cis, fis e \change Staff = "up" |
+				% \barNumberCheck #30
+	< \deadNote d d'>\arpeggio d' e g   fis \change Staff = "down" \override Stem.direction = #UP fis, a \change Staff = "up" \override Stem.direction = #DOWN fis'  \changeColor \colorTwoThree \set fingeringOrientations = #'(down) <d-2> \changeColor \colorThree \set fingeringOrientations = #'(left) <g-3> fis g   e\arpeggio \change Staff = "down" \changeColor \colorTwoThree a, \changeColor \colorThree g a \change Staff = "up" |
+	\shiftOn \override Stem.direction = #DOWN fis a a a   a\arpeggio \shiftOff \once \override NoteColumn.force-hshift = #-1.3 a \once \override NoteColumn.force-hshift = #.4 a \shiftOn \once \override NoteColumn.force-hshift = #.9 a  fis fis fis fis  \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.4 fis\arpeggio  \change Staff = "down" fis a a \change Staff = "up" |
+        \once \override NoteColumn.force-hshift = #.4 g\arpeggio  \override Stem.direction = #UP \change Staff = "down" \changeColor \colorOneThree g \changeColor \colorThree g \change Staff = "up" \override Stem.direction = #DOWN d'  \once \override NoteColumn.force-hshift = #.6 d\arpeggio d d d   \once \override NoteColumn.force-hshift = #.6 d\arpeggio d  \change Staff = "down" \override Stem.direction = #UP b b \change Staff = "up"  \autoBeamOff \shiftOff a\arpeggio \shiftOn \changeColor \colorOneThree \once \override NoteColumn.force-hshift = #.4 a \changeColor \colorThree \override Stem.direction = #DOWN \shiftOff \once \override NoteColumn.force-hshift = #.4  e' \changeColor \colorTwoThree cis \changeColor \colorThree |
+	 \shiftOn \autoBeamOn \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #-.6 a fis' fis fis  \autoBeamOff \once \override NoteColumn.force-hshift = #1 e\arpeggio \once \override NoteColumn.force-hshift = #1 e \changeColor \colorTwoThree e \changeColor \colorThree \once \override NoteColumn.force-hshift = #1 e \autoBeamOn  \once \override NoteColumn.force-hshift = #-.4 d \changeColor \colorOneThree d \changeColor \colorThree d \changeColor \colorOneThree d \changeColor \colorThree   a' a a a |
+	b b b b   a\arpeggio a a a   b\arpeggio b b b   cis ^\markup { \small \italic { "L.H." } } \arpeggio cis, cis cis |
+				% \barNumberCheck #35
+	\override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1 d \override Stem.direction = #UP \change Staff = "down" d,32 e fis16 d \change Staff = "up" \override Stem.direction = #DOWN cis cis'32 d \once \override NoteColumn.force-hshift = #-.2 e16 cis  \once \override NoteColumn.force-hshift = #1 b \change Staff = "down" \override Stem.direction = #UP b,32 cis d16 b \change Staff = "up" \override Stem.direction = #DOWN < \deadNote cis cis'>  \change Staff = "down" a'32 g fis16 e  \change Staff = "up" |
+	\override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #0 d g32 fis e16 g  \once \override NoteColumn.force-hshift = #0 fis \change Staff = "down" \override Stem.direction = #UP d32 e fis16 a \change Staff = "up"  \override Stem.direction = #DOWN \changeColor \colorOneThree g \changeColor \colorThree \set fingeringOrientations = #'(down) <b-3>32 a \set fingeringOrientations = #'(right) <g-2>16 \set fingeringOrientations = #'(down) <fis-2>   \once \override NoteColumn.force-hshift = #-.6 e a32 g fis16 e |
+	\override Stem.direction = #UP fis d'32 cis \changeColor \colorOneThree d16 \changeColor \colorThree fis,   a a32 b cis16 a  fis d'32 e fis16 d   fis fis32 e d16 cis |
+	\once \override NoteColumn.force-hshift = #-.4 b b32 a b16 cis  \once \override NoteColumn.force-hshift = #-.4 d fis32 e d16 fis  \once \override NoteColumn.force-hshift = #-.4 g d32 cis b16 b  \once \override NoteColumn.force-hshift = #-.5 a e a \once \override NoteColumn.force-hshift = #-.5 a |
+	\once \override NoteColumn.force-hshift = #.9 a4. a8 \once \override NoteColumn.force-hshift = #.4 d,4. a'8 |
+				% \barNumberCheck #40
+	g4 a4 \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.4 g8 d \override Stem.direction = #UP d8. cis16 |
+        \shiftOff d8 d' cis4 b a |
+	\override Stem.direction = #DOWN d,8. e16   fis4   b   e,8. e16 |
+        \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #-.4 fis8. fis'16   fis g \once \override NoteColumn.force-hshift = #.8 fis e   d8. d16   d e \once \override NoteColumn.force-hshift = #.5 d cis |
+	b4   d4   d16 c  \once \override NoteColumn.force-hshift = #-1.1 b c   \once \override NoteColumn.force-hshift = #.1 a8. a16 |
+				% \barNumberCheck #45
+	\once \override NoteColumn.force-hshift = #.6 a8. a'16   a b a g  \override Stem.direction = #DOWN fis8.-2 fis16   fis-2 g-1 \set fingeringOrientations = #'(down) <fis-2> e |
+	\override Stem.direction = #UP \once \override Fingering.staff-padding = #'() \set fingeringOrientations = #'(down) <d-1> c-3 b c  \override Stem.direction = #DOWN a8.\arpeggio \change Staff = "down" \override Stem.direction = #UP a16 \change Staff = "up" g8\arpeggio d' \once \override NoteColumn.force-hshift = #.2 cis8. cis16 |
+	\once \override NoteColumn.force-hshift = #.3 d8\arpeggio d4 cis \change Staff = "down" \override Stem.direction = #DOWN b a8~ |
+	a g4 \change Staff = "down" fis8~ \override Stem.direction = #UP fis8. e16 e4 \change Staff = "up" |
+	fis8\arpeggio fis'4 e8 d d'4 c8 |
+				% \barNumberCheck #50
+	b4\arpeggio d8 a b4 ^\markup { \small \italic { "L.H." } } \arpeggio a ^\markup { \small \italic { "L.H." } } \arpeggio |
+	\autoBeamOff a a,8. \override Stem.direction = #DOWN g16 fis4 fis'8. ^\markup { \small \italic { "L.H." } } \arpeggio \override Stem.direction = #UP e16 |
+	 \once \override NoteColumn.force-hshift = #-.2 d4. d8 d4 cis |
+	% end of common part - the rest is written in the violin parts
+      }
+
+violinthree =   \relative c'' {
+	\time 4/4
+	\key d \major
+        s1*6
+	\violinCommon
+	d4 r r2 \bar "|."
+}
diff -ruN orig/piano_transcription.ly new/piano_transcription.ly
--- orig/piano_transcription.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_transcription.ly	2017-12-05 19:38:03.442728000 -0600
@@ -0,0 +1,56 @@
+\version "2.18.2"
+
+\include "./piano_header.ily"
+\include "./piano_color.ily"
+
+%% arpeggio arrow solution taken from
+%% http://lilypond.1069038.n5.nabble.com/cross-staff-versions-of-arpeggioArrowUp-etc-td119964.html
+connectArpeggioArrowUp = {
+  \revert PianoStaff.Arpeggio #'stencil
+  \revert PianoStaff.Arpeggio #'X-extent
+  \override PianoStaff.Arpeggio #'arpeggio-direction = #UP
+}
+
+connectArpeggioArrowDown = {
+  \revert PianoStaff.Arpeggio #'stencil
+  \revert PianoStaff.Arpeggio #'X-extent
+  \override PianoStaff.Arpeggio #'arpeggio-direction = #DOWN
+}
+
+\include "piano_one.ily"
+\include "piano_two.ily"
+\include "piano_three.ily"
+\include "piano_bass.ily"
+
+\score {
+  \new PianoStaff <<
+    \set PianoStaff.connectArpeggios = ##t
+    \new Staff = "up" {
+      <<
+        {
+          \changeColors \colorThree
+          \violinthree
+        }
+        \\
+        {
+          \shiftOn
+          \changeColors \colorOne
+          \violinone
+        }
+        \\
+        {
+          \shiftOn
+          \changeColors \colorTwo
+          \violintwo
+        }
+      >>
+    }
+    \new Staff = "down" {
+      \clef "bass"
+      \violoncello
+    }
+  >>
+
+  \include "paper.ily"
+  \include "midi.ily"
+}
diff -ruN orig/piano_two.ily new/piano_two.ily
--- orig/piano_two.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/piano_two.ily	2017-12-05 19:14:27.110651000 -0600
@@ -0,0 +1,78 @@
+\version "2.18.2"
+
+%% \include "violin_common.ily"
+violinCommon  =  \relative c'' {
+	\connectArpeggioArrowUp
+	fis4 e d cis |
+	b a b cis |
+				% \barNumberCheck #5
+	\override Stem.direction = #DOWN d cis b a |
+	g fis \changeColor \colorOneTwo \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.3 g \changeColor \colorTwo \once \override NoteColumn.force-hshift = #.3 e \override Stem.direction = #DOWN |
+	\override Stem.direction = #UP \change Staff = "down" d8 \override Stem.direction = #DOWN \change Staff = "up" fis a g fis  \override Stem.direction = #UP \change Staff = "down" d \override Stem.direction = #DOWN \change Staff = "up" fis\arpeggio e |
+	d b d a' \changeColor \colorTwoThree g \changeColor \colorTwo b a g |
+	\autoBeamOff \override Stem.direction = #UP fis \once \override NoteColumn.force-hshift = #.2 d \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #1 e \once \override NoteColumn.force-hshift = #1.3 cis' \once \override NoteColumn.force-hshift = #1.3 d \once \override NoteColumn.force-hshift = #1.3 fis \once \override NoteColumn.force-hshift = #1.2 a\arpeggio \change Staff = "down" a, \change Staff = "up" |
+				% \barNumberCheck #10
+	\autoBeamOff b g a \once \override NoteColumn.force-hshift = #-1 fis \once \override NoteColumn.force-hshift = #-1 d d' d8. \once \override NoteColumn.force-hshift = #-.3 cis16 |
+	\autoBeamOn \shiftOff \override Stem.direction = #UP d cis d d, cis a' \once \override NoteColumn.force-hshift = #0 e fis d d' cis b cis fis a b |
+	\shiftOn g fis e g  fis e d cis  b a g fis  \once \override NoteColumn.force-hshift = #0 e g fis \once \override NoteColumn.force-hshift = #.1 e |
+	\override Stem.direction = #DOWN d e fis g  a\arpeggio e a g  fis b \set fingeringOrientations = #'(down) <a-1> \set fingeringOrientations = #'(down) <g-1>  a \override Stem.direction = #UP \change Staff = "down" g fis e \change Staff = "up" |
+	\override Stem.direction = #DOWN < \deadNote d d'> \override Stem.direction = #UP \change Staff = "down"  b b' cis \override Stem.direction = #DOWN \change Staff = "up" d cis b a \autoBeamOn g\arpeggio  \change Staff = "down" fis e b'  \once \override NoteColumn.force-hshift = #-.2 a b a g \autoBeamOn |
+				% \barNumberCheck #15
+	\autoBeamOff fis8  \change Staff = "up" \override Stem.direction = #UP fis' e4 r8  \once \override NoteColumn.force-hshift = #-1 d fis4 |
+        b ^\markup { \small \italic { "L.H." } } \arpeggio a \once \override NoteColumn.force-hshift = #-.4 b\arpeggio \once \override NoteColumn.force-hshift = #-.4 cis\arpeggio |
+	\shiftOff \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.6 d8 d, cis4 r8 b d4 |
+        \shiftOn \connectArpeggioArrowDown d4.\arpeggio \change Staff = "down" d8 \change Staff = "up" d\arpeggio \change Staff = "down" g \change Staff = "up" e\arpeggio a |
+        \shiftOff \autoBeamOn \connectArpeggioArrowUp a16 fis32 g a16 fis32 g a a, b cis d e fis g fis16 d32 e fis16 fis,32 g a b a g a fis g a |
+				% \barNumberCheck #20
+	g16 b32 a g16 fis32 e  \set fingeringOrientations = #'(down) \once \override Fingering.staff-padding = #'() <fis-2> e d e \set fingeringOrientations = #'(down) \once \override Fingering.staff-padding = #'() <fis-2> g a b  g16 b32 a b16 \changeColor \colorOneTwo cis32 \changeColor \colorTwo d  a b cis d e fis g a |
+	\shiftOff fis16 d32 e fis16 e32 d e cis d e fis \changeColor \colorTwoThree e \changeColor \colorTwo d cis d16 b32 cis d16 d,32 e fis g fis e fis d' cis d |
+	b16 d32 cis b16 a32 g  a g fis g a b cis d  b16 d32 cis d16 \changeColor \colorTwoThree cis32 \changeColor \colorTwo b  cis \set fingeringOrientations = #'(down) <d-3> e \changeColor \colorTwoThree d \changeColor \colorTwo cis d \set fingeringOrientations = #'(down) <b-1> \set fingeringOrientations = #'(down) <cis-2> |
+	\set fingeringOrientations = #'(down) <d-2>8 r cis r b r d-5 r |
+	d, r \set fingeringOrientations = #'(down) <d-1> r d r e r |
+				% \barNumberCheck #25
+	r \once \override NoteColumn.force-hshift = #1.4 a r a r \once \override NoteColumn.force-hshift = #1.2 fis r a |
+	r g r fis r g r e' |
+	\shiftOn fis16 \set fingeringOrientations = #'(down) <fis,-1> \set fingeringOrientations = #'(down) <g-1> fis \override Stem.direction = #UP \set fingeringOrientations = #'(down) \once \override Fingering.extra-offset = #'(0 . .5) <e-1> e'-4 fis e \override Stem.direction = #DOWN d fis, \once \override NoteColumn.force-hshift = #.4 d \changeColor \colorOneTwo b' \changeColor \colorTwo a \override Stem.direction = #UP \change Staff = "down" a, g a  \change Staff = "up" |
+	\override Stem.direction = #DOWN b \set fingeringOrientations = #'(down) <b'-1> \set fingeringOrientations = #'(down) <cis-2> b  a \change Staff = "down" \override Stem.direction = #UP a, g a  \change Staff = "up" \override Stem.direction = #DOWN < \deadNote b b'> b' \set fingeringOrientations = #'(down) <a-1> b  cis  \change Staff = "down" \override Stem.direction = #UP cis, b cis |
+	\once \override NoteColumn.force-hshift = #-1.35 d \change Staff = "up" \once \override NoteColumn.force-hshift = #0 d' e \once \override NoteColumn.force-hshift = #0 d  \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.3 cis \override Stem.direction = #UP \change Staff = "down" cis, d cis  \change Staff = "up" \once \override NoteColumn.force-hshift = #-1 < \deadNote b b'> \once \override NoteColumn.force-hshift = #0 b' \once \override NoteColumn.force-hshift = #0 a \once \override NoteColumn.force-hshift = #-1 \changeColor \colorTwoThree b \changeColor \colorTwo \once \override NoteColumn.force-hshift = #-.2 cis \once \override NoteColumn.force-hshift = #-.3 cis, \once \override NoteColumn.force-hshift = #-.3 fis \once \override NoteColumn.force-hshift = #-.3 e |
+				% \barNumberCheck #30
+	\shiftOn \once \override NoteColumn.force-hshift = #-.7 d \once \override NoteColumn.force-hshift = #0 d' \once \override NoteColumn.force-hshift = #-.15 e \once \override NoteColumn.force-hshift = #-.2 g  \once \override NoteColumn.force-hshift = #0 fis \once \override NoteColumn.force-hshift = #0 fis, \once \override NoteColumn.force-hshift = #0 a fis'  \changeColor \colorOneTwo d \changeColor \colorTwo \once \override NoteColumn.force-hshift = #0 g-5 fis-4 \once \override NoteColumn.force-hshift = #-.2 g \once \override NoteColumn.force-hshift = #-.4  \once \override NoteColumn.force-hshift = #0 e \changeColor \colorOneTwo a, \changeColor \colorTwo \once \override NoteColumn.force-hshift = #0 g a |
+	fis a a a   a a a a   fis fis fis fis   fis\arpeggio  \change Staff = "down" fis  \change Staff = "up" a a |
+	\shiftOff \autoBeamOff  g\arpeggio  \change Staff = "down" \override Stem.direction = #DOWN g g  \change Staff = "up" \override Stem.direction = #UP d'  d \override Stem.direction = #DOWN d d \override Stem.direction = #UP d   \changeColor \colorTwoThree d \changeColor \colorTwo \once \override Fingering.staff-padding = #'() \set fingeringOrientations = #'(down) <d-1> b b  a\arpeggio \changeColor \colorTwoThree \change Staff = "down" a \change Staff = "up" \changeColor \colorTwo \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #.8 e' \changeColor \colorOneTwo cis \changeColor \colorTwo |
+	\autoBeamOn \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #-.7 a fis' fis fis  \once \override NoteColumn.force-hshift = #-.5 e\arpeggio e \once \override NoteColumn.force-hshift = #-.4 \changeColor \colorOneTwo e \changeColor \colorTwo \once \override NoteColumn.force-hshift = #.9 e  \once \override NoteColumn.force-hshift = #-.4 d d d d   a'\arpeggio a a a |
+        b\arpeggio b b b   a\arpeggio a a a   b\arpeggio b b b   cis ^\markup { \small \italic { "L.H." } } \arpeggio cis, \once \override NoteColumn.force-hshift =#-.6 cis \changeColor \colorTwoThree cis \changeColor \colorTwo |
+				% \barNumberCheck #35
+	\shiftOff \override Stem.direction = #DOWN \once \override NoteColumn.force-hshift = #-1 d \shiftOn \change Staff = "down" d,32 e fis16 d  \change Staff = "up" \override Stem.direction = #UP  \shiftOff cis\arpeggio cis'32 \shiftOn d \changeColor \colorTwoThree e16 \changeColor \colorTwo \shiftOff cis \shiftOn   \override Stem.direction = #DOWN \shiftOff \once \override NoteColumn.force-hshift = #-.8 b \shiftOn \change Staff = "down" b,32 cis d16 b  \change Staff = "up"  \shiftOff \once \override NoteColumn.force-hshift = #-1 < \deadNote cis cis'> \shiftOn  \change Staff = "down" a'32 g fis16 e  \change Staff = "up" |
+	\shiftOff \once \override NoteColumn.force-hshift = #-1 < \deadNote d d'> \shiftOn \change Staff = "down" g32 fis e16 g  \change Staff = "up"  \shiftOff \once \override NoteColumn.force-hshift = #-1 fis\arpeggio \shiftOn  \change Staff = "down" d32 e fis16 a  \change Staff = "up"  \shiftOff \once \override NoteColumn.force-hshift = #-1 g\arpeggio \shiftOn  \change Staff = "down" b32 a g16 fis  \change Staff = "up"  \autoBeamOff \shiftOff e\arpeggio \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #1 a32 g \override Stem.direction = #DOWN fis16 e |
+	\autoBeamOn \override Stem.direction = #UP fis d'32 cis d16 fis,   a a32 b cis16 a   fis d'32 e fis16 d   fis fis32 e d16 cis |
+	b b32 a b16 cis   d fis32 e d16 fis   g d32-5 cis b16-3 b-5   a \once \override NoteColumn.force-hshift = #-.1 e a a |
+	a4. \override Stem.direction = #DOWN a8  \once \override NoteColumn.force-hshift = #1 d,4. a'8 |
+				% \barNumberCheck #40
+	\override Stem.direction = #UP g4 a4 \override Stem.direction = #DOWN g8 d \once \override NoteColumn.force-hshift = #-.6 d8. cis16 |
+	d8 d' cis4 b a |
+	d,8. e16   fis4   b   e,8. e16 |
+        \shiftOn \once \override NoteColumn.force-hshift = #-.15 fis8. fis'16   fis g fis e  \once \override NoteColumn.force-hshift = #-.15 d8. d16   d e d cis |
+	b4  \once \override NoteColumn.force-hshift = #-.4 d4  \once \override NoteColumn.force-hshift = #-.5 d16 c  b c   a8. a16 |
+				% \barNumberCheck #45
+	\once \override NoteColumn.force-hshift = #-.4 a8. a'16   a b \once \override NoteColumn.force-hshift = #.6 a g  fis8. fis16   fis g \once \override NoteColumn.force-hshift = #.5 fis e |
+	\override Stem.direction = #UP \once \override NoteColumn.force-hshift = #.5 d c b c \override Stem.direction = #DOWN   a8. a16 \autoBeamOff \override Stem.direction = #UP \once \override NoteColumn.force-hshift = #0 g8 \override Stem.direction = #DOWN d' \autoBeamOn \once \override NoteColumn.force-hshift = #-.4 cis8. cis16 |
+	\override Stem.direction = #UP \once \override NoteColumn.force-hshift = #0 d8 d4 \override Stem.direction = #DOWN cis  \change Staff = "down" b a8~ |
+	a \change Staff = "up" g4 \change Staff = "down" \tieDown fis8~ fis8. e16  \change Staff = "up" < \deadNote e e'>4 |
+	fis8\arpeggio fis'4 e8 d d'4 c8 |
+				% \barNumberCheck #50
+	b4 d8 a b4 \once \override NoteColumn.force-hshift = #0 a |
+	\override Stem.direction = #UP \once \override NoteColumn.force-hshift = #0 a\arpeggio a,8. g16 \once \override NoteColumn.force-hshift = #.3 fis4  fis'8. e16 |
+	\once \override NoteColumn.force-hshift = #.3 d4.\arpeggio d8 d4\arpeggio cis\arpeggio |
+	% end of common part - the rest is written in the violin parts
+      }
+
+violintwo =   \relative c'' {
+	\time 4/4
+	\key d \major
+	R1*2 s1*2
+	\barNumberCheck #5
+	\violinCommon
+	\once \override NoteColumn.force-hshift = #.4 d8 d, \once \override NoteColumn.force-hshift = #.7 cis cis'   b b, a\arpeggio a' |
+	\once \override NoteColumn.force-hshift = #.3 g g' fis \once \override NoteColumn.force-hshift = #.7 fis,  \once \override NoteColumn.force-hshift = #.2 e b'  \once \override NoteColumn.force-hshift = #.3 e, e' |
+        \once \override NoteColumn.force-hshift = #-.4 fis4 r r2 \bar "|."
+      }
diff -ruN orig/violin_common.ily new/violin_common.ily
--- orig/violin_common.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_common.ily	2017-12-05 19:10:32.410306000 -0600
@@ -0,0 +1,68 @@
+\version "2.18.2"
+
+% It's a canon so I'm writing it only once
+% The bar number checks would be for violin I
+
+violinCommon  =  \relative c'' {
+	fis4 e d cis |
+	b a b cis |
+				% \barNumberCheck #5
+	d cis b a |
+	g fis g e |
+	d8 fis a g fis d  fis e |
+	d b d a' g b a g |
+	fis d e cis' d fis a a, |
+				% \barNumberCheck #10
+	b g a fis d d' d8. cis16 |
+	d cis d d, cis a' e fis d d' cis b cis fis a b |
+	g fis e g fis e d cis b a g fis e g fis e |
+	d e fis g a e a g fis b a g a g fis e |
+	d b b' cis d cis b a g fis e b' a b a g |
+				% \barNumberCheck #15
+	fis8 fis' e4 r8 d fis 4 |
+	b a b cis |
+	d8 d, cis4 r8 b d4 |
+	d4. d8 d g e a |
+	a16 fis32 g a16 fis32 g a a, b cis d e fis g fis16 d32 e fis16 fis,32 g a b a g a fis g a |
+				% \barNumberCheck #20
+	g16 b32 a g16 fis32 e fis e d e fis g a b g16 b32 a b16 cis32 d a b cis d e fis g a |
+	fis16 d32 e fis16 e32 d e cis d e fis e d cis d16 b32 cis d16 d,32 e fis g fis e fis d' cis d |
+	b16 d32 cis b16 a32 g a g fis g a b cis d b16 d32 cis d16 cis32 b cis d e d cis d b cis |
+	d8 r cis r b r d r |
+	d, r d r d r e r |
+				% \barNumberCheck #25
+	r a r a r fis r a |
+	r g r fis r g r e' |
+	fis16 fis, g fis e e' fis e d fis, d b' a a, g a |
+	b b' cis b  a a, g a  b b' a b  cis cis, b cis |
+	d d' e d  cis cis, d cis  b b' a b cis cis, fis e |
+				% \barNumberCheck #30
+	d d' e g   fis fis, a fis'   d g fis g   e a, g a |
+	fis a a a   a a a a   fis fis fis fis   fis fis a a |
+	g g g d'  d d d d   d d b b  a a e' cis |
+	a fis' fis fis   e e e e   d d d d   a' a a a |
+	b b b b   a a a a   b b b b   cis cis, cis cis |
+				% \barNumberCheck #35
+	d d,32 e fis16 d   cis cis'32 d e16 cis   b b,32 cis d16 b   cis a'32 g fis16 e |
+	d g32 fis e16 g   fis d32 e fis16 a    g b32 a g16 fis   e a32 g fis16 e |
+	fis d'32 cis d16 fis,   a a32 b cis16 a   fis d'32 e fis16 d   fis fis32 e d16 cis |
+	b b32 a b16 cis   d fis32 e d16 fis   g d32 cis b16 b   a e a a |
+	a4. a8 d,4. a'8 |
+				% \barNumberCheck #40
+	g4 a4 g8 d d8. cis16 |
+	d8 d' cis4 b a |
+	d,8. e16   fis4   b   e,8. e16 |
+	fis8. fis'16   fis g fis e   d8. d16   d e d cis |
+	b4   d4   d16 c  b c   a8. a16 |
+				% \barNumberCheck #45
+	a8. a'16   a b a g  fis8. fis16   fis g fis e |
+	d c b c   a8. a16 g8 d' cis8. cis16 |
+	d8 d4 cis b a8~ |
+	a g4 fis8~fis8. e16 e4 |
+	fis8 fis'4 e8 d d'4 c8 |
+				% \barNumberCheck #50
+	b4 d8 a b4 a |
+	a a,8. g16 fis4 fis'8. e16 |
+	d4. d8 d4 cis |
+	% end of common part - the rest is written in the violin parts
+      }
diff -ruN orig/violin_one.ily new/violin_one.ily
--- orig/violin_one.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_one.ily	2015-09-02 06:42:00.000000000 -0500
@@ -0,0 +1,15 @@
+\version "2.18.2"
+
+\include "violin_common.ily"
+
+violinone =  \relative c'' {
+	\time 4/4
+	\key d \major
+	R1*2
+	\violinCommon
+	d8 d,  cis cis'   b b, a a' |
+	g g'   fis fis, e b' e, e' |
+	fis fis,   e e'   d d,   cis cis' |
+	b b'  a a,  g8. e'16   a,8 a |
+	a4 r r2 \bar "|."
+      }
diff -ruN orig/violin_one_part.ly new/violin_one_part.ly
--- orig/violin_one_part.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_one_part.ly	2015-09-02 06:42:01.000000000 -0500
@@ -0,0 +1,21 @@
+\version "2.18.2"
+
+#(set-global-staff-size 20)
+
+\include "header.ily"
+\include "violin_one.ily"
+
+\score {
+  << 
+  \compressFullBarRests
+    \new Staff = violinI \with {
+      midiInstrument = #"violin"
+      instrumentName = \markup {
+        \center-column { "Violin I" }
+      }
+    }
+    \violinone
+  >>
+\include "paper.ily"
+\include "midi.ily"
+}
diff -ruN orig/violin_three.ily new/violin_three.ily
--- orig/violin_three.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_three.ily	2015-09-02 06:42:01.000000000 -0500
@@ -0,0 +1,11 @@
+\version "2.18.2"
+
+\include "violin_common.ily"
+
+violinthree =   \relative c'' {
+	\time 4/4
+	\key d \major
+	R1*6
+	\violinCommon
+	d4 r r2 \bar "|."
+}
diff -ruN orig/violin_three_part.ly new/violin_three_part.ly
--- orig/violin_three_part.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_three_part.ly	2015-09-02 06:42:02.000000000 -0500
@@ -0,0 +1,20 @@
+\version "2.18.2"
+
+#(set-global-staff-size 20)
+\include "header.ily"
+\include "violin_three.ily"
+
+\score {
+  << 
+  \compressFullBarRests
+    \new Staff = violinIII \with {
+      midiInstrument = #"violin"
+      instrumentName = \markup {
+        \center-column {"Violin III" }
+      }
+    }
+    \violinthree
+  >>
+\include "paper.ily"
+\include "midi.ily"
+}
diff -ruN orig/violin_two.ily new/violin_two.ily
--- orig/violin_two.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_two.ily	2015-09-02 06:42:03.000000000 -0500
@@ -0,0 +1,15 @@
+\version "2.18.2"
+
+\include "violin_common.ily"
+
+violintwo =   \relative c'' {
+	\time 4/4
+	\key d \major
+
+	R1*4
+	\barNumberCheck #5
+	\violinCommon
+	d8 d,  cis cis'   b b, a a' |
+	g g'   fis fis, e b' e, e' |
+	fis4 r r2 \bar "|."
+      }
diff -ruN orig/violin_two_part.ly new/violin_two_part.ly
--- orig/violin_two_part.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/violin_two_part.ly	2015-09-02 06:42:03.000000000 -0500
@@ -0,0 +1,21 @@
+\version "2.18.2"
+
+#(set-global-staff-size 20)
+
+\include "header.ily"
+\include "violin_two.ily"
+
+\score {
+  <<
+    \compressFullBarRests
+    \new Staff = violinII \with {
+      midiInstrument = #"violin"
+      instrumentName = \markup {
+        \center-column {"Violin II" }
+      }
+    }
+    \violintwo
+  >>
+\include "paper.ily"
+\include "midi.ily"
+}
diff -ruN orig/violoncello.ily new/violoncello.ily
--- orig/violoncello.ily	1969-12-31 18:00:00.000000000 -0600
+++ new/violoncello.ily	2015-09-02 06:42:04.000000000 -0500
@@ -0,0 +1,11 @@
+\version "2.18.2"
+
+violoncello = \relative c {
+	\time 4/4
+	\key d \major
+	\repeat unfold 28 {
+	  d4 a b fis |
+	  g d g a | 
+	}
+	d r 4 r 2 \bar "|."
+}
diff -ruN orig/violoncellopart.ly new/violoncellopart.ly
--- orig/violoncellopart.ly	1969-12-31 18:00:00.000000000 -0600
+++ new/violoncellopart.ly	2015-09-02 06:42:06.000000000 -0500
@@ -0,0 +1,22 @@
+\version "2.18.2"
+
+#(set-global-staff-size 20)
+
+\include "header.ily"
+\include "violoncello.ily"
+
+\score {
+    << 
+      \context Staff = violoncello \with {
+        midiInstrument = #"cello"
+        instrumentName = \markup {
+          \center-column { "Violoncello" }
+        }
+      } <<
+        \clef "bass"
+	\violoncello
+      >>
+    >>
+\include "paper.ily"
+\include "midi.ily"
+}