X-Git-Url: https://git.donarmstrong.com/lilypond.git?a=blobdiff_plain;f=input%2Fsleur.ly;h=964e05a0cae6296f14580c54eb35f4f57cb5a873;hb=51c60f298f38254add022ecc3df3c7c8a265b1b4;hp=0f53a82adca8923e543f5f237109fcaefe8a94ea;hpb=0f30a0db2cb940cecc5567359a57d9ed1fa191cd;p=lilypond.git

diff --git a/input/sleur.ly b/input/sleur.ly
index 0f53a82adc..964e05a0ca 100644
--- a/input/sleur.ly
+++ b/input/sleur.ly
@@ -32,14 +32,15 @@ beum = \melodic{
 }
 
 extend = \melodic{
-	  c8(( c c )c c c c )c |
-	  \[4/5c8( c c' c )c\]1/1 c c c c |
-	  \[4/5c8( c c c c'\]1/1 c c c )c |
-	  \[4/5c8( c c c c''\]1/1 c c c )c' |
-	  \[4/5c8( c c c c'\]1/1 c c c )'c |
-	  \[4/5c8( c c' c c\]1/1 c c c )c |
-	  \[4/5c8( c c c ''c\]1/1 c c c )c |
-	  \[4/5c8( c ''c c c\]1/1 c c c )c |
+	\octave c;
+	c8(( c c )c c c c )c |
+	\[4/5c8( c c' c )c\]1/1 c c c c |
+	\[4/5c8( c c c c'\]1/1 c c c )c |
+	\[4/5c8( c c c c''\]1/1 c c c )c' |
+	\[4/5c8( c c c c'\]1/1 c c c )'c |
+	\[4/5c8( c c' c c\]1/1 c c c )c |
+	\[4/5c8( c c c ''c\]1/1 c c c )c |
+	\[4/5c8( c ''c c c\]1/1 c c c )c |
 }
 
 extendbug = \melodic{
@@ -49,10 +50,36 @@ extendbug = \melodic{
 	[c'8( b g a] [c' d' e' c'] [c' d' e' )c']
 	c( c' c' )c
 	e( g' g' )e
+
+}
+
+blend = \melodic{
+	\octave c; 
+	\stemdown; 
+%%	    \[4/5c8( c ''c c c\]1/1 c c c )c |
+	\[4/5c8( c ''f c c\]1/1 c c c )c |
+	\[4/5c8( c \stemup ''f \stemdown c c\]1/1 c c c )c |
+	\stemup; 
+	\octave c''; 
+	\[4/5c8( c f'' c c\]1/1 c c c )c |
+	\[4/5c8( c \stemdown f'' \stemup c c\]1/1 c c c )c |
+%	    \octave c''';
+	\stemboth;
+	c4( 'c16 'e 'g 'b d f a )'c16 c4 |
+	c4( 'c16 'e 'g 'b d f f )'c16 c4 |
+	\octave c'; 
+	\stemdown; 
+	c( c'' c'' )c
+	\stemboth;
+	e( g' g' )e
+	e( g' g' )e
+	e( g' g' )e
+	e( g' g' )e
 }
 
 \score{
 	\melodic{ 
+		\blend
 		\shortlong
 		\dirs
 		\complex