diff --git a/Joseph-Haydn-String-Quartet-No-38.ly b/Joseph-Haydn-String-Quartet-No-38.ly
index f450fe3..f58d99c 100644
--- a/Joseph-Haydn-String-Quartet-No-38.ly
+++ b/Joseph-Haydn-String-Quartet-No-38.ly
@@ -1,4 +1,4 @@
-\version "2.24.3"
+\version "2.25.3"
 \language "english"
 
 \include "lilypond-hd/functions.ly"
@@ -124,7 +124,21 @@ scorePartIViolinII = \relative c' {
   r8 \rep 3 ef-. r8 \rep 3 d-. | r8 \rep 3 ef-. r \rep 3 df-. | r \rep 3 c-. r d!-. d-. d-. | ef r d r ef4 r | 
   
   \mark A
-  
+  bf'2\(( b8-2) d8-.-1\) f8-.\( d16( b)\) | c2 c,8-. ef-. gf-.-4\( ef16-3( c)\) |
+  d2\p( ef) | d-3( bf) | c4\mf( bf) c( bf) | c( d ef d) | c r r8 b16-1->\upbow( c) c4~\( |
+  c8 d16->( ef)\) ef8-. d-. g4.-0( ef8) |
+  d8-.\cresc d-. \! d\turn ef16( c) d8-0-. bf'-. bf\turn c16( a) | 
+  bf8-. d-. d\turn ef16( c) d8-. <bf f'>-.\f <bf f'>-. <bf f'>-. | <bf f'>4 r r8 bf\upbow\p r8 c\upbow |
+  r8 a r8 bf r bf r df | d!2\f r2 | 
+   \once \set subdivideBeams = ##t 
+   \once \set beamMaximumSubdivision = #1/8 { \triN df,16 df df \triN df df df } 
+   \once \set subdivideBeams = ##t
+   \once \set beamMaximumSubdivision = #1/8 { \triN c c c \triN c c c } 
+   bf4 r8 bf'8~ | bf8 r8 r4 \rep 4 bf8-. |
+   \rep 2 bf8-. \rep 2 a-. bf4._\markup { \italic "mezza voce" } bf16\downbow( ef) |
+   ef8-. bf16( d) d8-. bf16( g') g8-. bf,16( f') f8-. bf,-.\p |
+   bf8 r a r bf4 r | r2 r4 r8 af!16( g) | g8 r <c, ef> r <bf d> r 
+   \bar ":..:"
 }
 
 scorePartIViola = \relative c' {