release: 1.3.107

[lilypond.git] / input / test / collisions.ly

diff --git a/input/test/collisions.ly b/input/test/collisions.ly
index ade5a27a9559606046249f4ab240096fa39d8828..e2c3ce45f19590ae5380bc8718b7d4ee9e2a3cb5 100644 (file)
--- a/input/test/collisions.ly
+++ b/input/test/collisions.ly
@@ -5,86 +5,71 @@ enteredby =    "HWN,JCN";
 copyright =     "public domain";
 Tested =        "test the Collision resolution ";
 }
-\version "1.0.0";
+\version "1.3.96";
 
+twovoice = \context Staff \notes < 
+       \context Voice=i { \stemDown c4 d e f g2~  g4 a [c8 d e f] c2| }
+       \context Voice=ii { \stemUp g4 f e g ~ g2 g2  c4 g4 g2 } 
+>
 
+twovoicesteminvert = \context Staff \notes <  
+       % the f and g on 4th beat are exceptionally ugh.
+       \context Voice=i { \stemUp c4 d e f g2 g4 a | }
+       \context Voice=ii { \stemDown g4 f e g  g2 g2 } 
+>
 
-two_voice = \melodic 
-       \type Staff < 
-         { \stemdown
-               c4 d e f g2~  g4 a [c8 d e f] c2| }
-         { \stemup
-               g4 f e g ~ g2 g2  c4 g4 g2 } 
-
-       >
-
-two_voice_steminvert = \melodic 
-       \type Staff <  
-         { 
- \stemup
-% the f and g on 4th beat are exceptionally ugh.
-               c4 d e f g2 g4 a | }
-         { \stemdown
-               g4 f e g  g2 g2 } 
+threevoice = \context Staff \notes <
+       \context Voice=i { \stemUp g4 f e f g a g2 }
+       \context Voice=ii { \stemUp \property Voice.NoteColumn \push #'horizontal-shift = #1
+               e2  e2  e2  e2 }
+       \context Voice=iii { \stemDown c4 d e d c d es }
+>
 
-       >
+chordstest = \context Staff \notes <
+       \context Voice = i \relative c {
+               \stemUp e4 dis c f g f a b b
+       }
+       \context Voice = ii \relative c {
+               \stemDown <a4 c> <a4 c> <a4 e'> <a4 c> <e' a> <e a> <e a> <a c> <a d>
+       }
+>
 
-three_voice = \melodic 
-       \type Staff <
-       { \stemup 
-               g4 f e f g a g2 }
-       { \stemup \property Voice.hshift = 1 
-               e2  e2  e2  e2 }
-       { \stemdown
-               c4 d e d c d es }
-       >
+hairyChord = \context Staff \notes\relative c' <
+     \context Voice=one {
+ \property Voice.NoteColumn \push #'horizontal-shift = #0
+       \stemUp 
+       e4 
+     }
+     
+     \context Voice=two {
+       \stemUp
+ \property Voice.NoteColumn \push #'horizontal-shift = #1
+       cis
+     }
+     
+     \context Voice=three {
+ \property Voice.NoteColumn \push #'horizontal-shift = #2
 
+       \stemUp 
+       ais
+     }
+     
+     \context Voice=four {
+        \stemDown
+ \property Voice.NoteColumn \push #'horizontal-shift = #1
 
-rests = \melodic  
-       \type Staff <
-       { \stemup
-               | r8 r r r  r r r r 
-               [c' b a g] [f e d c]
-       } 
-       { \stemdown
-               [c8 d e f] [g a b c']
-               r r r r r r r r 
-       }
-       >
+       fis
+     }
+>
 
-restsII = \melodic {
-       \type Staff < 
-               { \stemup  g' f' e' d' c' b a g f e d c }
-               { \stemdown r  r  r  r  r  r r r r r r r }
-       >
-       \type Staff <
-               { \stemup  r r r r r r r r  r  r  r  r }
-               { \stemdown c d e f g a b c' d' e' f' g' }
-       >
-       r8 r4
-       \type Staff <  r8 r8 >
-       \type Staff <  r8 r8 r8 >
-       \type Staff <  r8 r8 r8 r8 >
-       \type Staff <  r r >
-       \type Staff <  r r r >
-       \stemup
-       [c''8 r8 c''8 c''8]
-       [c8 r8 c8 c8]
-       \stemdown
-       [c8 r8 c8 c8]
-       [c''8 r8 c''8 c''8]
-}
 
 \score{
-       \melodic \transpose c' {  \two_voice  
-       \two_voice_steminvert 
-       \three_voice  
-       \rests 
-       % UGH ! bug!
-       %\restsII 
+       \notes \transpose c'' {  \twovoice  
+       \twovoicesteminvert 
+       \threevoice \break
+        \chordstest
+        \hairyChord
        }
        
-
-       
 %      \midi { \tempo 4:80 }
 }