From ec14c55c0bffdce122bffb12d5c8a3950439b504 Mon Sep 17 00:00:00 2001
From: Davide Madrisan <d.madrisan@proton.me>
Date: Mon, 26 Feb 2024 22:41:52 +0100
Subject: [PATCH] J.S. Bach: Partita 2 BWV826 - Sinfonia: ossia for 18th
 century dotted rhythm

Signed-off-by: Davide Madrisan <d.madrisan@proton.me>
---
 .../BWV826/parts/bach-partita-2-1-sinfonia.ly | 52 +++++++++++++------
 1 file changed, 37 insertions(+), 15 deletions(-)

diff --git a/src/johann-sebastian-bach/partitas/BWV826/parts/bach-partita-2-1-sinfonia.ly b/src/johann-sebastian-bach/partitas/BWV826/parts/bach-partita-2-1-sinfonia.ly
index 0cf1e250..ba140d34 100644
--- a/src/johann-sebastian-bach/partitas/BWV826/parts/bach-partita-2-1-sinfonia.ly
+++ b/src/johann-sebastian-bach/partitas/BWV826/parts/bach-partita-2-1-sinfonia.ly
@@ -4,6 +4,18 @@ Global = {
   \include "../global.ly"
 }
 
+voiceOneOssia = \relative c'' {
+  | \key c \minor
+    << {
+      \stemUp <c ees>4 g'16.\rest ees32 d16. ees32 f4 g16.\rest f32 f16. g32
+    } \\ {
+      \stemDown g,4_\markup \italic {
+        "ossia" (in the early 18th century, dotted rests are rarely indicated in the score)
+      }
+      g16.\rest c32 b16. c32 d4 g,16.\rest d'32 d16. ees32
+    } >>
+}
+
 Soprano = \context Voice = "one" \relative c'' {
   \voiceOne
   \stemUp
@@ -286,23 +298,33 @@ Bass = \context Voice = "four" \relative c {
 }
 
 \score {
-  \new PianoStaff
   <<
-    \accidentalStyle Score.piano
-    \context Staff = "upper" <<
-      \set Staff.midiInstrument = #"acoustic grand"
-      \Global
-      \clef treble
-      \Soprano
-      \Alto
-    >>
-    \context Staff = "lower" <<
-      \set Staff.midiInstrument = #"acoustic grand"
-      \Global
-      \clef bass
-      \Tenor
-      \Bass
+  \new Staff = "ossia" \with {
+    fontSize = #-3
+    \include "./ossiasetup.ly"
+    \hide Clef
+    \remove Time_signature_engraver
+  }
+  { \voiceOneOssia }
+  \new PianoStaff {
+    <<
+      \accidentalStyle Score.piano
+      \context Staff = "upper" <<
+        \set Staff.midiInstrument = #"acoustic grand"
+        \Global
+        \clef treble
+        \Soprano
+        \Alto
+      >>
+      \context Staff = "lower" <<
+        \set Staff.midiInstrument = #"acoustic grand"
+        \Global
+        \clef bass
+        \Tenor
+        \Bass
+      >>
     >>
+  }
   >>
   \header {
     composer = ##f # "Johann Sebastian Bach"