From: Tucker Johnson <tucker@newer.systems>
Date: Sat, 15 Jun 2024 03:00:23 +0000 (-0400)
Subject: part work
X-Git-Url: https://git.newer.systems/?a=commitdiff_plain;h=fb0a53480739df9a42a16341543c8c29245476c9;p=net-clarity.git

part work
---

diff --git a/manuscripts/III-clarinet.ly b/manuscripts/III-clarinet.ly
index 4f27787..004d9ef 100644
--- a/manuscripts/III-clarinet.ly
+++ b/manuscripts/III-clarinet.ly
@@ -79,7 +79,7 @@
   } 4 = 75
   \time 7/4 1) r2. |
   \undo \omit Score.BarNumber
-  R1*7/4*3 |
+  R1*7/4*3 | \tag #'part  { \break }
   <<
     { \override Rest.staff-position = #0 \time 4/4 r2 r4 \tuplet 5/4 { r8. ees'16(\< aes) } | }
     \tag #'part  {
@@ -105,7 +105,7 @@
   4) \tuplet 3/2 { c4( a d~\f\> } 4) |
   fis,2\! r8 f(\p bes,4~ |
   8)[\< c8]( a' d,~\> 2) |
-  g8( ees~\! 2) e4~ |
+  g8( ees~\mp 2) e4~ |
   e4. cis'8(\f gis8 b8~ 4) |
   fis16( a d,8~ 4) f(\startTextSpan ees8.) fes,16(\stopTextSpan |
 
@@ -140,7 +140,7 @@
   R1 |
   \time 3/4 r4 bes2( |
   ges4 aes2) |
-  R1*3/4
+  R1*3/4 \tag #'part  { \pageBreak }
 
   \sectionLabel \markup { \box \number 62 }
 
@@ -161,8 +161,8 @@
     }
     \tag #'part  {
       \new CueVoice \relative {
-        ees,8[\laissezVibrer bes']\laissezVibrer  f'[\laissezVibrer  c']\laissezVibrer  g'[\laissezVibrer d'8]~ |
-        \time 4/4 d8\fermata f8~ 2 f8 ees |
+        ees,8[\laissezVibrer bes'8]\laissezVibrer f'8[\laissezVibrer c']\laissezVibrer g'8[\laissezVibrer <g\laissezVibrer d'>8]~ |
+        \time 4/4 8\fermata f'8~ 2 f8 ees |
         \time 3/4 bes'2. |
         \time 4/4 r8 bes8~ 4 aes4. e8 |
         \time 3/4 b'2. |
@@ -190,6 +190,6 @@
   \time 5/4 r8 a8~ 2 r2 |
   ees'2~\p 8 r8 r2 |
   \time 4/4 r4 r8 bes8~(\mp\> 8 f4.~ |
-  \time 5/8 8 c'8~\p 4) r4 r2 |
+  \time 5/4 8 c'8~\p 4) r4 r2 |
   r4 r4 e8_(\pp b'8~ b2)\fermata \bar "|."
 }
diff --git a/manuscripts/IV-clarinet.ly b/manuscripts/IV-clarinet.ly
index 362dcb4..6a85f54 100644
--- a/manuscripts/IV-clarinet.ly
+++ b/manuscripts/IV-clarinet.ly
@@ -21,10 +21,26 @@
   \time 4/4 R1*5
   \time 5/4 R1*5/4 |
   \time 4/4 R1*13 |
+
+  \omit Score.BarNumber
+  \sectionLabel \markup { \box \number 21 }
   \time 3/4 R1*3/4*7 |
-  \time 5/8 R1*5/8 \molRit \after 4 \startTextSpan R1*5/8 |
-  \time 2/8 \after 8. \stopTextSpan R1*2/8 |
-  \once \override Hairpin.circled-tip = ##t
+  \undo \omit Score.BarNumber
+  <<
+    {
+      \time 5/8 R1*5/8
+      \molRit \after 4 \startTextSpan R1*5/8 |
+      \time 2/8 \after 8. \stopTextSpan R1*2/8 |
+      \once \override Hairpin.circled-tip = ##t
+    }
+    \tag #'part  {
+        \new CueVoice \relative {
+        \time 5/8 s4 s4. | %028
+        f''16 bes,8. g16[ d'16 fis16 e16 cis'16 a16] | %029
+        \time 2/8 \tuplet 3/2 { <ees ees'>8 <aes, aes'>8 <b b'>8 } | %030
+        }
+    }
+  >>
   \time 3/4 c'2.~\fermata\< \bar "||" %031
 
   \omit Score.BarNumber
@@ -40,11 +56,11 @@
   r8 aes8~\mp\< aes2.~ | %038
   \time 3/4 \after 2 \! aes2.\f\> | %039
   \time 2/2 r4 r8 d8~\p\> 2~ | %040
-  d2\mf r4 e4~( | %041
+  d2\mf r4 e4~ | %041
   e1~\> | %042
   e4 cis,2.~\mp | %043
   \tuplet 5/4 { cis2\< a'8~\mf } a2~ | %044
-  \after 2. \p a1)\> | %045
+  \after 2. \p a1\> | %045
   \time 5/4 r4 \after 4 \< bes1~( | %046
   \time 2/2 bes4 b2.)\mf | %047
   r2 c8-.\f g-. a4~ | %048
@@ -166,7 +182,7 @@
   \override Score.TimeSignature.stencil = ##f
   \time 7/8  d,-.\! r8 r4\shortfermata \once \override Staff.Stem.stencil = ##f
   \footnote \markup \huge "*" #'(0 . 4) \markup \tiny \left-column {
-    \line { "*Cadenza notation should be interpreted freely, though Music should be" } \vspace #-0.4
+    \line { "* Cadenza notation should be interpreted freely, though music should be" } \vspace #-0.4
     \line { "continuous between breath marks and rests. Breath marks indicate a short" } \vspace #-0.4
     \line { "break, while rests are longer." }
   }
diff --git a/manuscripts/IV-piano.ly b/manuscripts/IV-piano.ly
index 88fb4fa..c9afa6f 100644
--- a/manuscripts/IV-piano.ly
+++ b/manuscripts/IV-piano.ly
@@ -27,7 +27,7 @@
       r2 r4 r16 d16(^\pp e8 | %009
       b1~ | %010
       4~ 8) 8~(^\mf 8. a16~ 4~ | %011
-      4) r8. d16(^\> a4~ 8 bes8 | %012
+      4) r8. d16(^\> a4~ 8 bes8 | \break %012
       c1)^\mp | %013
       r4 g'2( f8^\< e8~ | %014
       e8 fis16 dis16 b8 gis'8 cis,2~^\mf | %015
@@ -51,7 +51,7 @@
       bes16\f ees8.~ ees8 d8~ d4~ | %026
       d8) r8 aes4 f'8-. c16-.\> g16-. | %027
       \time 5/8 \after 4.. \mp R1*5/8 | %028
-      f'16(\< bes,8.) \molRit g16[(\startTextSpan d'16 fis16 e16 cis'16 a16]) | %029
+      f'16(\< bes,8.) \molRit g16[(\startTextSpan d'16 fis16 e16 cis'16 a16]) | \break %029
       \time 2/8 \tuplet 3/2 { <ees ees'>8->\f\> <aes, aes'>8-> <b b'>8->\stopTextSpan } | %030
       \time 3/4 <c c'>2.\mf\fermata \clef bass | %031
 
@@ -166,8 +166,8 @@
         \new Voice \relative {
           \voiceTwo
           s2. r4 des'4\mf des4(-> | %097
-          aes'2.) s8 | %098
-          s2. r4. fis'4.~(\mf | %099
+          aes2.) s8 | %098
+          s2. r4. fis''4.~(\mf | %099
           8. | %100
           f!2.) | %101
           r8 b,8~ b2~ b2.~ 4. \mark \markup { \smaller \musicglyph "scripts.ufermata" } | %102
diff --git a/net-clarity.ly b/net-clarity.ly
index 26f04a6..df31177 100644
--- a/net-clarity.ly
+++ b/net-clarity.ly
@@ -305,7 +305,7 @@ clarinetMagstep = #(magstep -2)
         piece = \markup { \large \bold "IV." }
       }
       <<
-        \include "manuscripts/IV-clarinet.ly"
+        \removeWithTag #'part \include "manuscripts/IV-clarinet.ly"
         \include "manuscripts/IV-piano.ly"
       >>
       %\midi { }