work

diff --git a/manuscripts/III-clarinet.ly b/manuscripts/III-clarinet.ly
index 7c9434ac1223a5587d362a16e5d3d7001dcfd13f..0f1808343314fdf6abfd7881b8f3d7554ba62c5b 100644 (file)
--- a/manuscripts/III-clarinet.ly
+++ b/manuscripts/III-clarinet.ly
@@ -143,32 +143,80 @@
   \resetRelativeOctave c''
   f'2.~\f 8 r8 |
 
-  \sectionLabel \markup { \huge \box \sans \bold 36 }
+  <<
+    {
+      \sectionLabel \markup { \huge \box \sans \bold 36 }
 
-  \omit Score.BarNumber
-  bes,1-- |
-  \undo \omit Score.BarNumber
-  r2 r4 \tuplet 3/2 { r8 r8 fis'8~\f } |
-  fis2. r4 |
-  R1 |
-  cis2.--\mf r4 |
-  b8(\mp e,~ 2\< g4~ |
-  4) \tuplet 3/2 { c4( a d~\f\> } 4) |
-  fis,2\! r8 f(\p bes,4~ |
-  8)[\< c8]( a' d,~\> 2) |
-  g8( ees~\mp 2) e4~ |
-  e4. cis'8(\f gis8 b8~ 4) |
-  fis16( a d,8~ 4) f(\startTextSpan ees8.) fes,16(\stopTextSpan |
+      \omit Score.BarNumber
+      bes,1-- |
+      \tag #'part { \break \noPageBreak }
+      \undo \omit Score.BarNumber
+      r2 r4 \tuplet 3/2 { r8 r8 fis'8~\f } |
+    }
+    \tag #'part \new Staff \with {
+      alignAboveContext = "cl3"
+      \magnifyStaff #2/3
+      \remove Ottava_spanner_engraver
+    }
+    \tag #'part {
+      \override Staff.SectionLabel.font-size = #2.5
+      \transpose c bes, \relative {
+        \once \omit Staff.TimeSignature
+        \once \omit Staff.Clef
+        \stopStaff s2. \startStaff \clef "treble" <g' g'>8\arpeggio <d' d'>8\arpeggio |
+        <<
+          {
+            \voiceOne
+            <a' a'>4.\arpeggio <cis, cis'>8\arpeggio <gis' gis'>4\arpeggio \tuplet 3/2 { <dis dis'>8 <e e'> <fis fis'>\laissezVibrer } |
+          }
+          \new Voice \with {
+            \consists Ottava_spanner_engraver
+          }
+          {
+            \voiceTwo
+            \ottava #-1 <e,, c,>2\arpeggio \tuplet 3/2 { d,8^\laissezVibrer bes'^\laissezVibrer f'^\laissezVibrer }
+          }
+        >>
+      }
+    }
+  >>
+  fis2. r4 | %038
+  R1 | %039
+  cis2.--\mf r4 | %040
+  b8(\mp e,~ 2\< g4~ | %041
+  4) \tuplet 3/2 { c4( a d~\f\> } 4) | %042
+  fis,2\! r8 f(\p bes,4~ | %043
+  8)[\< c8]( a' d,~\> 2) | %044
+  g8( ees~\mp 2) e4~ | %045
+  e4. cis'8(\f gis8 b8~ 4) | %046
+  <<
+    {
+      fis16( a d,8~ 4) \timeSpanner "rit." f(\startTextSpan ees8.) fes,16(\stopTextSpan | %047
 
-  \sectionLabel \markup { \huge \box \sans \bold 48 }
+      \sectionLabel \markup { \huge \box \sans \bold 48 }
 
-  \omit Score.BarNumber
-  \tempo 4=50
-  des'1)\> |
-  \undo \omit Score.BarNumber
-  \tweak self-alignment-X #CENTER \textEndMark \markup { \concat { \rhythm { \tuplet 3/2 { 8 } } " = " \rhythm { { 8 } } } }
-  \tempo "   " 4 = 75
-  aes4(\mf bes2.~ |
+      \omit Score.BarNumber
+      \tempo 4=50
+      des'1)\> | %048
+      \undo \omit Score.BarNumber
+      \tweak self-alignment-X #CENTER \textEndMark \markup { \concat { \rhythm { \tuplet 3/2 { 8 } } " = " \rhythm { { 8 } } } }
+      \tempo "   " 4 = 75
+      aes4(\mf bes2.~ | %049
+    }
+    \tag #'part \new Staff \with {
+      alignAboveContext = "cl3"
+      \magnifyStaff #2/3
+      \remove Ottava_spanner_engraver
+    }
+    \tag #'part {
+      \override Staff.SectionLabel.font-size = #2.5
+      \transpose c bes, \relative {
+        \once \omit Staff.TimeSignature
+        \once \omit Staff.Clef
+        \stopStaff s4. \startStaff \clef "bass" <b des'>16( <gis c'>16 \tuplet 3/2 { <e aes'>8) a,_( <d bes''> } <fis, g''>16) c'_( <f, b''> des) |
+      }
+    }
+  >>
   bes2~\> 8)\p r8 r4 |
   \time 3/4 r4 r4 r8 c8~\f |
   \time 4/4 c2.\> g4(\mp |

diff --git a/parts.ly b/parts.ly
index 84e2a45020d6c0d6eee76737e4d35f34cbcb6a65..eae781524b0642055f392b9e28a22636fa00979d 100644 (file)
--- a/parts.ly
+++ b/parts.ly
@@ -42,6 +42,7 @@ clarinetMagstep = #(magstep 0)
         \context {
           \Staff
           \remove Instrument_name_engraver
+          ottavationMarkups = #ottavation-ordinals
         }
       }
     }
@@ -121,6 +122,7 @@ clarinetMagstep = #(magstep 0)
         \context {
           \Staff
           \remove Instrument_name_engraver
+          ottavationMarkups = #ottavation-ordinals
         }
       }
     }
@@ -151,6 +153,7 @@ clarinetMagstep = #(magstep 0)
           \Staff
           \remove Instrument_name_engraver
           \consists Mark_engraver
+          ottavationMarkups = #ottavation-ordinals
         }
       }
     }