* scm/define-grobs.scm (all-grob-descriptions): remove

[lilypond.git] / input / test / coriolan-margin.ly

diff --git a/input/test/coriolan-margin.ly b/input/test/coriolan-margin.ly
index 1d4f8605eb2cd75865044cf7c90d1921472bbbf6..eb0970625035fafbb2c02496f9a1b3839879b5e2 100644 (file)
--- a/input/test/coriolan-margin.ly
+++ b/input/test/coriolan-margin.ly
@@ -1,4 +1,5 @@
-\version "1.7.19"
+
+\version "2.1.13"
 
 
 % Ugh, we need to override some LaTeX titling stuff
@@ -9,16 +10,18 @@
   opus =  "Op. 62"
   piece = "\\hspace*{30mm}\\normalfont\\large Allegro con brio"
   composer =    "Ludwig van Beethoven (1770-1827)"
-  enteredby =   "JCN"
-
 
 texidoc = "@cindex Orchestra Score
 @cindex Coriolan Score
-Demonstration of how to set up an orchestral score (Bethoven's Coriolan overture).
+Demonstration of how to set up an orchestral score (Beethoven's Coriolan overture).
 " }
 
+#(set-global-staff-size 16)
+
 raisedFlat = \markup { \raise #0.4 \smaller \smaller \musicglyph #"accidentals--1"  }
 
+
+
 flauti = \notes \relative c' {
   \property Staff.instrument   = #"2 Flauti"
   \property Staff.instr                = #"Fl."
@@ -37,9 +40,8 @@ oboi = \notes \relative c' {
 }
 
 clarinetti = \notes \relative c' {
-%   \property Staff.instrument = #`("Clarinetti in B" ,text-flat)
     \property Staff.instrument
-       = \markup { \column << "Clarinetti" { "in B" \raisedFlat } >> }
+       = \markup { \column < "Clarinetti" { "in B" \raisedFlat } > }
     \property Staff.instr
        = \markup { \smaller  { "Cl(B" \raisedFlat ")" } }
 
@@ -54,7 +56,7 @@ fagotti = \notes \relative c' {
 
 corni = \notes \relative c' {
     \property Staff.instrument
-       = \markup { \column << "Corni" { "in E" \raisedFlat } >> }
+       = \markup { \column < "Corni" { "in E" \raisedFlat } > }
     \property Staff.instr
        = \markup { \smaller  { "Cor(E" \raisedFlat ")" } }
 
@@ -62,14 +64,14 @@ corni = \notes \relative c' {
 }
 
 trombe = \notes \relative c' {
-  \property Staff.instrument   = \markup \column << "2 Trombe" "(C)" >>
-  \property Staff.instr                = \markup \column <<  "Tbe." "(C)" >>
+  \property Staff.instrument   = \markup \column < "2 Trombe" "(C)" >
+  \property Staff.instr                = \markup \column <  "Tbe." "(C)" >
 
   c1 c
 }
 
 timpani = \notes \relative c' {
-  \property Staff.instrument   = \markup \column << "Timpani" "(C-G)" >>
+  \property Staff.instrument   = \markup \column < "Timpani" "(C-G)" >
   \property Staff.instr                = #"Timp."
 
   c1 c
@@ -95,54 +97,53 @@ viola = \notes \relative c' {
 }
 
 violoncello = \notes \relative c' {
-  \property Staff.instrument   = \markup \column << "Violoncello" "e" "Contrabasso" >>
-  \property Staff.instr                = \markup \column <<  "Vc." "Cb." >>
+  \property Staff.instrument   = \markup \column < "Violoncello" "e" "Contrabasso" >
+  \property Staff.instr                = \markup \column <  "Vc." "Cb." >
   c1 c
 }
 
-\include "paper16.ly"
 
 \score {
-  < 
-    \context StaffGroup ="legni" < 
+  << 
+    \context StaffGroup ="legni" << 
       \context Staff ="flauti" \flauti
       \context Staff ="oboi" \oboi
       \context Staff ="clarinetti" \clarinetti 
       \context Staff ="fagotti" \fagotti 
-    >
-    \context StaffGroup ="ottoni" <
+    >>
+    \context StaffGroup ="ottoni" <<
       \context Staff ="corni" \corni
       \context Staff ="trombe" \trombe
-    >
-    \context StaffGroup ="timpani" <
+    >>
+    \context StaffGroup ="timpani" <<
       \context Staff ="timpani" \timpani
      { 
        \skip 1 
        % Hmm: this forces a staff-bracket, that's good!
        % However, I can't find where is decided on staff-bracket yes/no
      }
-    >
-    \context StaffGroup ="archi" <
-      \context GrandStaff ="violini" <
+    >>
+    \context StaffGroup ="archi" <<
+      \context GrandStaff ="violini" <<
         \context Staff ="violinoI" \violinoI
         \context Staff ="violinoII" \violinoII
-      >
+      >>
       \context Staff ="viola" \viola
       \context Staff ="violoncello" \violoncello
-    >
-  >
+    >>
+  >>
   \paper {
-       \paperSixteen
-       indent=100.0\mm
-       linewidth=150.0\mm
-    \translator {
-      \RemoveEmptyStaffContext
-    }
-    \translator {
-      \OrchestralScoreContext
-      TimeSignature \override #'style = #'C
-    }
+      \paperSixteen
+      indent=100.0\mm
+      linewidth=150.0\mm
+      \translator {
+         \RemoveEmptyStaffContext
+      }
+      \translator {
+         \OrchestralScoreContext
+         TimeSignature \override #'style = #'C
+      }
   }
 }
 
-%% new-chords-done %%
+