release: 1.3.132

[lilypond.git] / mutopia / Coriolan / corni.ly

diff --git a/mutopia/Coriolan/corni.ly b/mutopia/Coriolan/corni.ly
index bc65252b22a226c429b20620daa973224dd2b290..b4fe792cc642cac05b41888069cdfdcc24a84021 100644 (file)
--- a/mutopia/Coriolan/corni.ly
+++ b/mutopia/Coriolan/corni.ly
@@ -1,30 +1,22 @@
-\header{
-filename =      "corni.ly";
-% %title =      "Ouvert\\"ure zu Collins Trauerspiel \\"Coriolan\\" Opus 62";
-description =   "";
-composer =      "Ludwig van Beethoven (1770-1827)";
-enteredby =     "JCN";
-copyright =     "public domain";
 
-
-}
-
-\version "1.0.7";
+\version "1.3.120";
 
 \include "corno-1.ly"
 \include "corno-2.ly"
 
-$corni_staff = \type Staff = corni <
-       \property Staff.midi_instrument = "french horn"
-       \property Staff.instrument = "2 Corni (E\\textflat)"
-       \property Staff.instr = "Cor. (E\\textflat)"
-       % urg: can't; only My_midi_lexer:<non-static> () parses pitch?
-       %\property Staff.transposing = "es"
-       \property Staff.transposing = 3
-       \notes \type Voice=corni < 
-               \time 4/4;
-               \$corno1
-               \$corno2
-       >
+corniStaff = \context Staff = corni <
+       \property Staff.midiInstrument = #"french horn"
+
+       \property Staff.instrument = #`(lines
+         "2 Corni" (rows "(E" ,text-flat ")"))
+       
+       \property Staff.instr = #`(lines "Cor."  (rows "(E" ,text-flat ")"))
+       \property Staff.transposing = #3
+       \Time
+       \notes { \key c \major; }
+       \End
+       \context Voice=one \partcombine Voice
+               \context Thread=one \cornoI
+               \context Thread=two \cornoII
 >