* buildscripts/mf-to-table.py (base): break table every three

[lilypond.git] / input / test / hara-kiri.ly

diff --git a/input/test/hara-kiri.ly b/input/test/hara-kiri.ly
index 28bd2f01633466ad85e70bfa6969c8335ba5a1dc..793274bde08e4026b44ef6ea4587e73f31707e14 100644 (file)
--- a/input/test/hara-kiri.ly
+++ b/input/test/hara-kiri.ly
@@ -1,10 +1,16 @@
-\version "1.3.59";
+\version "1.7.19"
+% TODO: check if we really need both hara-kiri-switch.ly and
+% hara-kiri.ly.  -gp
+\header { texidoc = "@cindex Hara Kiri
+Hara kiri staves disappear when empty. " }
 
-toeter_i = \notes\relative c <{
+% todo: use partcombine?, junk?
+
+toeterI =  \notes\relative c <{
                \property Staff.instrument = #"Toeters"
                \property Staff.instr = #"Ttr." }
-       \context Voice = lower { \stemdown s1*6 }
-       \context Voice = upper { \stemup s1*6 }
+       \context Voice = lower { \stemDown s1*6 }
+       \context Voice = upper { \stemUp s1*6 }
        \context Voice = together  { 
 
        c'''4^"toet I" c c c 
@@ -16,25 +22,25 @@ toeter_i = \notes\relative c <{
        g g g g 
 }>
 
-toeter_ii = \notes \relative c \context Voice = together { 
+toeterIi =  \notes \relative c \context Voice = together { 
        c''4^"toet II" c c c 
        d d d d 
        R1 
        \context Voice = lower {
-               \stemdown 
+               \stemDown 
                e4 e e e 
         }
        f f f f 
        g g g g
 }
 
-toeters = \context Staff = toeters <
-       \toeter_i
-       \toeter_ii
+toeters =  \context Staff = toeters <
+       \toeterI
+       \toeterIi
 >
  
-zager = \context Staff = zager \notes \relative c'' {
-       \clef treble;
+zager =  \context Staff = zager \notes \relative c'' {
+       \clef treble
        \property Staff.instrument = #"Zager"
        \property Staff.instr = #"Zag."
        c4^"zag" d e f 
@@ -42,28 +48,32 @@ zager = \context Staff = zager \notes \relative c'' {
        f e d c 
        c d e f 
        \property Staff.instr = #"Zag."
-       \stemup
+       \stemUp
        f e d c 
        c d e f 
        f e d c
 }
 
-zoger = \context Staff = zoger \notes \relative c'' {
-       \clef treble;
+zoger =  \context Staff = zoger \notes \relative c'' {
+       % Hmm
+        \property Staff.HaraKiriVerticalGroup \override
+           #'items-worth-living = #'(#t #t)
+
+
+       \clef treble
        \property Staff.instrument = #"Zoger"
        \property Staff.instr = #"Zog."
        c4^"zog" d e f 
-       \skip 1*2;
-
+       \skip 1*2
        \translator Staff=zager
-       \stemdown 
+       \stemDown 
        c2 g2
        
        a4 b c d 
-       \skip 1*1;
+       \skip 1*1
 }
 
-zagers = \context GrandStaff <
+zagers =  \context GrandStaff <
        \zager
        \zoger
 >
@@ -78,8 +88,8 @@ zagers = \context GrandStaff <
                >
        >
        \paper{
-               linewidth = 80.0\mm;
-               \translator { \HaraKiriStaffContext }
+               linewidth = 100.0\mm
+               \translator { \RemoveEmptyStaffContext }
 %uh?
                \translator { \OrchestralScoreContext }
 %              \translator { \OrchestralPartStaffContext }
@@ -87,3 +97,4 @@ zagers = \context GrandStaff <
 }
 
 
+