X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fnew%2Fpitches-headword.ly;fp=Documentation%2Fsnippets%2Fnew%2Fpitches-headword.ly;h=0000000000000000000000000000000000000000;hb=32a34dcef0c0041c6d62677487a380b5c8b85712;hp=9bd3dd01713435dc4a0c15af086876b9d557d0dc;hpb=f41973ff763d5972a85995b6d40c864281ec6714;p=lilypond.git

diff --git a/Documentation/snippets/new/pitches-headword.ly b/Documentation/snippets/new/pitches-headword.ly
deleted file mode 100644
index 9bd3dd0171..0000000000
--- a/Documentation/snippets/new/pitches-headword.ly
+++ /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
-  }
-
->>