\version "2.18.2"

\header {
  title = "Maria durch ein Dornwald ging"
  poet = "Nach Harthausen (1850)"
  composer = "Aus Deutschland, 17. Jh."
  arranger = "Arr: Lorenz Maierhofer"
  % hide 'Music engraving by...' footer
  tagline = ##f
}

\paper {
  score-system-spacing #'basic-distance = #24
}

global = {
  \time 4/4
  \partial 4
  \key e \minor
}

finalbar = \bar "|."

voiceFirst = \relative {
  \set melismaBusyProperties = #'()
  b4 |
  e4. fis8 g4 b4 |
  \tieDashed g8~g8 \slurDashed fis8 (e8) fis4~fis4 |
  g4 g8 g8 a2 |
  b2. \slurSolid g8 (a8) |
  b4. a8 b4 c8 (b8) |
  a4. g8 a4 \slurDashed b8 (a8) |
  g4. fis8 g~g a (g) |
  fis4. e8 fis4 fis |
  e4. fis8 g4 b4 |
  g4 (fis4) e\fermata
  \unset melismaBusyProperties
  \finalbar
}
voiceSecond = \relative {
  b4 e4. dis8 e4 \slurSolid g8 (fis8) \tieDashed e8~e8 \slurDashed b8 (cis8) dis4 (b4)
  \slurSolid e8 (d8) c8 b8 a (c e4) dis2.
  \slurSolid e8 (fis8) g4. d8 g4 a8 (g8) d4. e8 fis4 \slurDashed b,8 (dis8) e4.
  b8 e~e e~e dis4. cis8 dis4 b e4 b4 e4 g8 (fis8) e4 (b4) e\fermata
}

chordsOne = \chordmode {
    s4 | e1:m | e2:m b2:7 |
    e2:m a:m | b1:7 |
    g1 | d2.
    b4:7 | e1:m | b1:7 |
    e4:m b:7 e2:m | e4:m b:7 e:m
}

verseOne = \lyricmode {
  \set stanza = #"1."
  Ma -- | ri -- a durch ein | Dorn -- \skip 1 wald _ ging. _ |
  Ky -- rie e -- lei -- | son.
  Ma -- \skip 1 | ri -- a durch ein _ | Dorn -- wald ging,
  der _ | hat in sie -- ben Jahr kein | Laub ge -- tra -- gen. |
  Ky -- ri -- e e -- | lei -- \skip 1 son. |
}
verseTwo = \lyricmode {
  \set stanza = #"2."
  Was | trug Ma -- ri -- a | un -- ter ih -- rem Her -- zen? |
  Ky -- rie e -- lei -- | son.
  Ein _ | klei -- nes Kind -- lein _ | oh -- ne Schmer -- zen,
  das | trug Ma -- ri -- \skip 1 a _ | un -- ter'm Her -- zen.
  Ky -- ri -- e e -- | lei -- \skip 1 son. |
}
verseThree = \lyricmode {
  \set stanza = #"3."
  Da hab'n die Dor -- nen Ro -- \skip 1 sen ge -- tra -- gen,
  Ky -- rie e -- lei -- | son.
  Als das Kind -- lein durch den _ Wald ge -- tra -- gen,
  da haben die Dor -- \skip 1 nen _ Rosen ge -- tra -- gen.
  Ky -- ri -- e e -- | lei -- \skip 1 son. |
}

\score
{
  <<
  \chords {
    \set chordNameLowercaseMinor = ##t
    \chordsOne
  }
  \new Staff <<
    \global
    \clef "treble"
    \new Voice = "1" {
      \voiceOne
      \voiceFirst
    }
    \new Voice = "2" {
      \voiceTwo
      \tiny
      \voiceSecond
    }
  >>
  \new Lyrics \lyricsto "1" \verseOne
  \new Lyrics \lyricsto "1" \verseTwo
  \new Lyrics \lyricsto "1" \verseThree
  >>
}
\score
{
  <<
    \new Staff <<
      \global
      \clef "treble"
      \new Voice \voiceFirst
    >>
    \new Staff <<
      \global
      \clef "treble_8"
      \new Voice \voiceSecond
    >>
  >>
}

%{

[...] ‘simultaneous’ music expression is formed by enclosing expressions inside << and >> [...]

[...] An invisible rest [...] can be entered
like a note with the note name s [...]

[...] do not use an underscore, _, to skip notes –
an underscore indicates a melisma,
causing the preceding syllable to be left-aligned. [...]
http://lilypond.org/doc/v2.19/Documentation/notation/techniques-specific-to-lyrics

%}