better support for stripping content

This commit is contained in:
2026-01-19 22:27:20 +01:00
parent ec9a5f340e
commit dc37f20b7d
2 changed files with 332 additions and 360 deletions

View File

@@ -1,359 +1,331 @@
\version "2.24.4" \version "2.24.3"
\language "english" \language "english"
\header { \header {
title = "String Quartett op. 20, nr. 4" title = "String Quartett op. 20, nr. 4"
composer = "Jospeh Haydn" composer = "Jospeh Haydn"
opus = "op. 20" opus = "op. 20"
tagline = "(p) Hans Dijkema 2026" tagline = "(p) Hans Dijkema 2026"
} }
\paper { \paper {
#(set-paper-size "a4") #(set-paper-size "a4")
% Add space for instrument names % Add space for instrument names
indent = 25\mm indent = 25\mm
} }
partone = { partone = {
\key d \major \key d \major
\time 3/4 \time 3/4
\tempo "Allegro di molto" \tempo "Allegro di molto"
} }
parttwo = { parttwo = {
\key f \major \key f \major
\time 2/4 \time 2/4
\tempo "Un poco Adagio, affetuoso." \tempo "Un poco Adagio, affetuoso."
} }
none = #(define-scheme-function \include "lilypond-hd/functions.ly"
(n1 n2 n3 n4 n5 n6 n7 n8 n9)
(ly:music? ly:music? ly:music? ddot = #(define-music-function
ly:music? ly:music? ly:music? (n)
ly:music? ly:music? ly:music?) (ly:music?)
#{ \times 2/3 { $n1 $n2 $n3 } (let ((stripped_n (forceAccidental 0 (stripArticulations (rmtext (flattenPitch n))))))
\times 2/3 { $n4 $n5 $n6 } ;(display stripped_n)(newline)
\times 2/3 { $n7 $n8 $n9 } #{
#} $n -. $stripped_n -. $stripped_n -.
) #}
)
tri = #(define-scheme-function )
(n1 n2 n3)
(ly:music? ly:music? ly:music?) dslur = #(define-scheme-function
#{ (n)
\times 2/3 { $n1 $n2 $n3 } (ly:music?)
#} (let ((stripped_n (forceAccidental 0 (stripArticulations (rmtext (flattenPitch n))))))
) ;(display stripped_n)(newline)
#{
ddot = #(define-music-function $n -. ($stripped_n -. $stripped_n -.)
(n) #}
(ly:music?) )
#{ )
#n -. #n -. #n -.
#} % First violin pieces
) vIFirst = { \relative c' { \dslur d4\p\downbow-2 d2.-0( g-2) \stemUp fs4_\(-. b-3_( a)\) \stemNeutral d2\open c16-4 (b a b )a4 r r } }
ddott = #(define-scheme-function scoreAViolinI = \relative c' {
(n f) \partone
(ly:music? ly:music?) % Music follows here.
#{ \repeat volta 2 {
#n -. #f -. #f -. \vIFirst
#} \relative c' \dslur d4 { d2.-4( b2. ) a4 (d-0 fs-1) a2 (\afterGrace { g4\trill } { fs16 [g ] } fs4) r r }
) \vIFirst
\relative c' { \ddot e4-1 e _\(g b\) a2. _\((a4) b _(g) \) fs2-2 (g8 e8 d4) r r }
dslur = #(define-scheme-function \relative c' { \dslur c4 c2 (b4) g'4-. (g-. g-.) fs _\( (g) b-.\) a2 (\relative c' cs!4 ) d, r r }
(n)
(ly:music?) \mark A
#{ \relative c'' {
$n -. ($n -. $n -.) {\none b8-1\f d fs b fs d b fs d } b4 r r
#} %\times 2/3 { b8-1\f d fs } \times 2/3 { b fs d } \times 2/3 { b fs d } b4 r r
) d'4-. (d-. d-.) d2 (e8 _\( b \) ) cs4-. (cs-. cs-.) cs-. r r
{\none a8\f c e a e c a e c} a4 r r
dslurr = #(define-scheme-function a'-.\p (a-. a-.) a-0 (b) c (c) b (ds-1) e2.
(n f) (\none e8\f) ds (e) fs e d c-2 b a gs4 r e'-2
(ly:music? ly:music?) (\none e8) ds (e) fs e d c-2 b a gs4 r r
#{ {\none a8 (cs) e a gs fs e d cs }
$n -. ($f -. $f -.) {\none b (fs'-3) e d cs-2 b a gs fs }
#} {\none e \downbow (gs) a-.-2 \upbow b (a) gs a-0 (b) cs }
) d2-> (cs4) fs2.->_3
{\none e8 (gs) fs e g a b cs-1 d }
e2.-> (e4\p) d (cs) d2.-> (d4) cs-2 (bs)
% First violin pieces cs2.-> \(\none cs8\) bs \(cs d cs b a_4 gs fs\)
vIFirst = { \relative c' { d4\p\(-.\downbow-2 d-. d-.\) d2.-0( g-2) \stemUp fs4_\(-. b-3_( a)\) \stemNeutral d2\open c16-4 (b a b )a4 r r } } e4 e-.\pp (e-.)
e2. (e4) a (gs) gs \(fs\trill e (e)\) {\tri fs8 (d b)} cs4 \((cs) b\) {\tri d8 (b gs_1)} a4 r r
scoreAViolinI = \relative c' {
\partone \mark B
% Music follows here. \ddot as,-.\p as (b) fs'-4\( (\=1(fs\=1) e) gs,-.\)
\repeat volta 2 { \ddot a!\f
\vIFirst a4. b16 (c-1 d e-1 fs gs a4-.) a'4.-3 (gs8) gs4-. g2\fz
\relative c' \dslur d4 { d2.-4( b2. ) a4 (d-0 fs-1) a2 (\afterGrace { g4\trill } { fs16 [g ] } fs4) r r } \none fs8\downbow( e) d cs( b) b' b( b,) a'
\vIFirst \none a( gs) a b a gs fs e b'
\relative c' { e4-.-1 e-. e-. e _\(g b\) a2. _\((a4) b _(g) \) fs2-2 (g8 e8 d4) r r } \repeat unfold 2 {
\relative c' { c4-. (c-. c-.) c2 (b4) g'4-. (g-. g-.) fs _\( (g) b-.\) a2 (\relative c' cs!4 ) d, r r } \none gs( e) b' gs( e) b' gs( e) b'
\none a gs fs e d cs b( a) b'
\mark A }
\relative c'' { \none gs( e) b' gs( e) b' gs( e) b'
{\none b8-1\f d fs b fs d b fs d } b4 r r \none a a,(\ff b cs-.) a( cs e-.) cs( e_2 g4-.) r r
%\times 2/3 { b8-1\f d fs } \times 2/3 { b fs d } \times 2/3 { b fs d } b4 r r
d'4-. (d-. d-.) d2 (e8 _\( b \) ) cs4-. (cs-. cs-.) cs-. r r \mark C
{\none a8\f c e a e c a e c} a4 r r r fs,-1\p\upbow( fs') cs2( d4) a2( b8 gs) a4-.\( cs_2\=1( d e\=1)\) a( g fs) r r
a'-.\p (a-. a-.) a-0 (b) c (c) b (ds-1) e2. r e( d) r d\upbow( cs) fs2.-3(-> fs8) e( ds e ds e-1) e2.( e4) a( gs g fs f_3 e ds d_3)
(\none e8\f) ds (e) fs e d c-2 b a gs4 r e'-2 cs2--\( \tri d8( b gs) \) a4-4 \tri r8\mf fs'\downbow( gs \tri a gs fs) e4-. r r
(\none e8) ds (e) fs e d c-2 b a gs4 r r r \tri r8 fs-3( e \tri d e fs) cs4-. r cs16( b a b) a4-. r r
{\none a8 (cs) e a gs fs e d cs } r \stemDown \tri r8 b(\downbow a \tri gs a b) \stemNeutral
{\none b (fs'-3) e d cs-2 b a gs fs } cs4-. \tri r8 d( e \tri fs e d) cs4-. r cs16( b a b) a4-. a4-.\p( a-.)
{\none e \downbow (gs) a-.-2 \upbow b (a) gs a-0 (b) cs } a2.( a2.)(a2.)(a4) a,-.( a-.
d2-> (cs4) fs2.->_3 \alternative {
{\none e8 (gs) fs e g a b cs-1 d } \volta 1 { a\upbow\< bf\!\> cs!-1\!) }
e2.-> (e4\p) d (cs) d2.-> (d4) cs-2 (bs) \volta 2 { \after 4 \> \after 2 \! a2(\< as4)\! }
cs2.-> \(\none cs8\) bs \(cs d cs b a_4 gs fs\) }
e4 e-.\pp (e-.) }
e2. (e4) a (gs) gs \(fs\trill e (e)\) {\tri fs8 (d b)} cs4 \((cs) b\) {\tri d8 (b gs_1)} a4 r r }
\mark B \repeat volta 2 {
\ddott as,-.\p as-. as (b) fs'-4\( (\=1(fs\=1) e) gs,-.\) \dslur b,4\p b2. a'2.\f g4( b e) ds( fs a) g( e as, b) b,-.(\p b-.)
\ddott a!\f a \after 4 \> \after 2 \! b2(\< bs4)\!
a4. b16 (c-1 d e-1 fs gs a4-.) a'4.-3 (gs8) gs4-. g2\fz \dslur cs\p cs2. b'2.\f a4( cs fs) es( gs b) a( fs bs,-2) cs( es_2 gs) fs( bs,-._1 bs-.) \decresc cs-.( cs-. cs-.)
\none fs8\downbow( e) d cs( b) b' b( b,) a' cs2( cs8._\reverseturn) ( d16_1) \!
\none a( gs) a b a gs fs e b' e4\p( cs a) g!-0( e cs)
\repeat unfold 2 {
\none gs( e) b' gs( e) b' gs( e) b' \mark D
\none a gs fs e d cs b( a) b'
} \dslur d d2.-0 g2.-2 \stemUp fs4-.\( b-3( a)\) \stemNeutral d2-0 cs16(\upbow b a b)
\none gs( e) b' gs( e) b' gs( e) b' a4-._\( a_( b)\) c2 b16\upbow( a gs a) gs4-.\( b( ds)\) e2 d16-3\upbow( cs b cs) b4 b( cs)
\none a a,(\ff b cs-.) a( cs e-.) cs( e_2 g4-.) r r d2 cs16-4( b as b) as4 cs( es) fs2 e!16-4( d cs d)
cs4 cs( d) e2 d16( cs b cs)
\mark C
r fs,-1\p\upbow( fs') cs2( d4) a2( b8 gs) a4-.\( cs_2\=1( d e\=1)\) a( g fs) r r \none b'8(\f fs) d cs b a g fs e
r e( d) r d\upbow( cs) fs2.-3(-> fs8) e( ds e ds e-1) e2.( e4) a( gs g fs f_3 e ds d_3) \none d( fs) b fs( b) d b( d) fs
cs2--\( \tri d8( b gs) \) a4-4 \tri r8\mf fs'\downbow( gs \tri a gs fs) e4-. r r \none b( fs) ds cs b a gs fs e
r \tri r8 fs-3( e \tri d e fs) cs4-. r cs16( b a b) a4-. r r \none ds( fs) b fs( b) ds b( ds) fs
r \stemDown \tri r8 b(\downbow a \tri gs a b) \stemNeutral \none b( g!) e d! c b a g fs
cs4-. \tri r8 d( e \tri fs e d) cs4-. r cs16( b a b) a4-. a4-.\p( a-.) \none e( g) b g( b) e b( e) g
a2.( a2.)(a2.)(a4) a,-.( a-. \repeat unfold 2 { \none b( a) fs b,( ds) fs b( a) fs }
\alternative { \none g(\cresc e) b' g( e) b' g( e) b'
\volta 1 { a\upbow\< bf\!\> cs!-1\!) } \none gs( e) b' gs( e) b' gs( e) b' \!
\volta 2 { \after 4 \> \after 2 \! a2(\< as4)\! } \none gs(\ff es) b' gs( es) b' gs( es) b' gs4 r r
}
} \dslur fs,\p fs2.-1( b2.) a4-.\( d( cs) \) fs2 e16( d cs d) cs4 r r
}
\mark E
\repeat volta 2 { fs2.(\f ^"I" fs)( fs)\((\upbow fs4) e-.\) e_4\(( e) d-.\) d( d) es, es fs fs\p-.( fs-.)
\dslurr b,4\p b b2. a'2.\f g4( b e) ds( fs a) g( e as, b) b,-.(\p b-.) \none fs8( as_2 b cs b as b_1 ^"III" cs d) e2->( d4)
\after 4 \> \after 2 \! b2(\< bs4)\! \none fs,8( as_2 b cs b as b_1 cs d) e2->( d4)
\dslurr cs\p cs cs2. b'2.\f a4( cs fs) es( gs b) a( fs bs,-2) cs( es_2 gs) fs( bs,-._1 bs-.) \decresc cs-.( cs-. cs-.) g2.( fs_3 e d4) b'( as a_3 gs g fs es e) e-4( d cs) d-.(\cresc d-. d-.)\!
cs2( cs8._\reverseturn) ( d16_1) \! b\(( d) d-.\) d2\fz \tri e8( cs as) b4-. d_1\p( d') as2( b4)
e4\p( cs a) g!-0( e cs) r d,( d') gs,2_1( a!4_2) r c,( c') cs,2-1( g'!4 b-.) r r
r a( g e'-._0) r r r g,( fs d'-.) r r
\mark D r e,( d) r d(\cresc c)\! r c( b) r b( a) r a(\f g) fs b,-. b-. b-. r r
R2.^"1"_"G.P."
\dslur d d2.-0 g2.-2 \stemUp fs4-.\( b-3( a)\) \stemNeutral d2-0 cs16(\upbow b a b)
a4-._\( a_( b)\) c2 b16\upbow( a gs a) gs4-.\( b( ds)\) e2 d16-3\upbow( cs b cs) b4 b( cs) \mark F
d2 cs16-4( b as b) as4 cs( es) fs2 e!16-4( d cs d) g4-.\p( g-. g-.) g2.( c-2) b4-.\( e-3( d)\) g2-0 fs16-4( e d e) d4 r r
cs4 cs( d) e2 d16( cs b cs) b''-.\f b-. b-. a2 b8( fs) g4-. g-. g-. g-. r r
d,-.\p( d-. d-.) d2.-0( g-2) fs4-._\( b-3_( a)\) d2-0 cs16( b a b) a4 r r
\none b'8(\f fs) d cs b a g fs e e-.-1( e-. e-.) e( g-1 b) a2._\(( a4) b( g)\) fs2( g8 e) d4 r r
\none d( fs) b fs( b) d b( d) fs c-.\pp( c-. c-.) c2( b4) g'-.( g-. g-.) fs_\(( g-1) b-.\) a( g fs-2)
\none b( fs) ds cs b a gs fs e e a\f a
\none ds( fs) b fs( b) ds b( ds) fs
\none b( g!) e d! c b a g fs \mark G
\none e( g) b g( b) e b( e) g \none a8\(( cs) d-.\) e( d) cs d-1( e) fs g2->( fs4)
\repeat unfold 2 { \none b( a) fs b,( ds) fs b( a) fs } \none a,,8\(( cs) d-._2\) e( d) cs d_0( e) fs g2->( fs4)
\none g(\cresc e) b' g( e) b' g( e) b' b2._3->
\none gs( e) b' gs( e) b' gs( e) b' \! \none a8( cs) b a cs d e fs-1 g a2.->( a4\p) g( fs)
\none gs(\ff es) b' gs( es) b' gs( es) b' gs4 r r g2.->( \none g8) a( g fs-2 g fs e fs g)
fs2.->( \none fs8) e( fs g fs e d_4 cs b)
\dslurr fs,\p fs fs2.-1( b2.) a4-.\( d( cs) \) fs2 e16( d cs d) cs4 r r a4 a-.\pp( a-.) a2.( a4) d'( cs) cs_3\( b\trill a( a)\) \tri b8( g e) fs4\(( fs) e-.\) \tri g8( e c-1) d4-1 r r
\mark E \mark H
fs2.(\f ^"I" fs)( fs)\((\upbow fs4) e-.\) e_4\(( e) d-.\) d( d) es, es fs fs\p-.( fs-.) \dslur ds,\p^"III" ds( e) b'-3\(( b)( a) cs,-.\)
\none fs8( as_2 b cs b as b_1 ^"III" cs d) e2->( d4) d!-.\f d-. d-.
\none fs,8( as_2 b cs b as b_1 cs d) e2->( d4) d4.-0 e16( fs g a b cs d4-.) d'4.( cs8) cs4-. c2\fz
g2.( fs_3 e d4) b'( as a_3 gs g fs es e) e-4( d cs) \dslurr d\cresc d \!
b\(( d) d-.\) d2\fz \tri e8( cs as) b4-. d_1\p( d') as2( b4) \none b8_4\downbow( a) g fs( e) g fs( e) cs
r d,( d') gs,2_1( a!4_2) r c,( c') cs,2-1( g'!4 b-.) r r \none d( cs) d e( d) cs b( a) e'
r a( g e'-._0) r r r g,( fs d'-.) r r \none cs( a) e' cs( a) e' cs( a) e'-2
r e,( d) r d(\cresc c)\! r c( b) r b( a) r a(\f g) fs b,-. b-. b-. r r \none d d' cs b a g fs( e) d
R2.^"1"_"G.P." \none cs-2( a) e' cs( a) e' cs( a) e'-2
\none d d' cs b a g fs( e) d
\mark F \none cs-2( a) e' cs( a) e' cs( a) e'-2
g4-.\p( g-. g-.) g2.( c-2) b4-.\( e-3( d)\) g2-0 fs16-4( e d e) d4 r r \none d d,\ff( e fs-.) d( fs a-.) fs( a_2 c4-.) r r
b''-.\f b-. b-. a2 b8( fs) g4-. g-. g-. g-. r r r b\upbow\p( b') fs2( g4) d2( e8 cs) d4-.\( fs( g a)\) d( c b) r r
d,-.\p( d-. d-.) d2.-0( g-2) fs4-._\( b-3_( a)\) d2-0 cs16( b a b) a4 r r r a( g) r g\upbow( fs) b2.->( b8) a( gs a gs a) a2.-1( a4) d( cs c b bf_4 a gs g) fs2--\( \tri b8( g e) \)
e-.-1( e-. e-.) e( g-1 b) a2._\(( a4) b( g)\) fs2( g8 e) d4 r r
c-.\pp( c-. c-.) c2( b4) g'-.( g-. g-.) fs_\(( g-1) b-.\) a( g fs-2) \mark I
e a\f a d4 \tri r8\mf b'-2\downbow( cs \tri d cs b) a4-. r r
r \tri r8 b-4( a \tri g a b) fs4-. r fs16-3( e d e) d4-. r r
\mark G r \tri r8 e-4( d \tri cs d e) fs4-. \tri r8 g( a \tri b a g) fs4-. r fs16-3( e d e)
\none a8\(( cs) d-.\) e( d) cs d-1( e) fs g2->( fs4) \alternative {
\none a,,8\(( cs) d-._2\) e( d) cs d_0( e) fs g2->( fs4) \volta 1 { d4 d-.(\p d-.) d2.( d2.)( d2.)( d4) d,-.( d-.) \after 4 \> \after 2 \! d2\upbow(\< c4)\! }
b2._3-> \volta 2 { d'4 d-.(\p d-.) d2.( d4) d,-0\upbow cs'16-4( b a b) a4 r a16-4( g fs g) fs4 r fs16-4( e d e) d4 d-.(\pp d-.) d-. r r \bar "|." }
\none a8( cs) b a cs d e fs-1 g a2.->( a4\p) g( fs) }
g2.->( \none g8) a( g fs-2 g fs e fs g) }
fs2.->( \none fs8) e( fs g fs e d_4 cs b) }
a4 a-.\pp( a-.) a2.( a4) d'( cs) cs_3\( b\trill a( a)\) \tri b8( g e) fs4\(( fs) e-.\) \tri g8( e c-1) d4-1 r r
scoreBViolinI = \relative c' {
\mark H \parttwo
\dslurr ds,\p^"III" ds ds( e) b'-3\(( b)( a) cs,-.\) % music here
d!-.\f d-. d-. \partial 8 a'8\upbow\p_"dolce" |
d4.-0 e16( fs g a b cs d4-.) d'4.( cs8) cs4-. c2\fz d4-1 e8( f) cs-2( d) bf4
a8-4\(( d16.-0) d,32-0-.\) e8.( f32 g) g( f e d) d8-. r a'\upbow
\none b8_4\downbow( a) g fs( e) g fs( e) cs d4-1 e8\(( f16.) a,32-0-.\) bf4( bf8) g'16.-4( bf,32) a8\(( bf16.) g32-.-3\) f8( e16. g64 e) f4 r8 \bar ":..:"
\none d( cs) d e( d) cs b( a) e' a8-2\upbow c4( bf8) a g\(( a16.) fs32-.-2\) g8 d'-1\upbow d8.(\< e16 f8) gs,\! gs4\>( bf8)\! a'_3\pp^"I" a8( g4) bf8-2\cresc
\none cs( a) e' cs( a) e' cs( a) e'-2 \grace { a16( bf c } bf16)( a) a4 c8( c) bf4 bf32( c bf c) d2(\f\! d8) f,4\decresc\(( g16.) e32-.\) d4\! r8 \bar ":|."
\none d d' cs b a g fs( e) d \break
\none cs-2( a) e' cs( a) e' cs( a) e'-2
\none d d' cs b a g fs( e) d % Variation 1
\none cs-2( a) e' cs( a) e' cs( a) e'-2
\none d d,\ff( e fs-.) d( fs a-.) fs( a_2 c4-.) r r <<
r b\upbow\p( b') fs2( g4) d2( e8 cs) d4-.\( fs( g a)\) d( c b) r r {
r a( g) r g\upbow( fs) b2.->( b8) a( gs a gs a) a2.-1( a4) d( cs c b bf_4 a gs g) fs2--\( \tri b8( g e) \) \partial 8 r8 |
R2
\mark I r4 r8 e,\p
d4 \tri r8\mf b'-2\downbow( cs \tri d cs b) a4-. r r }
r \tri r8 b-4( a \tri g a b) fs4-. r fs16-3( e d e) d4-. r r \new CueVoice {
r \tri r8 e-4( d \tri cs d e) fs4-. \tri r8 g( a \tri b a g) fs4-. r fs16-3( e d e) \partial 8 a8^"Viol.II."^\markup { \huge \halign #.6 "Var. I." } |
\alternative { cs16 d r a' r g r f e cs d a \stemDown b a32 g \stemNeutral r16
\volta 1 { d4 d-.(\p d-.) d2.( d2.)( d2.)( d4) d,-.( d-.) \after 4 \> \after 2 \! d2\upbow(\< c4)\! } }
\volta 2 { d'4 d-.(\p d-.) d2.( d4) d,-0\upbow cs'16-4( b a b) a4 r a16-4( g fs g) fs4 r fs16-4( e d e) d4 d-.(\pp d-.) d-. r r \bar "|." } >>
}
} }
}
scoreAViolinII = \relative c'' {
scoreBViolinI = \relative c' { \partone
\parttwo % Music follows here.
% music here \dslur d,4_2\p\downbow d2.( cs) d4-0-.\( g( fs)\) fs2 a16( g fs g) fs4 r r
\partial 8 a'8\upbow\p_"dolce" | \dslur d-4 d2.( d2.) d4( a d) fs2( \afterGrace { e4\trill } { d16 e } d4) r r
d4-1 e8( f) cs-2( d) bf4 \dslur d4-2 d2.( cs) d4-.-0\( g( fs)\) fs2 a16( g fs g) fs4 r r
a8-4\(( d16.-0) d,32-0-.\) e8.( f32 g) g( f e d) d8-. r a'\upbow \dslur e e2\( g4( g) e\) fs\(( fs) g-2( e)\) d2( \afterGrace { cs4\trill } { b16 cs } d4) r r
d4-1 e8\(( f16.) a,32-0-.\) bf4( bf8) g'16.-4( bf,32) a8\(( bf16.) g32-.-3\) f8( e16. g64 e) f4 r8 \bar ":..:" \dslur c\pp a2( g4) \dslur b b2--( g'4-.) fs2( e4) d r r
a8-2\upbow c4( bf8) a g\(( a16.) fs32-.-2\) g8 d'-1\upbow d8.(\< e16 f8) gs,\! gs4\>( bf8)\! a'_3\pp^"I" a8( g4) bf8-2\cresc
\grace { a16( bf c } bf16)( a) a4 c8( c) bf4 bf32( c bf c) d2(\f\! d8) f,4\decresc\(( g16.) e32-.\) d4\! r8 \bar ":|." \mark A
\break <d b'>-.\f <d b'>-. <d b'>-. <d b'>-. r r
\dslur fs\p gs2.( a4) a-.( a-.) a-. r r
% Variation 1 <e c'>-.\f <e c'>-. <e c'>-. <e c'>-. r r
\dslur ds\p ds2.\(( e2) a4_2-.\) b_\(_(\< gs) gs-.\) \! a\f fs2_2( e4) r r
<< a\(( fs) fs-.\) e r r e r r fs r r b, r r
{ b'2->( a4) R2.^"1" b2->\downbow( cs4) cs\(( b) b-.\) b2. a4( cs e-2) fs2.->\p\(( fs4) e( d)\)
\partial 8 r8 | e2.->\(( e4) d_3( cs)\) d2.\(( d2.\pp)( d2.) cs4\) a_4-.( a-.) a2. gs2( a4) fs2( d4) cs r r
R2
r4 r8 e,\p \mark B
} \dslur as\p as( b) d\((\=1( d) cs\=1) b-.\) a-.\f a-. a-. a4. b16( cs d-4 e fs gs a4-.) e r
\new CueVoice {
\partial 8 a8^"Viol.II."^\markup { \huge \halign #.6 "Var. I." } |
cs16 d r a' r g r f e cs d a \stemDown b a32 g \stemNeutral r16
} }
>>
scoreAViola = \relative c' {
} \partone
% Music follows here.
scoreAViolinII = \relative c'' {
\partone }
% Music follows here.
\dslurr d,_2\p\downbow d d2.( cs) d4-0-.\( g( fs)\) fs2 a16( g fs g) fs4 r r scoreACello = \relative c {
\dslurr d-4 d d2.( d2.) d4( a d) fs2( \afterGrace { e4\trill } { d16 e } d4) r r \partone
\dslurr d4-2 d d2.( cs) d4-.-0\( g( fs)\) fs2 a16( g fs g) fs4 r r % Music follows here.
\dslur e e2\( g4( g) e\) fs\(( fs) g-2( e)\) d2( \afterGrace { cs4\trill } { b16 cs } d4) r r
\dslurr c\pp c a2( g4) \dslur b b2--( g'4-.) fs2( e4) d r r }
\mark A scoreAViolinIPart = \new Staff \with {
<d b'>-.\f <d b'>-. <d b'>-. <d b'>-. r r instrumentName = "Violin I"
\dslurr fs\p fs gs2.( a4) a-.( a-.) a-. r r midiInstrument = "violin"
<e c'>-.\f <e c'>-. <e c'>-. <e c'>-. r r } \scoreAViolinI
\dslurr ds\p ds ds2.\(( e2) a4_2-.\) b_\(_(\< gs) gs-.\) \! a\f fs2_2( e4) r r
a\(( fs) fs-.\) e r r e r r fs r r b, r r scoreBViolinIPart = \new Staff \with {
b'2->( a4) R2.^"1" b2->\downbow( cs4) cs\(( b) b-.\) b2. a4( cs e-2) fs2.->\p\(( fs4) e( d)\) instrumentName = "Violin I"
e2.->\(( e4) d_3( cs)\) d2.\(( d2.\pp)( d2.) cs4\) a_4-.( a-.) a2. gs2( a4) fs2( d4) cs r r midiInstrument = "violin"
} \scoreBViolinI
\mark B
\dslurr as\p as as( b) d\((\=1( d) cs\=1) b-.\) a-.\f a-. a-. a4. b16( cs d-4 e fs gs a4-.) e r scoreAViolinIIPart = \new Staff \with {
instrumentName = "Violin II"
midiInstrument = "violin"
} \scoreAViolinII
}
scoreAViolaPart = \new Staff \with {
scoreAViola = \relative c' { instrumentName = "Viola"
\partone midiInstrument = "viola"
% Music follows here. } { \clef alto \scoreAViola }
} scoreACelloPart = \new Staff \with {
instrumentName = "Cello"
scoreACello = \relative c { midiInstrument = "cello"
\partone } { \clef bass \scoreACello }
% Music follows here.
} \bookpart {
\header {
scoreAViolinIPart = \new Staff \with { subtitle = "I"
instrumentName = "Violin I" }
midiInstrument = "violin" \score {
} \scoreAViolinI \scoreAViolinIPart
\layout { }
scoreBViolinIPart = \new Staff \with { }
instrumentName = "Violin I" }
midiInstrument = "violin"
} \scoreBViolinI
\bookpart {
scoreAViolinIIPart = \new Staff \with { \header {
instrumentName = "Violin II" title = "II"
midiInstrument = "violin" subtitle = " "
} \scoreAViolinII opus = ""
composer = ""
scoreAViolaPart = \new Staff \with { }
instrumentName = "Viola" \score {
midiInstrument = "viola" \scoreBViolinIPart
} { \clef alto \scoreAViola } \layout { }
}
scoreACelloPart = \new Staff \with { }
instrumentName = "Cello"
midiInstrument = "cello" \bookpart {
} { \clef bass \scoreACello } \header {
subtitle = "I"
% }
%\bookpart { \score {
% \header { \scoreAViolinIIPart
% subtitle = "I" \layout { }
% } }
% \score { }
% \scoreAViolinIPart
% \layout { }
% } %\score {
%} % <<
% % \scoreAViolinIPart
% \scoreAViolinIIPart
\bookpart { % \scoreAViolaPart
\header { % \scoreACelloPart
title = "II" % >>
subtitle = " " % \layout { }
opus = "" % \midi {
composer = "" % \tempo 4=120
} % }
\score { %}
\scoreBViolinIPart
\layout { }
}
}
%\bookpart {
% \header {
% subtitle = "I"
% }
% \score {
% \scoreAViolinIIPart
% \layout { }
% }
%}
%\score {
% <<
% \scoreAViolinIPart
% \scoreAViolinIIPart
% \scoreAViolaPart
% \scoreACelloPart
% >>
% \layout { }
% \midi {
% \tempo 4=120
% }
%}