Merge master into nested-bookparts

[lilypond.git] / input / mutopia / F.Schubert / morgenlied.ly

diff --git a/input/mutopia/F.Schubert/morgenlied.ly b/input/mutopia/F.Schubert/morgenlied.ly
index 1860063d4f20e5ae4232ada382c41fed1701d708..5717727557ccf15ce6342919b60f2bec8f3b1eff 100644 (file)
--- a/input/mutopia/F.Schubert/morgenlied.ly
+++ b/input/mutopia/F.Schubert/morgenlied.ly
@@ -1,6 +1,6 @@
 \header {
-    title = "Sängers Morgenlied"
-    composer = "Franz Schubert"
+    title = "Sängers Morgenlied"
+    composer = "Franz Schubert (1797-1828)"
     date = "27. Februar 1815"
     source = "Edition Peters"
     editor = "Paul Losse"
@@ -27,16 +27,20 @@ been lowered
 
 }
 
-\version "2.3.4"
+\version "2.11.61"
 manuscriptBreak = { \break }
 
 
 
+#(set-global-staff-size (/ (* 5.8 72.27) 25.4))
+
 \paper  {
-    #(paper-set-staff-size (* 5.8 mm))
-    linewidth = #(* mm 160)
+%#(set-global-staff-size (* 5.8 mm))
+    line-width = #(* mm 160)
     indent = 8\mm
     interscoreline = 2.\mm
+    between-system-space = 15\mm
+    ragged-bottom = ##t 
     }
 
 modernAccidentals = {
@@ -46,16 +50,16 @@ modernAccidentals = {
 }
 
 
-melody =    \relative c'' \repeat volta 2 \context Voice = singer {
+melody =    \relative c'' \repeat volta 2 \new Voice = "singer" {
     \time 6/8
     \autoBeamOff
-    s1*0^\markup { \bold \large\bigger\bigger { \hspace #-3.0 Lieblich, etwas geschwind } }
+    s1*0^\markup { \bold \large\larger\larger { \hspace #-3.0 Lieblich, etwas geschwind } }
   R2.
   r4 r8 c4 g8 |
   e4 c8
     <<
        \new Voice { \stemUp f8. g16 }
-       { \stemDown f8.[ g16] } >> \stemBoth a8 |
+       { \stemDown f8.[ g16] } >> \stemNeutral a8 |
   fis4  g8 c16[ b a g] f[ e] |
   d4 f8 a16[ g fis g] f[ d] |
   g4. r8 gis gis |
@@ -78,28 +82,28 @@ ignoreMelisma =     \set ignoreMelismata = ##t
 ignoreMelismaOff = \unset ignoreMelismata 
 
 
-firstVerse = \lyrics {
+firstVerse = \lyricmode {
     \set stanza = "1."
     
-    Sü -- ßes Licht! Aus
+    Sü -- ßes Licht! Aus
     \ignoreMelisma
     gol --
     \ignoreMelismaOff
 
     de -- nen  Pfor -- ten brichst du __ \manuscriptBreak | 
-    sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ Mit ge -- |
+    sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ Mit ge -- |
     \manuscriptBreak
-    heim -- nis -- vol -- len Wor -- ten, in me -- lo -- di -- schen Ak -- kor -- den, grüß __ ich __ \manuscriptBreak |
-    dei -- ne Ro -- sen -- pracht, grüß ich __ dei -- ne Ro -- sen -- pracht. 
+    heim -- nis -- vol -- len Wor -- ten, in me -- lo -- di -- schen Ak -- kor -- den, grüß __ ich __ \manuscriptBreak |
+    dei -- ne Ro -- sen -- pracht, grüß __ ich __ dei -- ne Ro -- sen -- pracht. 
     }
 
-secondVerse = \lyrics {
+secondVerse = \lyricmode {
     \set stanza = "2."
     Ach, der Lie -- be sanf
     -- tes We -- hen schwellt mir |
-    das be -- weg -- te __ Herz, sanft, wie ein ge -- lieb -- ter Schmerz. __ Dürft ich | 
-    nur auf gold -- nen Hö -- hen mich im Mor -- gen -- duft er -- ge -- hen! Sehn -- sucht |
-    zieht mich him -- mel -- wärts, Sehn -- sucht zieht mich him -- mel -- wärts.
+    das be -- weg -- te __ Herz, sanft, wie ein ge -- lieb -- ter Schmerz. __ Dürft ich | 
+    nur auf gold -- nen Hö -- hen mich im Mor -- gen -- duft er -- ge -- hen! Sehn -- sucht |
+    zieht mich him -- mel -- wärts, Sehn -- sucht zieht mich him -- mel -- wärts.
     }
 
 pianoRH =  \relative c''' \repeat volta 2 {
@@ -108,7 +112,7 @@ pianoRH =  \relative c''' \repeat volta 2 {
     <g e>8( <es fis a> <d f b> <c e c'>) r8 r | 
     r8 c'( e,) f r a |
     \once \override DynamicLineSpanner   #'padding =#3
-    r8_\> << { s8 s8-\! }  << { fis( g)
+    r8 << { s8 s8 }  << { fis(\> g)\!
                            } \\ { c,4 } >> >> r8 <e c g> <e c g> |
     <d c a>4. r8 \clef bass  <d b f> <d b f> |
     e,16_" "_\markup { \bold\italic cresc. } g c g e g d gis b gis d gis |
@@ -146,47 +150,43 @@ pianoLH =  \relative c'' \repeat volta 2 {
     <c g e c>8 <c e g> <c e g>     <c e g> <c e g> <c e g> |
     <c e g> r r <c, c,>8 r r\fermata \clef treble
     }
+
 \book {
-\score {
-
-    << \time 6/8
-     \new Staff <<
-        \context Staff #(set-accidental-style 'modern)
-        \melody >>
-        \lyricsto "singer" \new Lyrics \firstVerse
-        \lyricsto "singer" \new Lyrics \secondVerse
-     \new PianoStaff << 
-        \set PianoStaff.instrument = \markup {
-            \bold
-            \bigger\bigger\bigger\bigger \huge "2.  " }
-        \new Staff \pianoRH
-        \new Staff \pianoLH
-       >> 
-    >>
-
-    \paper {
-       \context {
-           \Lyrics
-           minimumVerticalExtent = #'(-1.0 . 0)
+    \score {
+       << \time 6/8
+          \new Staff <<
+              \context Staff #(set-accidental-style 'modern)
+              \melody >>
+          \lyricsto "singer" \new Lyrics \firstVerse
+          \lyricsto "singer" \new Lyrics \secondVerse
+          \new PianoStaff << 
+              \set PianoStaff.instrumentName = \markup {
+                  \bold
+                  \larger\larger\larger\larger \huge "2.  " }
+              \new Staff \pianoRH
+              \new Staff \pianoLH
+          >> 
+       >>
+
+       \layout {
+           \context {
+               \Lyrics
+               \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.5 . 2.5)
+               \override LyricText #'font-size = #-1
+           }
+           \context {
+               \Score
+               \override Beam #'thickness = #0.55
+               \override SpacingSpanner #'spacing-increment = #1.0
+               \override Slur #'height-limit = #1.5
+           }
        }
-       \context {
+       \midi {
+         \context {
            \Score
-           \override Beam #'thickness = #0.55
-           \override SpacingSpanner #'spacing-increment = #1.0
-           \override Slur #'height-limit = #1.5
-       }
-       \context {
-           \PianoStaff
-           \override VerticalAlignment #'forced-distance = #10
-       }
-       \context {
-           \Staff
-           minimumVerticalExtent = #'(-3. . 6)
+           tempoWholesPerMinute = #(ly:make-moment 70 4)
+         }
        }
-       inputencoding = #"latin1"
     }
-    \midi {
-       \tempo 4 = 70
-       }
-}
 }
+