From: Tucker Johnson <tucker@newer.systems>
Date: Wed, 6 Aug 2025 11:59:35 +0000 (-0400)
Subject: work
X-Git-Url: https://git.newer.systems/?a=commitdiff_plain;h=38bede158d503a94a91a388b7c6250ae8198cada;p=net-clarity.git

work
---

diff --git a/manuscripts/I-clarinet.ly b/manuscripts/I-clarinet.ly
index 0971a94..5323b58 100644
--- a/manuscripts/I-clarinet.ly
+++ b/manuscripts/I-clarinet.ly
@@ -13,18 +13,17 @@
   \numericTimeSignature
   \clef treble
   \tempo 4=114
-  \time 5/4 \tuplet 3/2 { e''8( dis cis) } fis16( ais,8) b16( gis8)-. r8 c16( d8) a16~ a16 g'8( f16) |
-  \time 4/4 \tuplet 3/2 { bes,8(  ees4-.) } r16 fis,16( g a) b( c d-.) e( \tuplet 3/2 { des8) f( aes) } |
-  \tuplet 3/2 { ees8-> g( bes) } r8 c8~ c2 |
-  \tuplet 3/2 { cis4( a) b~ } b4 d4 |
-  \time 5/8 aes8( f c a e) |
-  \time 4/4 \tuplet 5/4 { d4 b4 g8~ } g2~ |
-  \time 5/4 g2. \tuplet 6/4 { bes''16( aes ges f ees des } b!4) |
-  \time 4/4 d8( g~ g8.) aes16( f c8) ees16( bes ges8) a16( |
-  cis16 e) g8-. g16( b  d8~ 4.) ees8( |
-  \tuplet 3/2 { des8 c) bes( } \tuplet 3/2 { aes ges f) } a,8. e'16~ e8 b8~ |
-  b2 b8 dis16( fis cis gis f8) |
-  e16( c a8) d8. f,16~ 16 bes8.
+  g'8. aes16( ees8)-. r8 f8. ges16( d16 e8) a,16~ |
+  a4. b16( bes des8)-. ees16( d c8)-. r8 |
+  \time 3/4 r16 g'16( ais b~ b4) \tuplet 3/2 { r8 des8( c) } |
+  \time 4/4 a4.( gis8)-. r8 b( e c) |
+  \tuplet 3/2 { d8( ees, des } e8)-. a16( f) g( fis) gis( e ees8)-. ees16( d |
+  \time 3/4 \tuplet 3/2 { bes8) c( aes) } cis16( a b8)-. b16( e f) g( |
+  \time 4/4 \tuplet 3/2 { fis8) ees( cis } d8) d16( bes g8-.) r8 r8 a16( fis) |
+  \time 3/4 \tuplet 3/2 { fis8( aes c } b-.) r8 \tuplet 3/2 { e8( f) b( } |
+  \time 3/4 d16[) c( ees) des]( \tuplet 3/2 { f8 aes)-. ges8( } bes16[ a e8])-. |
+  \time 2/4 \tuplet 3/2 { r8 g8( f } ees16)-. d( c bes)-. |
+  \time 4/4 a,8.-> e''16( fis cis8)-. b'16( gis ais dis,8)-. r4 |
+  \tuplet 3/2 { g,4_( f8 } c'8)-. r8 \tuplet 3/2 { d4( b8 } e8)-. r8 |
 
-
-}
+  }
diff --git a/manuscripts/I-piano.ly b/manuscripts/I-piano.ly
index 82e8303..60f5699 100644
--- a/manuscripts/I-piano.ly
+++ b/manuscripts/I-piano.ly
@@ -11,49 +11,32 @@
   \new Staff = "u" \with { \consists "Merge_rests_engraver" }
   {
     \relative { \numericTimeSignature
-    \time 5/4 R1*5/4 |
-    \time 4/4 R1 |
-    \tuplet 3/2 { r8 g'4~ } g4~ \tuplet 3/2 { g8 g4~ } g4~ |
-    <<
-      {
-        \voiceTwo
-        \tuplet 3/2 { g8 g4~ } g4~ g4
-      }
-      \new Voice {
-        \voiceOne
-        s4 \tuplet 3/2 { r8 b4~ } b4
-      }
-    >>
-    \oneVoice
-    <d, g b>~\arpeggio |
-    \time 5/8 4 4.\arpeggio |
-    \time 4/4 <d b' fis'>2\arpeggio 2\arpeggio |
-    \time 5/4 2\arpeggio 2\arpeggio 4~\arpeggio |
-    \time 4/4 4 2\arpeggio 4~\arpeggio |
-    8 8~\arpeggio 4 2\arpeggio |
-    2\arpeggio 2\arpeggio |
-    2\arpeggio 2\arpeggio |
-    d r2 |
-
+      R1 |
+      c'''2. \tuplet 3/2 { a8( gis cis~ } |
+      \time 3/4 cis4.) fis,16( e \tuplet 3/2 { f8) d( ees) } |
+      \time 4/4 f4( bes,) \tuplet 3/2 { fis8( g4~ } g4~ |
+      <g b>1) |
+      \time 3/4 R1*3/4 |
+      \time 4/4 R1 |
+      \time 3/4 R1*3/4 |
+      R1*3/4 |
     }
   }
   \new Staff = "d" \with { \consists "Merge_rests_engraver" }
   {
-    \relative { \numericTimeSignature
     \clef bass
-    R1*5/4 |
-    r4 <fis g>2 4~ |
-    4 2 4~ |
-    4 2 4~\arpeggio |
-    4 4.\arpeggio |
-    <g, g'>2\arpeggio 2\arpeggio |
-    2\arpeggio 2\arpeggio 4~\arpeggio |
-    4 2\arpeggio 4~\arpeggio |
-    8 8~\arpeggio 4 2\arpeggio |
-    2\arpeggio 2\arpeggio |
-    2\arpeggio 2\arpeggio |
-    2 2 |
-  }
+    \relative {
+      R1 |
+      R1 |
+      \time 3/4 R1*3/4 |
+      \time 4/4 R1 |
+      R1 |
+      \time 3/4 R1*3/4 |
+      \time 4/4 R1 |
+      \time 3/4 R1*3/4 |
+      R1*3/4 |
+    }
+
 
   }
 >>