Fix some bugs in the dynamic engraver and PostScript backend

[lilypond.git] / input / mutopia / W.A.Mozart / mozart-hrn-3.ly

diff --git a/input/mutopia/W.A.Mozart/mozart-hrn-3.ly b/input/mutopia/W.A.Mozart/mozart-hrn-3.ly
index 434b07ed7510368f28a00df6a70b0bb0954da90b..b572c07802867461080d1ed94b782c9d18545c97 100644 (file)
--- a/input/mutopia/W.A.Mozart/mozart-hrn-3.ly
+++ b/input/mutopia/W.A.Mozart/mozart-hrn-3.ly
@@ -1,8 +1,8 @@
 \header{
-  title =       "Konzert Nr. 3 Es dur"
-  subtitle = "für Horn und Orchester"
-  composer =    "Wolfgang Amadeus Mozart (1756-1791)"
-  enteredby =   "HWN"
+  title = "Konzert Nr. 3 Es dur"
+  subtitle = "für Horn und Orchester"
+  composer = "Wolfgang Amadeus Mozart (1756-1791)"
+  enteredby = "HWN"
   opus = "KV 447"
 
   copyright = "public domain"
@@ -19,21 +19,18 @@
   source = "Edition Breitkopf 2563"
   footer = "Mutopia-2002/05/21-25"
 
-  textagline = "\\parbox{\hsize}{\\thefooter\\quad\\small This music is part of the Mutopia project, \\texttt{http://sca.uwaterloo.ca/Mutopia/}. It has been typeset and placed in the public domain by " + \maintainer + ". Unrestricted modification and redistribution is permitted and encouraged---copy this music and share it!}"
-  
-  %% TODO: handle \footer, \head[er] properly
   tagline = \markup { \smaller
-      \column <
-          \fill-line < \footer "" >
-          \fill-line < { "This music is part of the Mutopia project, "
+      \column {
+          \fill-line { \footer "" }
+          \fill-line { { "This music is part of the Mutopia project,"
                          \typewriter { "http://sca.uwaterloo.ca/Mutopia/" }
-                         "." } >
-          \fill-line < { "It has been typeset and placed in the public "
-                         "domain by "  \maintainer  "." } >
-          \fill-line < { "Unrestricted modification and redistribution "
-                         "is permitted and encouraged---copy this music "
-                         "and share it!" } >
-          >
+                        } }
+          \fill-line { #(ly:export (string-append "It has been typeset and placed in the public "
+                         "domain by "  maintainer  "."))  }
+          \fill-line { #(ly:export (string-append "Unrestricted modification and redistribution"
+                         " is permitted and encouraged---copy this music"
+                         " and share it!")) }
+          }
        }
 }
 %{
@@ -44,12 +41,43 @@ virtuoso that taught in Geneva.
 
 %}
 
-\version "2.2.0"
+\version "2.7.39"
 
-\include "mozart-hrn3-defs.ly"
-\include "mozart-hrn3-allegro.ly"
-\include "mozart-hrn3-romanze.ly"
-\include "mozart-hrn3-rondo.ly"
+\include "mozart-hrn3-defs.ily"
+\include "mozart-hrn3-allegro.ily"
+\include "mozart-hrn3-romanze.ily"
+\include "mozart-hrn3-rondo.ily"
 
+\paper {
+    between-system-padding = 0.0
+    between-system-space = 20 \mm
+}
+
+
+\book {
+    \score {
+       { \transpose c' bes \allegro }
+       \layout { }
+       \header { piece = "Allegro" opus = "" } 
+       \midi { \tempo 4=90 }
+    }
 
+    \score {
+       { \transpose c' bes \romanze }
+       \header { piece = "Romanze" opus = "" } 
+       \midi { \tempo 4 = 70  }
+       \layout {}
+    }
+
+    \score
+    {
+       { \transpose c' bes \rondo }
+       \header { piece = "Rondo" opus = "" }
+       \midi { \tempo 4 = 100 }
+       \layout { }
+    }
+}
 
+%% Local Variables:
+%% coding: utf-8
+%% End: