Part-combine fixes

Eybler_PerTeDeiGenitrix_HV44_Music_PerTeDeiGenitrix.ily

@@ -20,17 +20,17 @@ PerTeDeiGenitrixObIMusic = \relative c'' {
   e16[( f g gis]) a8[ f] e[( d]) r4 | % 5
   r2 r4 r8 f\f | % 6
   a4\fz g16[\dashedSlur f e d]) e8[ c h f'] | % 7
-  e[ c h f'] e16[( f) f( g]) g[( a) a( b)] | % 8
-  b4~\fz b16[( a f d]) c8 c4 e16[ d] | % 9
-  c8 r r4 r2 | \barNumberCheck #10
+  e[ c h f'] e16[( f) f( g]) \partcombineApart g[( a) a( b)] | % 8
+  \partcombineAutomatic b4~-\tag #'non-partcombine \fz b16[( a f d]) \partcombineApart c8 c4 e16[ d] | % 9
+  c8 \partcombineAutomatic r r4 r2 | \barNumberCheck #10
   r2 f4\sfp h, | % 11
   c8 r r4 r r8 e8~\fz | % 12
   e[ f] r h,~\fz h8[ c] r c16[( e]) | % 13
   g4~ g16[( f e f ]) e8 r r g, | % 14
   a4 h c d | % 15
-  e8[ c] r4 r8 c g'4~ | % 16
-  g4 f16[( e d c]) h!8[ d( f d]) | % 17
-  r8 e[( c' fis,]) r8 g[( h d,]) | % 18
+  e8[ c] r4 \partcombineApart r8 c g'4~ | % 16
+  g4 f16[( e d c]) \partcombineAutomatic h!8[ d( f d]) | % 17
+  r8 e[( c' fis,]) r8 g[( \set Staff.aDueText = #"" h d,]) \set Staff.aDueText = #"a2" | % 18
   r8 e4 fis8 r g4 d8 | % 19
   r8 c~ c16[( e d c]) h8 d4 g8 | \barNumberCheck #20
   g e4 e8 e c4 e8 | % 21
@@ -38,8 +38,8 @@ PerTeDeiGenitrixObIMusic = \relative c'' {
   g16[( fis e d]) c8[ h] h[ a] r4 | % 23
   R1*3 | % 26
   h4\f d g4. a8 | % 27
-  h4 a g r | % 28
-  r8 a16[(\solo_\bracketdolce g32]) r fis16[( e32]) r d16[( c32]) r h8 r r4 | % 29
+  h4 a \partcombineApartOnce g r | % 28
+  \partcombineSoloIOnce r8 a16[(\solo_\bracketdolce g32]) r fis16[( e32]) r d16[( c32]) r h8 r r4 | % 29
   r8 a'16[( g32]) r fis16[( e32]) r d16[( c32]) r h8 r r4 | \barNumberCheck #30
   R1 | % 31
   r2 r8 d8[\f d d] | % 32
@@ -47,28 +47,28 @@ PerTeDeiGenitrixObIMusic = \relative c'' {
   h4 a\trill g8[ h c d] | % 34
   e[ fis] a16[( g) fis-| e-|] e[( d) c-| h-|] d[( c) h-| a-|] | % 35
   g4 h8[ d] f4 d | % 36
-  c d8[ e] e[ d] r4 | % 37
+  \partcombineApartOnce c d8[ e] e[ d] r4 | % 37
   g4.\fz r8 r2 | % 38
   f4.\fz r8 r2 | % 39
-  << {c4\p} {s8 s\cresc} >> d4 e\!\f d16[( c h a]) | \barNumberCheck #40
-  g8 f'4 e8 d4 r8 d | % 41
+  << {c4\p} {s8 s\cresc} >> \partcombineApartOnce d4 e\!\f \partcombineApart d16[( c h a]) | \barNumberCheck #40
+  g8 \partcombineAutomatic f'4 e8 d4 r8 d | % 41
   dis8[( e]) r e~ e[( f]) r f | % 42
   a4\fz f8[ d] h8.[ d16] f4 | % 43
   r8 e4 g8 r g4 h,8 | % 44
-  c4 r r8 e8[ f g] | % 45
+  \partcombineApartOnce c4 r r8 e8[ f g] | % 45
   a2 g4. g8~ | % 46
-  g[ h,] c16[( d e f]) e8[ d] r4 | % 47
+  g[ \set Staff.aDueText = "" h,] c16[( \unset Staff.aDueText d e f]) e8[ d] r4 | % 47
   R1*2 | % 49
-  r2 d4~\solo_\bracketdolce d16[( a' g f]) | \barNumberCheck #50
-  e4\f c a8[ h c d] | % 51
-  e4 d c8 a'16[(\solo_\bracketdolce g32]) r f16[( e32]) r d16[( c32]) r | % 52
+  \partcombineSoloIOnce r2 d4~\solo_\bracketdolce d16[( a' g f]) | \barNumberCheck #50
+  e4-\tag #'non-partcombine \f c a8[ h c d] | % 51
+  e4 d \partcombineApartOnce c8 a'16[(\solo_\bracketdolce g32]) r f16[( e32]) r d16[( c32]) r | % 52
   g8 r r4 r8 a'16[( g32]) r f16[( e32]) r d16[( c32]) r | % 53
   g8 r r4 r8 e16[( g32]) r g16[( c32]) r c16[( e32]) r | % 54
   e4 r r8 g,16[(\cresc c32]) r c16[( e32]) r e16[( g32]) r | % 55
   g4 r r8 c,16[(\f e32]) r e16[( g32]) r g16[( c32]) r | % 56
   c4 h a4. f8 | % 57
-  e4 d c8 r r4 | % 58
-  r2 r8 g8[(\f c e]) | % 59
+  e4 d \partcombineApartOnce c8 r r4 | % 58
+  r2 r8 g8[(-\tag #'non-partcombine \f c e]) | % 59
   f4\fz h, c8 r r4 | \barNumberCheck #60
   r2 \bar"|."
 }
@@ -140,9 +140,9 @@ PerTeDeiGenitrixClIMusic = \relative c'' {
   c d4 e f g8~ | % 4
   g[ c a d] c[( h]) r d(\p | % 5
   f[ e]) r e(\cresc g[ f]) r f\f | % 6
-  a,4\fz g16[\dashedSlur f e d]) e8 g4 h8 | % 7
-  c8 g4 h8 c16[( d) d( e]) d[( f) f( g]) | % 8
-  g4\fz f g8 e,16[( fis]) g8[ g] | % 9
+  a,4\fz g16[\dashedSlur f e d]) e8 \partcombineApartOnce g4 h8 | % 7
+  c8 \partcombineApartOnce g4 h8 c16[( d) d( e]) \partcombineApart d[( f) f( g]) | % 8
+  \partcombineAutomatic g4\fz f g8 e,16[( fis]) g8[ g] | % 9
   g r r4 h2\fzp | \barNumberCheck #10
   c8 r r4 d4\sfp g,~ | % 11
   g8 r r4 r r8 b8~ \fz | % 12
@@ -158,10 +158,10 @@ PerTeDeiGenitrixClIMusic = \relative c'' {
   d4. d,8 d4 d  | % 22
   e4. e8 d4 r | % 23
   R1 | % 24
-  r2 a'4\solo_\bracketdolce~ a16[( e' d c]) | % 25
+  \partcombineSoloIOnce r2 a'4\solo_\bracketdolce~ a16[( e' d c]) | % 25
   h8 r r4 d4~ d16[( fis a c,]) | % 26
   h4\f d g g,8[ a] | % 27
-  h4 a h8[ e16(\solo_\bracketdolce d32]) r c16[( h32]) r a16[( g32]) r | % 28
+  h4 a h8[ e16(\solo_\bracketdolce d32]) \partcombineSoloIOnce r c16[( h32]) r a16[( g32]) r | % 28
   d8 r r4 r8 e'16[( d32]) r c16[( h32]) r a16[( g32]) r | % 29
   d8 r r4 r8 h16[( d32]) r d16[( g32]) r g16[( h32]) r | \barNumberCheck #30
   h8 r r4 r8 d,16[(\cresc g32]) r g16[( h32]) r h16[( d32]) r | % 31
@@ -178,13 +178,13 @@ PerTeDeiGenitrixClIMusic = \relative c'' {
   r8 e4 e8 r f4 f8 | % 42
   d1\fz | % 43
   c8 g4 g8 r g4 g8 | % 44
-  g4 r r8 c4 c8 | % 45
+  g4 r r8 \partcombineApartOnce c4 c8 | % 45
   c2~ c8 g4 g8~ | % 46
   g g4 g8 g4 r | % 47
   R1 | % 48
-  r2 g4~\solo_\bracketdolce g16[( h d f]) | % 49
+  \partcombineSoloIOnce r2 g4~\solo_\bracketdolce g16[( h d f]) | % 49
   e4 r r2 | \barNumberCheck #50
-  g,2\f f8 g4 fis8 | % 51
+  g,2-\tag #'non-partcombine \f f8 g4 fis8 | % 51
   g2~ g8 r r4 | % 52
   r8 d'16[(\solo_\bracketdolce c32]) r h16[( a32]) r g16[( f32]) r e8 r r4 | % 53
   r8 d'16[( c32]) r h16[( a32]) r g16[( f32]) r e8 r r4 | % 54
@@ -264,13 +264,13 @@ PerTeDeiGenitrixFagIMusic = \relative c {
   f4\f g c, r8 e'16[( c]) | % 2
   h8[ d h g] c r r e, | % 3
   f4 g a h | % 4
-  c8 c4 a8 g4 r8 f'8(\p | % 5
+  c8 c4 a8 \partcombineApartOnce g4 r8 f'8(\p | % 5
   d[ e)] r g(\cresc e[ f]) r f8\f | % 6
   d4\fz h c8[ e d g,] | % 7
   c[ e d g,] c4 r | % 8
   f,2\fz e8[ a] g4 | % 9
   c,8 r r4 d'2\fzp | \barNumberCheck #10
-  c8 r r4 g2\sfp | % 11
+  \partcombineApartOnce c8 r r4 g2\sfp | % 11
   c8[ g']~  g16[( e d f]) f4( e8) r | % 12
   f,4\f g c, r8 e'16[( c]) | % 13
   h8[ d h g] c r r e, | % 14
@@ -284,10 +284,10 @@ PerTeDeiGenitrixFagIMusic = \relative c {
   c, c'4 c8 h4 h | % 22
   c8 c4 cis8 d4 r | % 23
   R1 | % 24
-  r2 a4~\solo_\bracketdolce a16[ e'( d c]) | % 25
+  \partcombineSoloIOnce r2 a4~\solo_\bracketdolce a16[ e'( d c]) | % 25
   h8 r r4 \clef "tenor" d4~ d16[( fis a c,]) | % 26
-  h4\f a g e' | % 27
-  d d, g r | % 28
+  \partcombineChords h4\f a g e' | % 27
+  \partcombineAutomatic d d, g r | % 28
   r8 a'16[(\solo_\bracketdolce g32]) r fis16[( e32]) r d16[( c32]) r h8 r r4 | % 29
   r8 a'16[( g32]) r fis16[( e32]) r d16[( c32]) r h8 \clef "bass" g8[ d' h] | \barNumberCheck #30
   g8 r r4 r8 g'[\cresc d h] | % 31
@@ -308,17 +308,17 @@ PerTeDeiGenitrixFagIMusic = \relative c {
   f2 c4 c' | % 46
   f, e8[ c] g'4 r | % 47
   R1 | % 48
-  r2 g4~\solo_\bracketdolce g16[( h d f]) | % 49
+  \partcombineSoloIOnce r2 g4~\solo_\bracketdolce g16[( h d f]) | % 49
   e4 r \clef "tenor" d4~ d16[( a' g f]) | \barNumberCheck #50
-  e4\f \clef"bass" e,4 f8[ d e a] | % 51
+  e4-\tag #'non-partcombine \f \clef"bass" e,4 f8[ d e a] | % 51
   g2 c,8 r r4 | % 52
-  r8 d'16[(\solo_\bracketdolce c32]) r h16[( a32]) r g16[( f32]) r e8 r r4 | % 53
+  \partcombineSoloIOnce r8 d'16[(\solo_\bracketdolce c32]) r h16[( a32]) r g16[( f32]) r e8 r r4 | % 53
   r8 d'16[( c32]) r h16[( a32]) r g16[( f32]) r e8 c'[ g e] | % 54
   c4 r r8 c'8[\cresc g e] | % 55
   c4 r r8 c'8[\f g e] | % 56
   c4 gis' a8[ g f d] | % 57
   g2 c,8 r r4 | % 58
-  d'2\sfp c8 r r4 | % 59
+  d'2\sfp \partcombineApartOnce c8 r r4 | % 59
   g2\fz c8[ g'8~]\fp g16[( e d f]) | \barNumberCheck #60
   f4( e8) r \bar"|."
 }
@@ -350,7 +350,7 @@ PerTeDeiGenitrixFagIIMusic = \relative c, {
   c8 c4 cis8 d4 r | % 23
   R1*3 | % 26
   g,4\f fis e e' | % 27
-  d d, g8 \clef "tenor" e''16[(\solo_\bracketdolce d32]) r c16[( h32]) r a16[( g32]) r | % 28
+  d d, g8 \clef "tenor" e''16[(\solo_\bracketdolce d32]) \partcombineSoloII r c16[( h32]) r a16[( g32]) r | % 28
   fis8 r r4 r8 e'16[( d32]) r c16[( h32]) r a16[( g32]) r | % 29
   fis8 r r4 r8 \clef "bass" g8[ d h] | \barNumberCheck #30
   g r r4 r8 g'8[\cresc d h] | % 31
@@ -394,7 +394,7 @@ PerTeDeiGenitrixCorIMusic = \relative c'' {
   R1 | % 6
   f4\fz d e8 r r d | % 7
   e r r d e r r4 | % 8
-  g4\fz f8 r r c e8.[ d16] | % 9
+  g4\fz \partcombineApartOnce f8 r r c e8.[ d16] | % 9
   c8 r r4 r2 | \barNumberCheck #10
   r2 d\sfp | % 11
   e8 r r4 r2 | % 12
@@ -407,11 +407,11 @@ PerTeDeiGenitrixCorIMusic = \relative c'' {
   e4 r r2 | % 19
   r2 r8 d[ d d] | \barNumberCheck #20
   e4. e8 e4. e8 | % 21
-  d2 d4 r8 d | % 22
+  \partcombineApartOnce d2 d4 r8 d | % 22
   e4 r r2 | % 23
   R1*3 | % 26
-  d4\f d g  r | % 27
-  d2 d4 r | % 28
+  d4\f \partcombineApartOnce d g  r | % 27
+  \partcombineApartOnce d2 d4 r | % 28
   R1 | % 29
   r2 r8 d[\p d d] | \barNumberCheck #30
   d r r4 r8 d[\cresc d d] | % 31