From d12f250e8cedacffbf8fe1bfc184c4ce73cc6ab4 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Sun, 24 Mar 2002 19:32:43 +0000
Subject: [PATCH] lilypond-0.0.33

---
 input/wohltemperirt.ly | 26 +++++++++++++++++++-------
 1 file changed, 19 insertions(+), 7 deletions(-)

diff --git a/input/wohltemperirt.ly b/input/wohltemperirt.ly
index c4c0f2455e..1038169bab 100644
--- a/input/wohltemperirt.ly
+++ b/input/wohltemperirt.ly
@@ -8,9 +8,9 @@
 dux = music { $
 	\clef \violin
 	\duration { \last }
-	\stem{-1}
 	
-	 r8-"dux" ['c16 b] ['c8 g] [as 'c16 b] ['c8 'd] |
+	 r8-"dux" 	\stem{-1}
+	['c16 b] ['c8 g] [as 'c16 b] ['c8 'd] |
 	[g 'c16 b] ['c8 'd] [f16 g] as4 [g16 f]	|
 	[es 'c b a] [ g f es d] [c8 'es 'd 'c] |
 	[bes a bes 'c] [fis g a fis] |
@@ -21,9 +21,10 @@ dux = music { $
 $}
 
 comes = music { $
-	r1 r1
-	\stem{1}
 	\octave {'}
+	r1	\stem{1}
+ |
+	r1 |
 	r8-"comes" [g16 fis] [g8 c] [es g16 f] [g8 a]|
 	[d8 g16 fis] [g8 a] [c16 d] es4 [d16 c] |
 	[`bes8 es16 d] [es8 `g8] [`as f16 es] [f8 `a] 
@@ -35,11 +36,16 @@ $}
 
 bassdux = music { $
 	\clef \bass
-	r1 r r r r r
 	\octave { }
+	r1 |
+	r |
+	r |
+	r |
+	r |
+	r |
 	r8 [c16 B] [c8 G] [As c16 B] [c8 d] |
-	[G c16 B] [c8 d] [F16 G] As4 [G16 F] | $
-}
+	[G c16 B] [c8 d] [F16 G] As4 [G16 F] | 
+$}
 
 basstaf = staff { melodic
 	music { bassdux }
@@ -58,5 +64,11 @@ score {
 		grouping {2*2}
 		key {$bes es as$}
 	}
+	staff { midi music { dux } }
+	staff { midi music { comes } }
+	staff { midi music { bassdux } }
+	midi {
+		tempo 4:80
+	}
 }
 
-- 
2.39.5