]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/new/pitches-headword.ly
Imported Upstream version 2.16.0
[lilypond.git] / Documentation / snippets / new / pitches-headword.ly
diff --git a/Documentation/snippets/new/pitches-headword.ly b/Documentation/snippets/new/pitches-headword.ly
deleted file mode 100644 (file)
index 9bd3dd0..0000000
+++ /dev/null
@@ -1,143 +0,0 @@
-\version "2.14.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper {
-  ragged-right = ##t
-  line-width = 17\cm
-  indent = 0\cm
-}
-
-% NR 1.1 Pitches
-
-\header {
-  lsrtags = "headwords"
-  texidoc = ""
-  doctitle = "headword"
-}
-
-
-% L. v. Beethoven
-% Piano sonata 21 - Dem Grafen von Waldstein Gewidmet
-% chorale at measures 34 - 40+
-
-\new PianoStaff <<
-
-  % RH Staff
-  \new Staff <<
-
-    % RH Voice 1
-    \new Voice {
-      \set Score.currentBarNumber = #34
-      \voiceOne
-      gs''2 ( ^ \markup \italic { dolce e molto ligato }
-      fs''4
-      e''4
-      |
-      ds''2
-      cs''2 )
-      |
-      ds''2 (
-      e''4
-      fs''4
-      |
-      <gs'' e''>2
-      <fs'' ds''>2 )
-      |
-      \oneVoice
-      \clef bass
-      <gs' e' b>2 (
-      <fs' ds' a>4
-      <e' cs' gs>4
-      |
-      <ds' bs fs>2
-      <cs' a e>2 )
-      |
-      \voiceOne
-      b2 %(
-      cs'4
-      ds'4
-      |
-      \clef treble
-      <e' gs>4 %)
-      r4 r2
-    }
-
-    % RH Voice 2
-    \new Voice {
-      \voiceTwo
-      \override Staff.DynamicLineSpanner #'staff-padding = #2.5
-      <e'' b'>2 \p
-      <ds'' a'>4
-      <cs'' gs'>4
-      |
-      <bs' fs'>2
-      e'2
-      |
-      \once \override TextScript #'staff-padding = #2.5
-      <b'! a'>2 _ \markup \italic { cresc. }
-      b'4
-      <e'' cs''>4
-      |
-      b'2. ( \sf \>
-      a'4 )
-      \clef bass
-      | \break
-      s1 \p
-      |
-      s1
-      |
-      <gs e>4 (
-      <a fs>2. )
-      |
-      s4
-      r4 r2
-    }
-
-  >>
-
-  % LH Staff
-  \new Staff {
-    \override Staff.SustainPedalLineSpanner #'staff-padding = #5
-    <gs' e'>2 ( \sustainOn
-    <fs' ds' b>4 \sustainOff
-    <e' cs'>4
-    |
-    <ds' bs gs>2
-    <cs' a>2 ) \sustainOn
-    |
-    \clef bass
-    \slurDown
-    <ds' b! a fs>2 ( \sustainOff
-    <e' b gs>4
-    <fs' cs' a>4 \sustainOn
-    |
-    \clef treble
-    \voiceOne
-    <<
-      {
-        <gs' e'>2
-        <fs' ds'>2 )
-      }
-      \new Voice {
-        \voiceTwo
-        b1 \sustainOff
-      }
-    >>
-    \oneVoice
-    |
-    %\break
-    \clef bass
-    <gs e>2 (
-    <fs ds b,>4
-    <e cs>4
-    |
-    <ds bs, gs,>2
-    <cs a,>2 ) \sustainOn
-    |
-    <b,! b,,!>1 ( \sustainOff
-    |
-    <e e,>4 )
-    r4 r2
-  }
-
->>