]> git.donarmstrong.com Git - lilypond.git/commitdiff
Build: move headwords into LSR staging area.
authorGraham Percival <graham@percival-music.ca>
Sun, 24 Jan 2010 14:32:52 +0000 (14:32 +0000)
committerGraham Percival <graham@percival-music.ca>
Sun, 24 Jan 2010 14:37:28 +0000 (14:37 +0000)
30 files changed:
Documentation/included/ancient-headword.ly [deleted file]
Documentation/included/chords-headword.ly [deleted file]
Documentation/included/editorial-headword.ly [deleted file]
Documentation/included/expressive-headword.ly [deleted file]
Documentation/included/figured-bass-headword.ly [deleted file]
Documentation/included/fretted-headword.ly [deleted file]
Documentation/included/keyboard-headword.ly [deleted file]
Documentation/included/pitches-headword.ly [deleted file]
Documentation/included/repeats-headword.ly [deleted file]
Documentation/included/rhythms-headword.ly [deleted file]
Documentation/included/simultaneous-headword.ly [deleted file]
Documentation/included/staff-headword.ly [deleted file]
Documentation/included/text-headword.ly [deleted file]
Documentation/included/unfretted-headword.ly [deleted file]
Documentation/included/wind-headword.ly [deleted file]
Documentation/snippets/new/ancient-headword.ly [new file with mode: 0644]
Documentation/snippets/new/chords-headword.ly [new file with mode: 0644]
Documentation/snippets/new/editorial-headword.ly [new file with mode: 0644]
Documentation/snippets/new/expressive-headword.ly [new file with mode: 0644]
Documentation/snippets/new/figured-bass-headword.ly [new file with mode: 0644]
Documentation/snippets/new/fretted-headword.ly [new file with mode: 0644]
Documentation/snippets/new/keyboard-headword.ly [new file with mode: 0644]
Documentation/snippets/new/pitches-headword.ly [new file with mode: 0644]
Documentation/snippets/new/repeats-headword.ly [new file with mode: 0644]
Documentation/snippets/new/rhythms-headword.ly [new file with mode: 0644]
Documentation/snippets/new/simultaneous-headword.ly [new file with mode: 0644]
Documentation/snippets/new/staff-headword.ly [new file with mode: 0644]
Documentation/snippets/new/text-headword.ly [new file with mode: 0644]
Documentation/snippets/new/unfretted-headword.ly [new file with mode: 0644]
Documentation/snippets/new/wind-headword.ly [new file with mode: 0644]

diff --git a/Documentation/included/ancient-headword.ly b/Documentation/included/ancient-headword.ly
deleted file mode 100644 (file)
index 3b1136e..0000000
+++ /dev/null
@@ -1,135 +0,0 @@
-\version "2.12.0"
-
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##t
-  line-width=17\cm
-  indent=0\cm
-}
-
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-\include "gregorian.ly" 
-
-\score {
-  <<
-    \new VaticanaVoice = "cantus" {
-      \clef "vaticana-do3"
-      % Verse 1 — Salve, Regína
-      a\melisma \[ a \flexa g \pes a\melismaEnd \] d
-      \divisioMinima
-      \[ a\melisma \flexa g\melismaEnd \]
-      \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \]
-      \[ e\melisma \flexa d\melismaEnd \]
-      \divisioMaior
-      c d \[d\melisma \flexa c\melismaEnd \] d
-      \[ e\melisma \pes f\melismaEnd\] g
-      \[d\melisma \pes e \flexa c\melismaEnd \] d
-      \finalis
-      % Verse 2 — Vita, dulcédo
-      % a\melisma \[ a \flexa g \pes a\melismaEnd \] d
-      % \divisioMinima
-      % \[ a\melisma \flexa g\melismaEnd \]
-      % \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \]
-      % \[ e\melisma \flexa d\melismaEnd \]
-      % \divisioMaior
-      % c d \[e\melisma \pes f\melismaEnd \] g
-      % \[d\melisma \pes e \flexa c\melismaEnd \] d
-      % \finalis
-      % Verse 3 — Ad te clamámus
-      \[ d\melisma \pes f\melismaEnd\] a g
-      \[ g\melisma \flexa f \pes a\melismaEnd\] e
-      \divisioMaior
-      g f \[ e\melisma \flexa d \pes g\melismaEnd \]
-      \divisioMinima
-      c d \[ e\melisma \flexa d \pes g\melismaEnd \]
-      \[ f\melisma \flexa e\melismaEnd \] d
-      \finalis
-      % Verse 4 — Ad te suspirámus
-      \[ d\melisma \pes f\melismaEnd \] a c' g
-      \[ g\melisma \flexa f \pes g\melismaEnd \] a
-      \divisioMaior
-      d \[ f\melisma \pes \deminutum g\melismaEnd \] g d
-      \[ \virga f\melisma \inclinatum e \inclinatum d\melismaEnd \]
-      c \divisioMaior
-      d \[ d\melisma \flexa c \pes f\melismaEnd \]
-      \[ g\melisma \pes a\melismaEnd \]
-      g \[ f\melisma \flexa e\melismaEnd \] g
-      \[ f\melisma \flexa \deminutum e\melismaEnd \]
-      \[ d\melisma \flexa c \pes d\melismaEnd \]
-      \finalis
-      % Verse 5 — Eia ergo, Advocáta nostra
-      f\melisma \[ f \pes g\melismaEnd \] f
-      \[ g\melisma \pes \deminutum a\melismaEnd \] a
-      \divisioMinima
-      c' g \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] d g a
-      \divisioMaior
-      d' d' \[ c'\melisma \flexa b c' \pes d'\melismaEnd \] a
-      \divisioMinima
-      d' c' a \[ g\melisma \flexa f \pes a\melismaEnd \] g
-      \[ d\melisma \pes e\melismaEnd \] f
-      \[ \virga e\melisma \inclinatum d \inclinatum c\melismaEnd \]
-      \divisioMaior
-      \[ c\melisma \pes d\melismaEnd \]
-      f \[ g\melisma \flexa \deminutum f\melismaEnd \]
-      \[ d\melisma \flexa c \pes d\melismaEnd \] d
-      \finalis
-      % Verse 6 — Et Jesum
-      d a, \[ c\melisma \pes d\melismaEnd \]
-      \divisioMinima
-      d \[ d\melisma \pes e\melismaEnd \] \[ e\melisma \flexa d d\melismaEnd \]
-      c g f \[ e\melisma \flexa \deminutum d\melismaEnd \] g
-      \[ f\melisma \flexa e\melismaEnd \]
-      \[ d\melisma \flexa c \pes d\melismaEnd \]
-      \[ d\melisma \pes a \] \virga bes\melismaEnd a
-      \divisioMinima
-      \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] g d f
-      \[ f\melisma \flexa e\melismaEnd \] \[ d\melisma \flexa c\melismaEnd \]
-      \divisioMinima
-      \[ e\melisma \pes f \flexa e\melismaEnd \] d d
-      \finalis
-      % Verse 7 ad finem — O clemens: O pia: O dulcis Virgo María
-      a\melisma \[a \flexa g a \quilisma b \pes c'\melismaEnd \]
-      \[ \virga b\melisma \inclinatum a \inclinatum g\melismaEnd \] a
-      \finalis
-      \[ g\melisma \pes a \quilisma b \pes c' \] \[ c' \flexa b\melismaEnd \]
-      \[ a\melisma \flexa g\melismaEnd \] \[ g\melisma \pes a\melismaEnd \]
-      \finalis
-      \[ a\melisma \flexa d \virga f \inclinatum e \inclinatum d \inclinatum c d \]
-      \divisioMinima
-      \[ d \pes e f \pes g\melismaEnd \]
-      \[ g\melisma \flexa \deminutum f\melismaEnd \]
-      \[ g\melisma \pes a\melismaEnd \]
-      d c d \[ d\melisma \pes g \flexa f f\melismaEnd \]
-      \[ e\melisma \flexa d\melismaEnd \]
-      \finalis
-    }
-    \new Lyrics \lyricsto "cantus" {
-      Sal- ve, Re- gí- na, ma- ter mi- se- ri- cór- di- ae:
-      % Vi- ta, dul- cé- do, et spes no- stra, sal- ve.
-      Ad te cla- má- mus, éx- su- les, fi- li- i He- vae.
-      Ad te su- spi- rá- mus, ge- mén- tes et flen- tes in hac la- cri- má- rum
-      val- le.
-      E- ia er- go, Ad- vo- cá- ta no- stra, il- los tu- os mi- se- ri- cór- des
-      ó- cu- los ad nos con- vér- te.
-      Et Je- sum, be- ne- díc- tum fruc- tum ven- tris tu- i, no- bis post hoc
-      ex- sí- li- um os- tén- de.
-      O cle- mens:
-      O pi- a:
-      O dul- cis Vir- go Ma- rí- a.
-    }
-  >>
-}
-
-\layout {
-  \context {
-    \Staff
-    \consists Custos_engraver
-  }
-}
-
diff --git a/Documentation/included/chords-headword.ly b/Documentation/included/chords-headword.ly
deleted file mode 100644 (file)
index f8a661f..0000000
+++ /dev/null
@@ -1,101 +0,0 @@
-\version "2.12.0"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##f
-  line-width=15\cm
-  indent=0\cm
-}
-
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-theChords = \chordmode {
-  \time 2/2
-  f1 | c2 f2 | f1 | c2 f2| %\break 
-  f2 bes2 | f1 | c2:7 f | c1 | \break 
-}
-
-verseOne = \lyricmode{
-  \set stanza = "1. "
-  Fair is the sun - shine,
-  Fair - er the moon - light
-  And all the stars __ _  in heav'n a -- bove;
-}
-
-verseTwo = \lyricmode{
-  \set stanza = "2. "
-  Fair are the mead - ows,
-  Fair - er the wood - land, 
-  Robed in the flow -- ers of bloom -- ing spring;
-}
-
-Soprano = { 
-  \time 2/2  
-  \key f \major
-  \stemUp
-  f'2 f'4 f' | g'4 e' f'2 | a'4. a'8 a'4 a' | bes'4 g' a'2 |
-c''2 f''4 d'' |  c''2  bes'4  a' | bes'2 a' | g'1 |
-}
-
-Alto = { 
-  \key f \major 
-  c'2 c'4 c' | d'4 c' c'2 | f'4. f'8 f'4 fis' | g'4 e' f'2 |
-  f'2 f'4 f' |  f'2  g'4  f' | e'2 f' | e'1 | 
-}
-
-Tenor = { 
-  \key f \major 
-  \stemDown 
-  a2 a4 a | bes4 g a2  | c'4. c'8 d'4 d' | d'4 c' c'2 | 
-  a2 d'4 bes | a2 c'4 c' | c'2 c'  | c'1 |
-}
-
-Bass = {
-  \key f \major 
-  f2 f4 f | bes,4 c  f2 | f4. e8 d4 c | bes,4 c f2 |
-  f2 bes,4 d | f2 e4 f | g2 f | c1 |
-}
-
-
-\score {
-  << 
-    \new ChordNames { \theChords }
-    \context Staff = upper {
-      \context Voice = sop {
-        <<
-          \Soprano 
-          \Alto 
-        >> 
-      }
-    }
-    \context Lyrics="LyrOne" \lyricsto "sop" {\verseOne}
-    \context Lyrics="LyrTwo" \lyricsto "sop" {\verseTwo}
-    \context Staff = lower {
-      \new Voice {
-        \clef bass
-        #(set-accidental-style 'modern-cautionary) 
-        <<
-          \Tenor 
-          \Bass 
-        >>
-      }
-    }
-  >>
-
-\layout {
-  %between-system-space = 1\mm
-  indent = 0
-  \context {
-    \Score
-    \remove "Bar_number_engraver"
-  }
-  \context { \Staff 
-    \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
-  }
-  }
-}
-\paper {  }
diff --git a/Documentation/included/editorial-headword.ly b/Documentation/included/editorial-headword.ly
deleted file mode 100644 (file)
index b834181..0000000
+++ /dev/null
@@ -1,101 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##t
-  line-width=17\cm
-  indent=0\cm
-}
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-% NR 1.7 Editorial annotations
-
-% Beethoven, Op. 31, No. 3
-% Piano sonata 18, Movt II, Scherzo
-% Measures 9 - 14
-
-\layout { }
-
-\new PianoStaff <<
-
-   % RH Staff
-   \new Staff {
-      \clef treble
-      \key af \major
-      \time 2/4
-      \set Staff.fingeringOrientations = #'(up up)
-      \set Score.currentBarNumber = #9
-      \partial 8
-      <af''-4 c''>8 \staccato
-      |
-      \set doubleSlurs = ##t
-      <bf''-5 df''-2>4 (
-      <af''-4 c''>8 \staccato )
-      \noBeam
-      c''8-5 \staccato \pp
-      |
-      \set doubleSlurs = ##f
-      bf'8.. (
-      af'32
-      g'8 ) \staccato
-      f'8 \staccato
-      |
-      e'4-2
-      r8
-      \once \override Script #'script-priority = #-100
-      \afterGrace
-         f'8 ( \trill ^ \markup { \finger "3-2" }
-         { e'16 [ f'16 ] }
-      |
-      g'8..-3
-      f'32
-      e'8-1 ) \staccato
-      d'8-2 \staccato
-      |
-      c'4
-      r4
-   }
-   
-   % LH Staff
-   \new Staff {
-      \key af \major
-      \clef treble
-      \override Fingering #'direction = #down
-      \set Staff.fingeringOrientations = #'(down down)
-      \partial 8
-      <af' af>8 \staccato
-      \set doubleSlurs = ##t
-      <g'-2 ef'-3>4 (
-      <af' af>8 ) \staccato
-      \noBeam
-      \clef bass
-      c'8-1 \staccato
-      |
-      \set doubleSlurs = ##f
-      bf8.. (
-      af32
-      g8-1 ) \staccato
-      f8 \staccato
-      |
-      e4
-      r8
-      \afterGrace
-         f8 ( \trill _ \markup { \finger "2-1" }
-         { e16 [ f16 ] }
-      |
-      g8..-1
-      f32
-      e8 ) \staccato
-      d8 \staccato
-      |
-      c4
-      r4
-   }
-
->>
diff --git a/Documentation/included/expressive-headword.ly b/Documentation/included/expressive-headword.ly
deleted file mode 100644 (file)
index ed62f91..0000000
+++ /dev/null
@@ -1,263 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper {
-  line-width = 16\cm
-  indent = 0\cm
-}
-
-% NR 1.3 Expressive marks
-
-% L. v. Beethoven, Op. 49 no. 1 
-% Piano sonata 19 - "Leichte Sonate"
-% measures 1 - 12
-
-%\layout {
-%   \context {
-%      \Score
-%      \override SpacingSpanner #'base-shortest-duration = 
-%         #(ly:make-moment 1 20) 
-%   }
-%}
-
-\new PianoStaff <<
-
-   % RH Staff
-   \new Staff {
-      \clef treble
-      \key g \major
-      \time 6/8
-      \partial 2
-      \once \override TextScript #'staff-padding = #2
-      d'8 \staccato
-      ^ \markup { \column {
-         RONDO
-         \italic Allegro } }
-      d'8 \staccato
-      g'8 \staccato
-      a'8 \staccato
-
-      |
-
-      b'8 [ (
-      g'8 ] )
-      e'8 \staccato
-      e' \staccato
-      a'8 \staccato
-      b'8 \staccato
-
-      |
-
-      c''8 [ (
-      a'8 ] )
-      e''8 \staccato
-      d''8 \staccato
-      c''8 \staccato
-      b'8 \staccato
-
-      |
-
-      a'8 \staccato
-      g'8 \staccato
-      a'8 \staccato
-      \acciaccatura { g'16 [ a'16 ] }
-      bf'8
-      a'8 \staccato
-      g'8 \staccato
-
-      |
-
-      fs'8 [ (
-      d'8 ] )
-      d'8 \staccato
-      d'8 \staccato
-      g'8 \staccato
-      a'8 \staccato
-
-      |
-
-      b'8 [ (
-      g'8 ] )
-      e'8 \staccato
-      e'8 \staccato
-      a'8 \staccato
-      b'8 \staccato
-
-      |
-
-      c''8 [ (
-      a'8 ] )
-      e''8 \staccato
-      d''8 \staccato
-      c''8 \staccato
-      b'8 \staccato
-
-      |
-
-      a'8 \staccato
-      g'8 \staccato
-      a'8 \staccato
-      <<
-         {
-            \voiceOne
-            d'8
-            g'8
-            fs'8
-            \oneVoice
-         }
-         \new Voice {
-            \voiceTwo
-            d'4
-            c'8
-            \oneVoice
-         }
-      >>
-
-      |
-
-      <b g'>4 \tenuto
-      d'8 \staccato
-      g'8 \staccato
-      b'8 \staccato
-      d''8 \staccato
-
-      |
-
-      d''8 (
-      <c'' a'>8 \staccato )
-      <c'' a'>8 \staccato
-      d''8 (
-      <b' g'>8 \staccato )
-      <b' g'>8 \staccato
-
-      |
-
-      d''8 (
-      <c'' a'>8 \staccato )
-      <c'' a'>8 \staccato
-      d''8 (
-      <b' g'>8 \staccato )
-      <b' g'>8 \staccato
-
-      |
-
-      d''8 \staccato
-      <c'' a'>8 \staccato
-      <b' g'>8 \staccato
-      d'' \staccato
-      <c'' a'>8 \staccato
-      <b' g'>8 \staccato
-
-      |
-
-      <d'' c'' a'>4 \fermata
-      r8 r4 r8
-   }
-
-   % LH Staff
-   \new Staff {
-      \clef bass
-      \key g \major
-      \time 6/8
-      \partial 2
-      r8
-      r8
-      <d' b>8 \staccato
-      <c' a>8 \staccato
-
-      |
-
-      <b g>4
-      r8
-      r8
-      <e' c'>8 \staccato
-      <d' b>8 \staccato
-
-      |
-
-      <c' a>4
-      r8
-      r8
-      <a fs>8 \staccato
-      <b g>8 \staccato
-
-      |
-
-      <c' a>8 \staccato
-      <b d'>8 \staccato
-      <e' c'>8 \staccato
-      <e' cs'>4. (
-
-      |
-
-      d'4 )
-      r8
-      r8
-      <d' b!>8 \staccato
-      <c'! a>8 \staccato
-
-      |
-
-      <b g>4
-      r8
-      r8
-      <e' c'>8 \staccato
-      <d' b>8 \staccato
-
-      |
-
-      <c' a>4
-      r8
-      r8
-      <a fs>8 \staccato
-      <b g>8 \staccato 
-
-      |
-
-      <c' a>8 \staccato
-      <d' b>8 \staccato
-      <e' c'>8 \staccato
-      <b d>4
-      <a d>8 \staccato
-
-      |
-
-      <g g,>4 \tenuto
-      r8
-      r4
-      r8
-
-      |
-
-      r8
-      <d' fs>8 \staccato
-      <d' fs>8 \staccato
-      r8
-      <d' g>8 \staccato
-      <d' g>8 \staccato
-
-      |
-
-      r8
-      <d' fs>8 \staccato
-      <d' fs>8 \staccato
-      r8
-      <d' g>8 \staccato
-      <d' g>8 \staccato
-
-      |
-
-      r8
-      <d' fs>8 \staccato
-      <d' g>8 \staccato
-      r8
-      <d' fs>8 \staccato
-      <d' g>8 \staccato
-
-      |
-
-      <d' fs>4 \fermata
-      r8 r4 r8
-   }
-
->>
diff --git a/Documentation/included/figured-bass-headword.ly b/Documentation/included/figured-bass-headword.ly
deleted file mode 100644 (file)
index 8f66692..0000000
+++ /dev/null
@@ -1,117 +0,0 @@
-\version "2.12.0"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##f
-  line-width=16\cm
-  indent=1.5\cm
-}
-
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-% NR 2.7.3 Figured bass
-
-% Arcangelo Corelli, 12 Sonate da Camera, Op. 2
-% Sonata II, Allemanda
-% measures 1 - 88
-% Coded by Neil Puttock; modified by Carl Sorensen
-
-extendOn = \bassFigureExtendersOn
-extendOff = \bassFigureExtendersOff
-
-\score {
-  
-  \new StaffGroup <<
-  
-    \new GrandStaff <<
-      
-      \new Staff = "violinoI" {
-        \set Staff.instrumentName = \markup {
-          \hcenter-in #11
-          \line { Violino I. }
-        }
-        \time 4/4
-        \mark \markup { \italic Adagio. }
-        \partial 8
-        r16 a'16 |
-        a'8. [ d''16 d''8.  e''16 ] cis''8 a'4 a''16 bes''16 |
-        cis''8 d''16 ( e'' ) e''8.  d''16 d''4 r8 d''16 e''16 |
-        f''8 f''4 g''16 ( f''16 ) e''8 e''4 f''16 ( e''16 ) |
-        d''8.  d''16 g''16 ( f''16 ) e''16 ( d''16 ) cis''8 
-            cis''4 cis''16 cis''16 |
-        d''8 d''8 c''8.  c''16 c''8 ( b'4 ) b'16 b'16 |
-        c''8 c''8 bes'8.  bes'16 bes'8 ( a'4 ) a''16 a''16 |
-        a''8 g''8 g''8.  g''16 g''8 ( f''8 ) r8 f''8 |
-      }
-      
-      \new Staff = "violinoII" {
-        \set Staff.instrumentName = \markup {
-          \hcenter-in #11
-          \line { Violino II. }
-        }
-        \time 4/4
-        \partial 8
-        r16 f'16 |
-        f'8.  g'16 g'4 a'4 r8 d''16 d''16 |
-        e''8 a'8 cis''8.  d''16 d''4 r8 f''16 g''16 |
-        a''8 a''8 d''8.  d''16 g'8 g'8 c''8.  c''16 |
-        f'8.  f''16 bes''16 ( a''16 ) g''16 ( f''16 ) e''8 e''4 e''16 e''16 |
-        a'8 fis''8 g''8 a''8 d''8 d''4 d''16 d''16 | 
-        g'8 e''8 f''8 g''8 c''8 c''4 cis''16 cis''16 | 
-        d''8 d''8 e''8.  e''16 e''8 a'8 r8 d''8 | 
-      }
-      
-    >>
-    
-    \new Staff = "violone" {
-      \set Staff.instrumentName = \markup {
-        \hcenter-in #13 {
-          \center-column {
-            Violone,
-            \line { e Cembalo. }
-          }
-        }
-      }
-      \time 4/4
-      \clef bass
-      \partial 8
-      r16 d16 | 
-      d4 bes,4 a,4 f4 | 
-      g8 f16 g16 a8 a,8 d4 d'4 ~ | 
-      d'8 c'8 b4 c'8 c'16 bes16 a4 | 
-      bes8 bes16 a16 g4 a8 a,4 a16 g16 |
-      fis8 d8 e8 fis8 g8 g,4 g16 f16 |
-      e8 c8 d8 e8 f8 f,4 a,8 | 
-      b,4 cis4 d4 r8 d'8 | 
-    }
-    
-    \new FiguredBass \figuremode {
-      \set figuredBassAlterationDirection = #RIGHT
-      \set figuredBassPlusDirection = #RIGHT      
-      \override VerticalAxisGroup #'minimum-Y-extent = #'()
-      \override BassFigureAlignment #'stacking-dir = #DOWN
-      s8 |
-      s4 <6>4 <_+>4 <6>4 | 
-      <6 4\+ 2>8 <6>8 <_+> s8 s2 |
-      <5>8 <6 4>8 <6 5>4 s4 <5>8 <6>8 |
-      s4 <6 5 _-> <_+>2 |
-      <6>8 <_+>8 <6>8 <6 5>8 <5 4>8 \extendOn <5 _!>8 \extendOff s4 |
-      <6>4 <6->8 <6 5->8 <5 4->8 \extendOn <5 3>4 \extendOff <5 _+>8 |
-      <7>8 <6>8 <5>4 <9 4>8 <8 3>8 s4 |
-    }
-    
-  >>
-  
-  \layout {
-    \context {
-      \Score
-      \override RehearsalMark #'break-align-symbols = #'(time-signature)
-      \override RehearsalMark #'self-alignment-X = #LEFT
-      \override TimeSignature #'break-align-anchor-alignment = #LEFT
-    }
-  }
-}
diff --git a/Documentation/included/fretted-headword.ly b/Documentation/included/fretted-headword.ly
deleted file mode 100644 (file)
index f2d13ee..0000000
+++ /dev/null
@@ -1,145 +0,0 @@
-% INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings %
-% Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17"   %
-% on melodies from Bellini's "Norma"                              %
-%*****************************************************************%
-
-\version "2.12.0"
-
-#(set-global-staff-size 15)
-\paper {
-  line-width = 17\cm
-  indent = 0\cm
-}
-
-\layout {
-  \context {
-    \Score
-    \remove "Bar_number_engraver"
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-%%%% shortcuts
-% fingering orientations
-sfol = \set fingeringOrientations = #'(left)
-sfor = \set fingeringOrientations = #'(right)
-sfod = \set fingeringOrientations = #'(down)
-sfou = \set fingeringOrientations = #'(up)
-
-% string number orientations
-ssnol = \set stringNumberOrientations = #'(left)  %(down right up)
-ssnou = \set stringNumberOrientations = #'(up)
-ssnod = \set stringNumberOrientations = #'(down)
-ssnor = \set stringNumberOrientations = #'(right)
-
-% define fingering offset
-FO = #(define-music-function (parser location offsetX offsetY) (number? number?)
-#{
-  \once \override Voice.Fingering #'extra-offset = #(cons $offsetX $offsetY)
-#})
-
-% markups
-rit = \markup \center-align { \bold { \italic { " rit." } } }
-dim = \markup \center-align { \italic { " dim." } }
-andantino = \markup \left-align { \italic { \bold { \fontsize #2.5 { "Andantino" } } } }
-benmarcato = \markup { \italic { \bold { "il canto ben marcato" } } }
-pdolce = #(make-dynamic-script (markup #:line (#:dynamic "p" #:normal-text #:italic "dol.")))
-
-%%% THE MUSIC %%%
-
-melody = \relative c {
-  \clef "treble_8"
-  \key d \major
-  \time 4/4
-  \voiceOne
-  \sfol
-  e,32 a' c e 
-  e, a c e 
-  e,, a' c e 
-  e, a c e 
-  f4\rest <e'-4>4-> | % m. 1
-  
-  e,,,32 gis' b e 
-  e, gis b e 
-  e,, gis' b e 
-  e, gis b e 
-  f4\rest \FO #'0.4 #'0.5 <gis-1 e'-4>4 | % m. 2
-  
-  d4\rest <b e>-> d4\rest^\rit <b e>4-> | % m. 3
-  <gis b e>1 | % m. 4
-  
-  \bar "||"
-  \key a \minor
-  R1 % m. 5
-  
-  e'4^\benmarcato e8. d16-4 
-  d4-4 \times 2/3 { \sfou \FO #'-0.3 #'0.6 <c-2>4 b8 } | % end of m. 6
-  
-  \FO #'-0.3 #'0.3 
-  <a-3>4 \times 2/3 { c4 b8 } a4 e'8. e16 | % m. 7
-  
-  \FO #'-0.3 #'0.3 
-  <g-4>4 \times 2/3 { \sfol \FO #'0.3 #'0.0 <f-1>4 e8 } e4  % beg of m. 8
-  \times 2/3 { \sfou <d-4>4 c8 } | % end of m. 8
-  
-  b4 \times 2/3 { d4-4 c8 } \sfou \FO #'-1.7 #'-1.5 <b-0>4 e | % end of m. 9
-  
-  e4 e8. d16-4 d4 \times 2/3 { c4 b8 } | % m. 10
-  
-  \times 2/3 { a4 a8 b4 c8 } % beg of m. 11
-  \sfou \FO #'-0.3 #'0.3
-  <d-4>4^\< \times 2/3 { e4 <d f>8\! } | % end of m. 11
-}
-
-bass = \relative c {
-  \key d \major
-  \time 4/4
-  \voiceTwo
-  
-  e,8\fp[ e'] e,[ e'] e, \sfol <c''-1> <a'-2> c, | % m. 1
-  
-  e,,8\fp[ e'] e,[ e'] e, \sfod \FO #'0.2 #'-0.2 <b''-1>  % beg m. 2
-  \sfol \FO #'0.3 #'0.0 <e-1> b | % end m. 2
-  
-  e,,8 e' gis e e, e' gis_\dim e | % m. 3
-  
-  e,1 | % m. 4
-  
-  %% new section starts here in A minor
-  \overrideBeamSettings #'Score #'(4 . 4) #'end 
-    #'((* . (1 1 1 1))
-       ((1 . 12)  . (3 3 3 3)))
-  \once \override TextScript #'staff-padding = #1.7
-  \times 2/3 { a8\p^\andantino e' a c a e a, e' a c a e } | % m. 5
-  
-  \times 2/3 { a,8\pdolce e' a c a e } % beg m. 6
-  \times 2/3 { e,8 \sfou <e'-3> <gis-1> c gis e } | % end m. 6
-  
-  \times 2/3 { a,8 <e'-2> a c e, b' a, e' a c a e } | % m. 7
-  
-  \times 2/3 { f,8 f' a \sfol \FO #'0.3 #'-0.5 <d-4> a f fis, d' a' d a d, } | % m. 8
-  
-  \times 2/3 { <g,-3>8 d' g d' g, d % beg m. 9
-    \sfod \FO #'0.0 #'-2.0 <gis,-4> \sfou <e'-2> <gis-1> b gis e } | % end m. 9
-  
-  \times 2/3 { a,8 e' a c a e e, e' gis c gis e } | % m. 10
-  
-  \times 2/3 { a,8 e' a b a e f, f' a d a f } | % m. 11
-}
-
-\score {
-  \new Staff = "guitar" <<
-    \context Voice = "upper" { \melody }
-    \context Voice = "lower" { \bass }
-  >>
-  \layout {
-    \context {
-      \Score
-      \override Fingering #'staff-padding = #'()
-      \override TupletNumber #'stencil = ##f
-      \override TupletBracket #'bracket-visibility = ##f
-    }
-  }
-  \midi { }
-}
diff --git a/Documentation/included/keyboard-headword.ly b/Documentation/included/keyboard-headword.ly
deleted file mode 100644 (file)
index 8793965..0000000
+++ /dev/null
@@ -1,241 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-
-#(set-global-staff-size 15)
-\paper {
-  line-width = 16\cm
-  indent = 0\cm
-}
-
-% NR 2.2 Keyboard instruments
-
-% M. Ravel, Sonatine (1905)
-% First movement
-
-\layout {
-  \context {
-    \Score
-    \remove "Bar_number_engraver"
-  }
-}
-
-fermataLong = \markup {
-  \override #'(direction . 1)
-  \override #'(baseline-skip . 2) {
-    \dir-column {
-      \musicglyph #"scripts.ufermata"
-      \text \italic \center-align long
-    }
-  }
-}
-
-\new PianoStaff <<
-  \set PianoStaff.connectArpeggios = ##t
-  \new Staff {
-    \time 2/4
-    \key fs \major
-    <<
-      \new Voice {
-        \voiceOne
-        fs''8 ( ^\markup {
-          \override #'(baseline-skip . 2.4) \column {
-            \line \bold { Un peu retenu }
-            \line \italic { très expressif }
-          }
-        }
-        es''16
-        cs''16
-        as'4 )
-        |
-        fs''8 (
-        es''16
-        cs''16
-        as'4 )
-        |
-        fs''8 (
-        es''16
-        cs''16
-        as'8
-        cs''8 )
-        |
-      }
-      \new Voice {
-        \voiceTwo
-        gs'8\rest \ppp
-        fs'4 (
-        es'8 )
-        |
-        gs'8\rest
-        fs'4 (
-        es'8 )
-        |
-        gs'8\rest
-        fs'4 (
-        es'8 )
-        |
-      }
-    >>
-    \clef bass
-    <ds b! es'>4 ( ^ \markup \bold { Rall. }
-    \override Script #'stencil = #(lambda (grob)
-      ly:script::print (grob-interpret-markup grob fermataLong))
-    <ds' as'>8 ) \fermata
-    \noBeam
-    \clef treble
-    \slurUp
-    \once \override Hairpin #'to-barline = ##f
-    <as fs'>8 ( \pp \>
-    |
-    <gs b cs'>4. \! ) ^\markup \bold { a Tempo }
-    \slurUp
-    <as fs'>8 ^\( \>
-    |
-    <gs b cs'>4. \! \)
-    <<
-      \new Voice {
-        \voiceOne
-        <as fs'>8 (
-        |
-        cs'8 ^\markup \bold { Rallentando }
-        b16
-        cs'16
-        d'8
-        e'16
-        fs'16
-        |
-        <as! cs' gs'>4. )
-        s8
-        |
-        r8
-        <cs'' as'' cs'''>4 \arpeggio
-        e''16 ( ^\markup \bold { Lent }
-        fs''16
-        |
-        \voiceTwo
-        <as'! cs'' gs''>2 )
-        |
-      }
-      \new Voice {
-        \voiceTwo
-        s8
-        |
-        <gs b>4 \<
-        <fs bs>4 \>
-        |
-        s4. \!
-        \slurUp
-        \once \override Script #'direction = #UP
-        <a bs e'>8 ( \accent
-        |
-        <as! cs' gs'>4. )
-        \once \override Hairpin #'to-barline = ##f
-        <a' bs'>8 \ppp \>
-        |
-        s8 \!
-        \stemDown
-        \once \override Script #'direction = #UP
-        \ottava #1
-        \voiceOne
-        \once \override PianoStaff.Arpeggio #'padding = #0.8
-        <cs''' as''' cs''''>4. \arpeggio \fermata
-        \ottava #0
-        \bar "|."
-      }
-    >>
-  }
-  \new Staff <<
-    \set Staff.pedalSustainStyle = #'bracket
-    \key fs \major
-    \clef bass
-    \new Voice {
-      \voiceOne
-      ds'4 \tenuto
-      cs'4 \tenuto
-      |
-      ds'4 \tenuto
-      cs'4 \tenuto
-      |
-      ds'4 \tenuto
-      cs'4 \tenuto
-      |
-      s8
-      \clef treble
-      <b' cs''>8 [
-      \clef bass
-      <es b cs'>8 \fermata ]
-      s8
-      |
-      fs8\rest
-      \clef treble
-      <b' cs''>4 \tenuto
-      s8
-      |
-      fs8\rest
-      \clef treble
-      <b' cs''>4 \tenuto
-      s8
-      |
-      s2
-      |
-      ds8\rest
-      \clef treble
-      <as' cs''>4
-      \clef bass
-      s8
-      |
-      s8
-      \clef treble
-      <as'>4 \arpeggio
-      \clef bass
-      s8
-      |
-      s8
-      \clef treble
-      <as''>4. \arpeggio \fermata
-      |
-    }
-    \new Voice {
-      \voiceTwo
-      ds'8 [ (
-      < ds bs >8
-      cs'8
-      < ds as >8 ] )
-      |
-      ds'8 [ (
-      < ds bs >8
-      cs'8
-      < ds as >8 ] )
-      |
-      ds'8 [ (
-      < ds bs >8
-      cs'8
-      < ds as >8 ] )
-      |
-      \once \override Script #'outside-staff-priority = #100
-      \once \override TextScript #'outside-staff-priority = #500
-      <cs, gs,>4. \fermata _\markup \italic { ped. }
-      <fs, cs>8 (
-      |
-      <e, b,>4. ) \sustainOn
-      \clef bass
-      <fs, cs>8 \( \sustainOff
-      |
-      <e, b,>4. \) \sustainOn
-      \clef bass
-      <fs, cs>8 ( \sustainOff
-      |
-      <e, b,>4
-      <d, a,>4
-      |
-      <fs,, cs,>4. ) \sustainOn
-      <a, e>8 ( \sustainOff
-      |
-      <fs, cs>4. ) \sustainOn
-      \slurUp
-      <a e'>8 ( \sustainOff \sustainOn
-      |
-      <fs cs'>2 ) \sustainOff \sustainOn
-      |
-    }
-  >>
->>
diff --git a/Documentation/included/pitches-headword.ly b/Documentation/included/pitches-headword.ly
deleted file mode 100644 (file)
index d69c44a..0000000
+++ /dev/null
@@ -1,143 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##t
-  line-width=17\cm
-  indent=0\cm
-}
-  
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-% NR 1.1 Pitches
-
-% 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
-   }
-
->>
diff --git a/Documentation/included/repeats-headword.ly b/Documentation/included/repeats-headword.ly
deleted file mode 100644 (file)
index faba778..0000000
+++ /dev/null
@@ -1,124 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper {
-  line-width = 16\cm
-  indent = 0\cm
-}
-
-% NR 1.7 Repeats
-
-% Beethoven, Op. 57
-% Piano sonata 23 - Dem Grafen Franz von Brunswick Gewidmet
-% Movt II, Andante con moto
-% Measures 9 - 16
-
-\new PianoStaff <<
-
-   \new Staff = RH {
-      \clef bass
-      \key df \major
-      \time 2/4
-      \set Score.currentBarNumber = #9
-      \bar "|:"
-      <af ef c>4 (
-      <af gf c>8..
-      <af ef c>32
-      |
-      <af f df>8. )
-      <df' af f>16 (
-      <c' af gf>8
-      <df' af f>8 )
-      |
-      <af ef c>4 (
-      <af gf c>8..
-      <af ef c>32
-      |
-      <af f df>8. )
-      \slurDown
-      <f' af f>16 (
-      <<
-         {
-            \voiceTwo
-            gf8
-            f8 )
-         }
-         \new Voice {
-            \voiceOne
-            <f' af>16
-            ef'16
-            <df' af>8
-         }
-      >>
-      \oneVoice
-      |
-      <af ef c>4 (
-      <af gf c>8..
-      <af ef c>32
-      \clef treble
-      |
-      <af' df' af>8. )
-      <af' f' df'>16 (
-      <af' ef' c'>16
-      gf'16
-      <f' df' af>8 )
-      |
-      \slurUp
-      <ef' bf gf>4
-      \change Staff = LH
-      \voiceOne
-      <af ef c>4
-      |
-      <df' f df>4.
-      \change Staff = RH
-      \oneVoice
-      r8
-      \clef bass
-      \bar ":|"
-   }
-
-   \new Staff = LH {
-      \clef bass
-      \key df \major
-      \time 2/4
-      <af, gf,>4 (
-      <af, ef,>8..
-      <af, gf,>32
-      |
-      <af, f,>8. )
-      <af, df,>16 (
-      <af, ef,>8
-      <af, df,>8 )
-      |
-      <af, gf,>4 (
-      <af, ef,>8..
-      <af, gf,>32
-      |
-      <af, f,>8. )
-      <af, df,>16 (
-      <af, c,>8
-      <af, df,> )
-      |
-      <af, gf,>4 (
-      <af, ef,>8..
-      <af, gf,>32
-      |
-      <f f,>8. )
-      <df df,>16 (
-      <ef ef,>8
-      <f f,>8 )
-      |
-      \voiceTwo
-      gf,4  (
-      af,4 ~ )
-      |
-      af,16. [ ( 
-      gf,32
-      f,16.
-      ef,32 ]
-      df,8 )
-      \oneVoice
-      r8
-   }
-   
->>
diff --git a/Documentation/included/rhythms-headword.ly b/Documentation/included/rhythms-headword.ly
deleted file mode 100644 (file)
index a48f05c..0000000
+++ /dev/null
@@ -1,209 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper {
-  line-width = 16\cm
-  indent = 0\cm
-}
-
-% NR 1.2 Rhythms
-
-% Beethoven, Op. 81a
-% Piano sonata 26 - Das Lebewohl
-% Movt II - Abwesenheit
-% Measures 31 - 34
-
-\layout {
-  \context {
-    \Score
-    \override SpacingSpanner #'base-shortest-duration =
-      #(ly:make-moment 1 40)
-      %\override SpacingSpanner #'strict-grace-spacing = ##t
-  }
-}
-
-\new PianoStaff <<
-
-   % RH Staff
-   \new Staff {
-      \clef treble
-      \key c \minor
-      \time 2/4
-      \set Score.currentBarNumber = #31
-
-      <c''' c''>8 ( -\markup {
-        \override #'(baseline-skip . 2) \italic \column {
-          \line { a tempo }
-          cantabile
-        }
-      }
-      <g'' g'>8 )
-      ~
-      <g'' g'>8 (
-      <a'' a'>16
-      <f'' f'>16 )
-
-      |
-
-      \afterGrace
-         <f'' f'>8 [ (
-         {
-            e''16 [
-            f''16
-            e''16
-            d''16 ]
-         }
-      <e''! e'>16
-      <f'' f'>16 ] )
-      \once \override TextScript #'padding = #3.8
-      <g'' g'>16 ( \staccato -\markup { \italic cresc. }
-      <a'' a'>16 ) \staccato
-      <bf'' bf'>32  (
-      <b'' b'>32 )
-      <b'' b'>32 (
-      <c''' c''>32 )
-
-      |
-      
-      \once \override DynamicLineSpanner #'padding = #2
-      b''32 ( \p \>
-      c'''32
-      d'''32
-      c'''32 ) \!
-      g''8 (
-      ~
-      g''32 [
-      a''64
-      g''64 ) ]
-
-      a''64 ( [
-      g''64 )
-      bf''64 (
-      a''64 ) ]
-
-      bf''64 ( [
-      a''64 )
-      c'''64 (
-      b''64 ) ]
-
-      c'''128 ( [
-      b''128
-      d'''128
-      c'''128
-      f'''64
-      f''64 ) ]
-      
-      |
-
-      \afterGrace
-         <f'' f'>8 [ (
-         {
-            e''16 [
-            f''16
-            e''16
-            d''16 ]
-         }
-      <e''! e'>16
-      <f'' f'>16 ] )
-      <g'' g'>16 ( \staccato -\markup { \italic cresc. }
-      <af''! af'!>16 ) \staccato
-      <bf'' bf'>32  (
-      <b'' b'>32 )
-      <b'' b'>32 (
-      <c''' c''>32 )
-   }
-
-   % LH Staff
-   \new Staff {
-      \clef bass
-      \key c \minor
-      \time 2/4
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <a f>32
-      c'32
-      <a f>32
-      c'32
-
-      |
-      
-      <bf g>32
-      c'32
-      <bf g>32
-      c'32
-
-      <bf g>32
-      c'32
-      <bf g>32
-      c'32
-
-      <bf g>32
-      c'32
-      <a f>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      |
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-
-      <a f>32
-      c'32
-      <a f>32
-      c'32
-
-      |
-      
-      <bf! g>32
-      c'32
-      <bf g>32
-      c'32
-
-      <bf g>32
-      c'32
-      <bf g>32
-      c'32
-
-      <bf g>32
-      c'32
-      <af! f>32
-      c'32
-
-      <g e>32
-      c'32
-      <g e>32
-      c'32
-   }
-
->>
diff --git a/Documentation/included/simultaneous-headword.ly b/Documentation/included/simultaneous-headword.ly
deleted file mode 100644 (file)
index a6b5ff8..0000000
+++ /dev/null
@@ -1,313 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##t
-  line-width=17\cm
-  indent=0\cm
-}
-
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-% NR 1.5 Simultaneous notes
-
-% L. v. Beethoven, Op. 111
-% Piano sonata 32
-% Movt II - Arietta - Adagio molto semplice e cantabile
-% measures 108 - 118
-
-\layout {
-   \context {
-      \Score
-      \override SpacingSpanner #'base-shortest-duration =
-         #(ly:make-moment 1 18)
-      \override NonMusicalPaperColumn #'line-break-system-details =
-         #'((alignment-offsets . (0 -12)))
-   }
-}
-
-trillflat =
-  \once \override TrillSpanner #'(bound-details left text) =
-    #(markup #:translate-scaled '(-0.05 . -1)
-             #:concat (#:musicglyph "scripts.trill"
-                       #:translate '(-0.5 . 1.9) #:fontsize -7 #:flat))
-
-
-\new PianoStaff <<
-
-   % RH
-   \new Staff <<
-      \clef treble
-      \key c \major
-      \time 9/16
-      \set Score.currentBarNumber = #108
-
-      % RH voice 1
-      \new Voice {
-
-         \voiceOne
-         s4.
-         s8.
-
-         |
-
-         s4.
-         a''8 \p \> [ (
-         g''16 ] )
-
-         |
-
-         g''4.
-         af''8 [ (
-         g''16 ] )
-
-         |
-
-         g''8. [
-         g''8.
-         g''8. \pp ]
-
-         |
-
-         g''8. [
-         af''8.
-         af''8. ]
-
-         |
-
-         af''8. [
-         af''8.
-         af''8. ]
-
-         |
-         \break
-
-         \trillflat
-         af''4. \startTrillSpan
-         ~
-         af''8.
-         ~
-
-         |
-
-         af''4.
-         ~
-         af''8.
-         ~
-
-         |
-
-         \oneVoice
-         <af'' d''>8. [
-         a''8. \p \<
-         bf''8. ]
-         ~
-
-         |
-
-         bf''8. [
-         b''8.
-         c'''8. ]
-         ~
-
-         \bar "||"
-
-         \key ef \major
-         c'''8. [
-         cs'''8. \f ] \stopTrillSpan
-         r8.
-
-      }
-
-      % RH voice 2
-      \new Voice {
-         \voiceTwo
-         \override Voice.TrillSpanner #'direction = #down
-         d''4. \f \startTrillSpan
-         ~
-         d''8.
-         ~
-
-         |
-
-         d''4.
-         ~
-         d''8.
-         ~
-
-         |
-
-         d''8. \stopTrillSpan
-         \trillflat
-         d''4. \startTrillSpan
-         ~
-
-         |
-
-         d''4.
-         ~
-         d''8.
-         ~
-
-         |
-
-         d''4.
-         ~
-         d''8.
-         ~
-
-         |
-
-         d''4.
-         ~
-         d''8. \stopTrillSpan
-         ~
-
-         |
-
-         \trillflat
-         d''4. \startTrillSpan
-         ~
-         d''8.
-         ~
-
-         |
-
-         d''4.
-         ~
-         d''8.
-         ~
-
-         |
-
-         \once \override NoteColumn #'ignore-collision = ##t
-         \once \override NoteHead #'transparent = ##t
-         \once \override Dots #'transparent = ##t
-         \once \override Stem #'transparent = ##t
-         d''8. \stopTrillSpan
-         s4.
-
-         |
-
-         s8.
-         s8.
-
-      }
-
-   >>
-
-   % LH staff
-   \new Staff {
-      \clef bass
-      \key c \major
-      \time 9/16
-      
-      r8.
-      r8.
-      <c! c,!>8 [ (
-      <g, g,,>16 ] )
-
-      |
-
-      <g, g,,>4.
-      \clef treble
-      c''8 [ (
-      b'16 ] )
-
-      |
-
-      b'4.
-      c''8 [ (
-      b'16 ] )
-
-      |
-
-      b'8. [
-      b'8.
-      b'8. ]
-
-      |
-
-      b'8. [
-      bf'8. ]
-      \clef bass
-      <f f,>8 [ (
-      <bf, bf,,>16 ] )
-
-      |
-
-      <bf, bf,,>4.
-      \clef treble
-      f'8 [ (
-      bf16 ] )
-
-      |
-
-      <<
-
-         \new Voice {
-            \voiceOne
-            \override Voice.TrillSpanner #'direction = #up
-            f'4. \startTrillSpan
-            ~
-            f'8.
-            ~
-
-            |
-
-            f'4.
-            ~
-            f'8.
-            ~
-
-            |
-
-            f'8. \stopTrillSpan
-         }
-
-         \new Voice {
-            \voiceTwo
-            \override Voice.TrillSpanner #'direction = #down
-            bf8. [
-            bf8.
-            bf8. ]
-
-            |
-
-            bf8. [
-            bf8.
-            bf8. ]
-
-            |
-
-            bf8.
-         }
-
-      >>
-
-      \oneVoice
-      r8.
-      r8.
-
-      |
-
-      r8.
-      r8.
-      r8.
-      \clef bass
-
-      |
-
-      \key ef \major
-      r8.
-      r8.
-      r8.
-         
-   }
-   
->>
diff --git a/Documentation/included/staff-headword.ly b/Documentation/included/staff-headword.ly
deleted file mode 100644 (file)
index f7fa2e4..0000000
+++ /dev/null
@@ -1,119 +0,0 @@
-\version "2.12.0"
-\include "catalan.ly"
-#(set-global-staff-size 15)
-\paper{
-  ragged-right=##t
-  line-width=17\cm
-  indent=0\cm
-}
-
-\header {
-       mutopiatitle = "Napolitan Dance (Swan Lake)"
-       mutopiacomposer = "TchaikovskyPI"
-       mutopiainstrument = "Piano, Trumpet, Percussion"
-       source = "New arrangement"
-       style = "Classical"
-       copyright = "Public Domain"
-       maintainer = "Laurence Sardain"
-       lastupdated = "2006/Dec/21"
-%      title = "Le Lac des Cygnes"
-%      subtitle = "Danse Napolitaine"
-%      composer = "Piotr Ilitch Tchaïkovski"
-%      arranger = "arr. Laurence Sardain"
-%       footer = "Mutopia-2006/12/22-896"
-}
-
-trompette = \relative do'' {
-  \clef treble
-  \key mib \major
-  \time 2/4
-  R2^\markup { \italic Comodo } |
-  r8 \once \override TextScript #'padding = #2.0
-  sib16-.^\markup {\dynamic p \italic grazioso} do-. mib( re)-. do-. sib-. |
-  re8-. r8 re4->( |
-  re8) do16-. re-. mib( re) do-. re-. |
-  do8-. r8 sib4-> |
-}
-
-tambourin = \relative do' {
-  \time 2/4
-  r8 do16 do do8 do |
-  r8 do16 do do8 do |
-  r8 do r do |
-  r8 do16 do do8 do |
-  r8 do r do |
-}
-
-tambourinMidi = \drummode {
-  \time 2/4
-  r8 tamb16 tamb tamb8 tamb |
-  r8 tamb16 tamb tamb8 tamb |
-  r8 tamb r tamb |
-  r8 tamb16 tamb tamb8 tamb |
-  r8 tamb r tamb |
-}
-
-upper = \relative do' {
-  \clef treble
-  \key mib \major
-  \time 2/4
-  r8\p <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
-  r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
-  r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
-  r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
-  r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
-}
-
-lower = \relative do {
-  \clef bass
-  \key mib \major
-  \time 2/4
-  mib4-. r4 |
-  sib-. r |
-  fa'-. r |
-  sib, r |
-  mib4-. r4 |
-}
-
-
-\score {
-  <<
-    \context Staff = "trumpet" <<
-      \set Staff.instrumentName = \markup { "Trumpet" \concat{ B \teeny \raise #0.4 \flat } }
-      \transpose sib do'
-      \trompette
-    >>
-    \context RhythmicStaff = "tambourin" <<
-      \set Staff.instrumentName = "Tambourine"
-      \tambourin
-    >>
-    \context PianoStaff = "prima" <<
-      \set PianoStaff.instrumentName = "Piano  "
-      \context Staff = "uppera" \upper
-      \context Staff = "lowera" \lower
-    >>
-  >>
-  \layout { }
-}
-\score {
-  <<
-    \context Staff = "trumpet" {
-      \set Staff.midiInstrument = "trumpet"
-      \trompette
-    }
-    \context DrumStaff = "tambourin" {
-      \tambourinMidi
-    }
-    \context Staff = "piano" <<
-      \upper
-      \lower
-    >>
-  >>
-  \midi {
-    \context {
-      \Score
-      tempoWholesPerMinute = #(ly:make-moment 72 4)
-    }
-  }
-}
-
diff --git a/Documentation/included/text-headword.ly b/Documentation/included/text-headword.ly
deleted file mode 100644 (file)
index 40af604..0000000
+++ /dev/null
@@ -1,236 +0,0 @@
-\version "2.12.0"
-\include "english.ly"
-#(set-global-staff-size 15)
-\paper{
-  line-width = 16\cm
-  indent = 0\cm
-}
-\layout {
-  \context { \Score
-    \override PaperColumn #'keep-inside-line = ##t
-    \override NonMusicalPaperColumn #'keep-inside-line = ##t
-  }
-}
-
-% NR 1.8 Text
-
-% L. v. Beethoven, Op. 110
-% Piano sonata 31
-% measures 1 - 7
-
-\layout {
-   \context {
-      \Score
-      \override SpacingSpanner #'base-shortest-duration = 
-         #(ly:make-moment 1 20) 
-      %\override NonMusicalPaperColumn #'line-break-system-details =
-      %#'((alignment-offsets . (0 -12)))
-   }
-}
-
-\new PianoStaff <<
-
-   % RH staff
-   \new Staff {
-      \clef treble
-      \key af \major
-      \time 3/4
-
-      \once \override TextScript #'staff-padding = #4
-      <c'' af'>4. (
-      _ \markup { \dynamic p \italic { con amabilità } }
-      <af' ef'>8 )
-      <af' ef'>8. [
-      <af' ef'>16 ]
-
-      |
-
-      <df'' g'>4
-      <bf' g'>2
-      _ \markup { \italic { ten. } }
-
-      |
-
-      <<
-
-         \new Voice {
-            \voiceOne
-            ef''4. (
-            df''8 [ )
-            ef'' (
-            f'' ) ]
-
-            |
-
-            \once \override TextScript #'staff-padding = #4
-            ef''8. (
-            _ \markup { \italic { tranqu. } }
-            d''16 )
-            df''8 \trill \fermata
-            _ \markup { \italic { ten. } }
-         }
-
-         \new Voice {
-            \voiceTwo
-            af'4.
-            af'8 [
-            af'8
-            af'8 ]
-
-            |
-
-            g'4
-            g'8
-         }
-
-      >>
-
-      \oneVoice
-      \once \override TextScript #'staff-padding = #4
-      df''32 
-      _ \markup { \italic dolce }
-      c''32 
-      df''32
-      ef''32
-      \acciaccatura { df''[ ef'' ] }
-      f''8
-      ef''16
-      df''16
-
-      |
-      \break
-      \overrideProperty "Score.NonMusicalPaperColumn"
-      #'line-break-system-details #'((alignment-offsets . (0 -12)))
-
-      c''4. (
-      ^ \markup \italic { cantabile, con intimissimo sentimento,
-         ma sempre molto dolce e semplice }
-      ef''4
-      af''8 )
-
-      |
-
-      af''4 (
-      g''2 )
-
-      |
-
-      bf''4. (
-      g''4
-      ef''8 )
-
-      |
-   }
-
-   % LH
-   \new Staff { 
-      \clef bass
-      \key af \major
-      \time 3/4
-
-      <ef af,>4. (
-      <ef c>8 )
-      <ef c>8. [
-      <ef c>16 ]
-
-      |
-
-      <ef bf,>4
-      <ef df>2 ^ \markup { \italic ten. }
-
-      |
-
-      <<
-
-         \new Voice {
-            \voiceOne
-            ef8 [ (
-            af8
-            c'8
-            bf8 )
-            c'8 ( \staccato
-            df'8 ]  ) \staccato
-
-            |
-
-            bf4
-            bf8 ^ \markup { \italic ten. }
-         }
-
-         \new Voice {
-            \voiceTwo
-            c4. (
-            f8 [ )
-            ef8 ( \staccato
-            df8 ] ) \staccato
-
-            |
-
-            ef4
-            ef8 \fermata
-         }
-
-      >>
-
-      \oneVoice
-      r8
-      r4
-      \clef treble
-
-      |
-
-      \override Staff.SustainPedalLineSpanner #'outside-staff-priority = #1000
-      \override Staff.SustainPedalLineSpanner #'staff-padding = #7
-      \once \override TextScript #'padding = #2
-      af16 \sustainOn
-      ^ \markup \italic { non staccato }
-      _ \markup \italic { molto \concat {\dynamic {p},} sempre tranquillo
-         ed egualmente, non rubato }
-      <ef' c'>16
-      <ef' c'>16
-      <ef' c'>16
-      af16
-      <ef' c'>16
-      <ef' c'>16
-      <ef' c'>16
-      af16 \sustainOn
-      <ef' c'>16
-      <ef' c'>16
-      <ef' c'>16
-
-      |
-
-      bf16 \sustainOn
-      <ef' df'>16
-      <ef' df'>16
-      <ef' df'>16
-      bf16 \sustainOn
-      <ef' df'>16
-      <ef' df'>16
-      <ef' df'>16
-      bf16
-      <ef' df'>16
-      <ef' df'>16
-      <ef' df'>16
-
-      |
-
-      \override Staff.SustainPedalLineSpanner #'staff-padding = #4
-      df'16 \sustainOn
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-      df'16
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-      df'16 \sustainOn
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-      <bf' g' ef'>16
-
-      |
-   }
-
->>
diff --git a/Documentation/included/unfretted-headword.ly b/Documentation/included/unfretted-headword.ly
deleted file mode 100644 (file)
index e859e13..0000000
+++ /dev/null
@@ -1,223 +0,0 @@
-% #!lilypond lcp-extract.ly -*- coding: utf-8; -*-
-
-%%%
-%%% les-cinq-pieds:
-%%% extract for the lilypond documentaton project
-%%%
-
-%% Title:      Les cinq pieds
-%% Composer:   David Séverin
-%% Date:       Juillet 2007
-%% Instrument: Violon Solo
-%% Dedication: A mon épouse Lívia De Souza Vidal
-%% Additional: avec l'aide de Krzysztof Wagenaar
-
-%% Statement:
-
-%% Here by, I, the composer, agree that this extract of my composition
-%% be in the public domain and can be part of, used and presented in
-%% the LilyPond Documention Project.
-
-%% Statement Date: Octber the 9th, 2008
-
-
-\version "2.12.0"
-#(set-global-staff-size 15)
-
-%%%
-%%% Abreviations
-%%%
-
-db         = \markup { \musicglyph #"scripts.downbow" }
-dub        = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" } }
-dubetc     = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" "..." } }
-
-ub         = \markup { \musicglyph #"scripts.upbow" }
-udb        = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" } }
-udbetc     = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" "..." } }
-
-fermaTa    = \markup \musicglyph #"scripts.ufermata"
-
-accel   = \markup \tiny \italic \bold "accel..."
-ritar   = \markup \tiny \italic \bold "ritar..."
-
-ignore     = \override NoteColumn #'ignore-collision = ##t
-
-
-%%
-%% Strings
-%%
-
-svib           = \markup \small "s. vib."
-pvib           = \markup \small "p. vib."
-mvib           = \markup \small "m. vib."
-sulp           = \markup \small "s.p."
-norm           = \markup \small "n."
-
-quatre         = \markup \teeny "IV"
-
-
-%%
-%% Shifting Notes
-%%
-
-shift      = \once \override NoteColumn #'force-hshift = #0.9
-shifta     = \once \override NoteColumn #'force-hshift = #1.2
-shiftb     = \once \override NoteColumn #'force-hshift = #1.4
-
-
-%%
-%% Hairpin
-%%
-
-% aniente        = "a niente"
-aniente        = \once \override Hairpin #'circled-tip = ##t
-
-
-%%
-%% Tuplets
-%%
-
-tupletbp       = \once \override Staff.TupletBracket #'padding = #2.25
-
-
-%%
-%% Flag [Note Head - Stem]
-%%
-
-noflag         = \once \override Stem #'flag-style = #'no-flag
-
-%%%
-%%% Functions
-%%%
-
-#(define-markup-command (colmark layout props args)
-  (markup-list?)
-  (let ((entries (cons (list '(baseline-skip . 2.3)) props)
-       ))
-   (interpret-markup layout entries
-    (make-column-markup
-     (map (lambda (arg)
-          (markup arg))
-      (reverse args))))))
-
-
-%%%
-%%% Instruments
-%%%
-
-ViolinSolo = \relative c' {
-
-  \voiceOne
-
-  \set Score.markFormatter     =  #format-mark-box-numbers
-  \override Score.VoltaBracket #'font-name                  = #"sans"
-  \override Score.VoltaBracket #'extra-offset               = #'(0 . 1)
-  \override SpacingSpanner     #'uniform-stretching         = ##t
-
-
-  %% Measure 1
-  \time 25/8
-  \mark \default
-  r2 ^\markup \colmark { \italic "fatigué" " " \bold "lentement"} r4 r r8
-  <<
-    { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \svib } \shifta e1 } \\
-    { d2 \open \mf \< ~ \aniente d1  \! \> r4 r ^\markup \colmark { " " \fermaTa } \! }
-  >>
-
-
-  %% Measure 2
-  \time 7/4
-  \set Score.repeatCommands = #'((volta "1) n.      2) s.p."))
-  <<
-    { \shift d2 \glissando ^\markup \colmark { \quatre \udbetc } \shifta e1 } \\
-    { d2 \open \mf \< ~ d1 \! \> ~ d4 ^\markup \colmark { " " \fermaTa } \! }
-  >>
-  \set Score.repeatCommands = #'((volta #f))
-
-
-  %% Measure 3
-  \time 15/4
-  <<
-    { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \pvib \norm } \shifta e1 \glissando d2 } \\
-    { d2 \open \mf \< ~ d1 ~ d2 \ff  ~ d1 \> ~ d2 ^\markup \colmark { " " " " \svib } ~ d4 \pp}
-  >>
-  \break
-
-  %% Measure 4
-  \time 4/4
-  \stemUp
-  \tupletDown
-  \times 2/3 { d4 ^\markup \colmark { \quatre \db \accel } d d }
-  \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d }
-
-
-
-  %% Measure 5
-  \time 5/4
-  \tupletbp \times 2/3 { d8 \mf \< ^\markup \colmark { \quatre \db \norm } d _\open d }
-  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db \sulp } d _\open d }
-  \tupletbp \times 2/3 { d16 ^\markup \colmark { " " \db \norm } d _\open d d d _\open d }
-  d2 \ff ^\markup \colmark { " " \pvib } \>
-
-
-  %% Measure 6
-  \time 5/8
-  \once \override Beam #'grow-direction = #RIGHT  % \featherDurations #(ly:make-moment 2 3)
-  { d16 \staccato
-    [ d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato]
-  }
-  \break
-
-
-  %% Measure 7
-  \time 7/4
-  \tupletbp \times 2/3 { d16 ^\markup \colmark { \quatre } d _\open d d d _\open d }
-  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db } d _\open d }
-  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db " " \sulp } d _\open d }
-  \times 2/3 { d4 ^\markup \colmark { \quatre \db \ritar \norm } d d }
-  \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d \ppp ~ }
-
-
-  %% Measure 8
-  d4 ^\markup \colmark { " " " " \pvib \norm }
-  deh2 d dih \<
-
-
-  %% Measure 9
-  <<
-    { \shift d2 \glissando ^\markup \colmark { \quatre } \shifta e1 } \\
-    { d2 \open ~ d1  ^\markup \colmark { " " " " \mvib } }
-  >>
-  \breathe r4 \!
-
-}
-
-
-%%%
-%%% Score
-%%%
-
-\score {
-
-  <<
-    \relative <<
-      \new Staff \ViolinSolo
-    >>
-
-    \override Score.Rest #'transparent = ##t
-    \set Score.defaultBarType          = "empty"
-  >>
-
-  \layout  {
-    indent       = 0.0
-    \context {
-      \Staff
-      \remove "Time_signature_engraver"
-    }
-    \context {
-      \Score
-      \remove "Bar_number_engraver"
-    }
-  }
-}
diff --git a/Documentation/included/wind-headword.ly b/Documentation/included/wind-headword.ly
deleted file mode 100644 (file)
index 6d8fa0a..0000000
+++ /dev/null
@@ -1,46 +0,0 @@
-\version "2.12.0"
-#(set-global-staff-size 15)
-\paper {
-  line-width = 16\cm
-  indent = 0\cm
-}
-
-% NR 2.whatever  Wind 
-
-% Tchaikovsky
-% Nutcracker Suite, VII Dance of the Merlitons
-\score {
-  \new StaffGroup <<
-    \new Staff \relative c'' {
-      \set Staff.instrumentName = "Flauto I,II"
-      \once \override Score.RehearsalMark #'self-alignment-X = #-1
-      \once \override Score.RehearsalMark #'break-align-symbols =
-#'(time-signature)
-      \once \override Score.TimeSignature
-#'break-align-anchor-alignment = #LEFT
-      \once \override Score.RehearsalMark #'padding = #4
-      \mark \markup \large \bold {Moderato assai}
-      \key d \major
-      \time 2/4
-      \compressFullBarRests
-      R2*2
-      <d a>16-.\p <cis g>-. <d a>-. <cis g>-. <d a>8-. <cis g>-.
-      <e a,>-.\< <d a>32( <fis d> <a fis> <d a> <fis d>4--)\mf
-      <g d>16-. <fis cis>-. <g d>-. <fis cis>-.
-        <e b>(\> <d a>) <a fis>-. <fis d>-.\!
-      <d bes>4--\sf \acciaccatura {<d' bes>8} <cis a>4--\mf
-    }
-    \new Staff \relative c' {
-      \set Staff.instrumentName = "Flauto III"
-      \key d \major
-      \time 2/4
-      \compressFullBarRests
-      R2*2_\markup{Gr.Fl.}
-      fis16-.\p e-. fis-. e-. fis8-. e-.
-      g8-.\< fis32( a d fis a4--)\mf
-      b16-. a-. b-. a-. g(\> fis) d-. a-.\!
-      g4--\sf \acciaccatura fis'8 g4--\mf
-    }
-  >>
-}
-
diff --git a/Documentation/snippets/new/ancient-headword.ly b/Documentation/snippets/new/ancient-headword.ly
new file mode 100644 (file)
index 0000000..6fb7057
--- /dev/null
@@ -0,0 +1,142 @@
+\version "2.12.0"
+
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+\include "gregorian.ly"
+
+\score {
+  <<
+    \new VaticanaVoice = "cantus" {
+      \clef "vaticana-do3"
+      % Verse 1 — Salve, Regína
+      a\melisma \[ a \flexa g \pes a\melismaEnd \] d
+      \divisioMinima
+      \[ a\melisma \flexa g\melismaEnd \]
+      \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \]
+      \[ e\melisma \flexa d\melismaEnd \]
+      \divisioMaior
+      c d \[d\melisma \flexa c\melismaEnd \] d
+      \[ e\melisma \pes f\melismaEnd\] g
+      \[d\melisma \pes e \flexa c\melismaEnd \] d
+      \finalis
+      % Verse 2 — Vita, dulcédo
+      % a\melisma \[ a \flexa g \pes a\melismaEnd \] d
+      % \divisioMinima
+      % \[ a\melisma \flexa g\melismaEnd \]
+      % \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \]
+      % \[ e\melisma \flexa d\melismaEnd \]
+      % \divisioMaior
+      % c d \[e\melisma \pes f\melismaEnd \] g
+      % \[d\melisma \pes e \flexa c\melismaEnd \] d
+      % \finalis
+      % Verse 3 — Ad te clamámus
+      \[ d\melisma \pes f\melismaEnd\] a g
+      \[ g\melisma \flexa f \pes a\melismaEnd\] e
+      \divisioMaior
+      g f \[ e\melisma \flexa d \pes g\melismaEnd \]
+      \divisioMinima
+      c d \[ e\melisma \flexa d \pes g\melismaEnd \]
+      \[ f\melisma \flexa e\melismaEnd \] d
+      \finalis
+      % Verse 4 — Ad te suspirámus
+      \[ d\melisma \pes f\melismaEnd \] a c' g
+      \[ g\melisma \flexa f \pes g\melismaEnd \] a
+      \divisioMaior
+      d \[ f\melisma \pes \deminutum g\melismaEnd \] g d
+      \[ \virga f\melisma \inclinatum e \inclinatum d\melismaEnd \]
+      c \divisioMaior
+      d \[ d\melisma \flexa c \pes f\melismaEnd \]
+      \[ g\melisma \pes a\melismaEnd \]
+      g \[ f\melisma \flexa e\melismaEnd \] g
+      \[ f\melisma \flexa \deminutum e\melismaEnd \]
+      \[ d\melisma \flexa c \pes d\melismaEnd \]
+      \finalis
+      % Verse 5 — Eia ergo, Advocáta nostra
+      f\melisma \[ f \pes g\melismaEnd \] f
+      \[ g\melisma \pes \deminutum a\melismaEnd \] a
+      \divisioMinima
+      c' g \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] d g a
+      \divisioMaior
+      d' d' \[ c'\melisma \flexa b c' \pes d'\melismaEnd \] a
+      \divisioMinima
+      d' c' a \[ g\melisma \flexa f \pes a\melismaEnd \] g
+      \[ d\melisma \pes e\melismaEnd \] f
+      \[ \virga e\melisma \inclinatum d \inclinatum c\melismaEnd \]
+      \divisioMaior
+      \[ c\melisma \pes d\melismaEnd \]
+      f \[ g\melisma \flexa \deminutum f\melismaEnd \]
+      \[ d\melisma \flexa c \pes d\melismaEnd \] d
+      \finalis
+      % Verse 6 — Et Jesum
+      d a, \[ c\melisma \pes d\melismaEnd \]
+      \divisioMinima
+      d \[ d\melisma \pes e\melismaEnd \] \[ e\melisma \flexa d d\melismaEnd \]
+      c g f \[ e\melisma \flexa \deminutum d\melismaEnd \] g
+      \[ f\melisma \flexa e\melismaEnd \]
+      \[ d\melisma \flexa c \pes d\melismaEnd \]
+      \[ d\melisma \pes a \] \virga bes\melismaEnd a
+      \divisioMinima
+      \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] g d f
+      \[ f\melisma \flexa e\melismaEnd \] \[ d\melisma \flexa c\melismaEnd \]
+      \divisioMinima
+      \[ e\melisma \pes f \flexa e\melismaEnd \] d d
+      \finalis
+      % Verse 7 ad finem — O clemens: O pia: O dulcis Virgo María
+      a\melisma \[a \flexa g a \quilisma b \pes c'\melismaEnd \]
+      \[ \virga b\melisma \inclinatum a \inclinatum g\melismaEnd \] a
+      \finalis
+      \[ g\melisma \pes a \quilisma b \pes c' \] \[ c' \flexa b\melismaEnd \]
+      \[ a\melisma \flexa g\melismaEnd \] \[ g\melisma \pes a\melismaEnd \]
+      \finalis
+      \[ a\melisma \flexa d \virga f \inclinatum e \inclinatum d \inclinatum c d \]
+      \divisioMinima
+      \[ d \pes e f \pes g\melismaEnd \]
+      \[ g\melisma \flexa \deminutum f\melismaEnd \]
+      \[ g\melisma \pes a\melismaEnd \]
+      d c d \[ d\melisma \pes g \flexa f f\melismaEnd \]
+      \[ e\melisma \flexa d\melismaEnd \]
+      \finalis
+    }
+    \new Lyrics \lyricsto "cantus" {
+      Sal- ve, Re- gí- na, ma- ter mi- se- ri- cór- di- ae:
+      % Vi- ta, dul- cé- do, et spes no- stra, sal- ve.
+      Ad te cla- má- mus, éx- su- les, fi- li- i He- vae.
+      Ad te su- spi- rá- mus, ge- mén- tes et flen- tes in hac la- cri- má- rum
+      val- le.
+      E- ia er- go, Ad- vo- cá- ta no- stra, il- los tu- os mi- se- ri- cór- des
+      ó- cu- los ad nos con- vér- te.
+      Et Je- sum, be- ne- díc- tum fruc- tum ven- tris tu- i, no- bis post hoc
+      ex- sí- li- um os- tén- de.
+      O cle- mens:
+      O pi- a:
+      O dul- cis Vir- go Ma- rí- a.
+    }
+  >>
+}
+
+\layout {
+  \context {
+    \Staff
+    \consists Custos_engraver
+  }
+}
+
diff --git a/Documentation/snippets/new/chords-headword.ly b/Documentation/snippets/new/chords-headword.ly
new file mode 100644 (file)
index 0000000..9fcc5ce
--- /dev/null
@@ -0,0 +1,108 @@
+\version "2.12.0"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##f
+  line-width=15\cm
+  indent=0\cm
+}
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+theChords = \chordmode {
+  \time 2/2
+  f1 | c2 f2 | f1 | c2 f2| %\break
+  f2 bes2 | f1 | c2:7 f | c1 | \break
+}
+
+verseOne = \lyricmode{
+  \set stanza = "1. "
+  Fair is the sun - shine,
+  Fair - er the moon - light
+  And all the stars __ _  in heav'n a -- bove;
+}
+
+verseTwo = \lyricmode{
+  \set stanza = "2. "
+  Fair are the mead - ows,
+  Fair - er the wood - land,
+  Robed in the flow -- ers of bloom -- ing spring;
+}
+
+Soprano = {
+  \time 2/2
+  \key f \major
+  \stemUp
+  f'2 f'4 f' | g'4 e' f'2 | a'4. a'8 a'4 a' | bes'4 g' a'2 |
+c''2 f''4 d'' |  c''2  bes'4  a' | bes'2 a' | g'1 |
+}
+
+Alto = {
+  \key f \major
+  c'2 c'4 c' | d'4 c' c'2 | f'4. f'8 f'4 fis' | g'4 e' f'2 |
+  f'2 f'4 f' |  f'2  g'4  f' | e'2 f' | e'1 |
+}
+
+Tenor = {
+  \key f \major
+  \stemDown
+  a2 a4 a | bes4 g a2  | c'4. c'8 d'4 d' | d'4 c' c'2 |
+  a2 d'4 bes | a2 c'4 c' | c'2 c'  | c'1 |
+}
+
+Bass = {
+  \key f \major
+  f2 f4 f | bes,4 c  f2 | f4. e8 d4 c | bes,4 c f2 |
+  f2 bes,4 d | f2 e4 f | g2 f | c1 |
+}
+
+
+\score {
+  <<
+    \new ChordNames { \theChords }
+    \context Staff = upper {
+      \context Voice = sop {
+        <<
+          \Soprano
+          \Alto
+        >>
+      }
+    }
+    \context Lyrics="LyrOne" \lyricsto "sop" {\verseOne}
+    \context Lyrics="LyrTwo" \lyricsto "sop" {\verseTwo}
+    \context Staff = lower {
+      \new Voice {
+        \clef bass
+        #(set-accidental-style 'modern-cautionary)
+        <<
+          \Tenor
+          \Bass
+        >>
+      }
+    }
+  >>
+
+\layout {
+  %between-system-space = 1\mm
+  indent = 0
+  \context {
+    \Score
+    \remove "Bar_number_engraver"
+  }
+  \context { \Staff
+    \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
+  }
+  }
+}
+\paper {  }
diff --git a/Documentation/snippets/new/editorial-headword.ly b/Documentation/snippets/new/editorial-headword.ly
new file mode 100644 (file)
index 0000000..e884268
--- /dev/null
@@ -0,0 +1,108 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+% NR 1.7 Editorial annotations
+
+% Beethoven, Op. 31, No. 3
+% Piano sonata 18, Movt II, Scherzo
+% Measures 9 - 14
+
+\layout { }
+
+\new PianoStaff <<
+
+   % RH Staff
+   \new Staff {
+      \clef treble
+      \key af \major
+      \time 2/4
+      \set Staff.fingeringOrientations = #'(up up)
+      \set Score.currentBarNumber = #9
+      \partial 8
+      <af''-4 c''>8 \staccato
+      |
+      \set doubleSlurs = ##t
+      <bf''-5 df''-2>4 (
+      <af''-4 c''>8 \staccato )
+      \noBeam
+      c''8-5 \staccato \pp
+      |
+      \set doubleSlurs = ##f
+      bf'8.. (
+      af'32
+      g'8 ) \staccato
+      f'8 \staccato
+      |
+      e'4-2
+      r8
+      \once \override Script #'script-priority = #-100
+      \afterGrace
+         f'8 ( \trill ^ \markup { \finger "3-2" }
+         { e'16 [ f'16 ] }
+      |
+      g'8..-3
+      f'32
+      e'8-1 ) \staccato
+      d'8-2 \staccato
+      |
+      c'4
+      r4
+   }
+
+   % LH Staff
+   \new Staff {
+      \key af \major
+      \clef treble
+      \override Fingering #'direction = #down
+      \set Staff.fingeringOrientations = #'(down down)
+      \partial 8
+      <af' af>8 \staccato
+      \set doubleSlurs = ##t
+      <g'-2 ef'-3>4 (
+      <af' af>8 ) \staccato
+      \noBeam
+      \clef bass
+      c'8-1 \staccato
+      |
+      \set doubleSlurs = ##f
+      bf8.. (
+      af32
+      g8-1 ) \staccato
+      f8 \staccato
+      |
+      e4
+      r8
+      \afterGrace
+         f8 ( \trill _ \markup { \finger "2-1" }
+         { e16 [ f16 ] }
+      |
+      g8..-1
+      f32
+      e8 ) \staccato
+      d8 \staccato
+      |
+      c4
+      r4
+   }
+
+>>
diff --git a/Documentation/snippets/new/expressive-headword.ly b/Documentation/snippets/new/expressive-headword.ly
new file mode 100644 (file)
index 0000000..f186e93
--- /dev/null
@@ -0,0 +1,270 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper {
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+% NR 1.3 Expressive marks
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+% L. v. Beethoven, Op. 49 no. 1
+% Piano sonata 19 - "Leichte Sonate"
+% measures 1 - 12
+
+%\layout {
+%   \context {
+%      \Score
+%      \override SpacingSpanner #'base-shortest-duration =
+%         #(ly:make-moment 1 20)
+%   }
+%}
+
+\new PianoStaff <<
+
+   % RH Staff
+   \new Staff {
+      \clef treble
+      \key g \major
+      \time 6/8
+      \partial 2
+      \once \override TextScript #'staff-padding = #2
+      d'8 \staccato
+      ^ \markup { \column {
+         RONDO
+         \italic Allegro } }
+      d'8 \staccato
+      g'8 \staccato
+      a'8 \staccato
+
+      |
+
+      b'8 [ (
+      g'8 ] )
+      e'8 \staccato
+      e' \staccato
+      a'8 \staccato
+      b'8 \staccato
+
+      |
+
+      c''8 [ (
+      a'8 ] )
+      e''8 \staccato
+      d''8 \staccato
+      c''8 \staccato
+      b'8 \staccato
+
+      |
+
+      a'8 \staccato
+      g'8 \staccato
+      a'8 \staccato
+      \acciaccatura { g'16 [ a'16 ] }
+      bf'8
+      a'8 \staccato
+      g'8 \staccato
+
+      |
+
+      fs'8 [ (
+      d'8 ] )
+      d'8 \staccato
+      d'8 \staccato
+      g'8 \staccato
+      a'8 \staccato
+
+      |
+
+      b'8 [ (
+      g'8 ] )
+      e'8 \staccato
+      e'8 \staccato
+      a'8 \staccato
+      b'8 \staccato
+
+      |
+
+      c''8 [ (
+      a'8 ] )
+      e''8 \staccato
+      d''8 \staccato
+      c''8 \staccato
+      b'8 \staccato
+
+      |
+
+      a'8 \staccato
+      g'8 \staccato
+      a'8 \staccato
+      <<
+         {
+            \voiceOne
+            d'8
+            g'8
+            fs'8
+            \oneVoice
+         }
+         \new Voice {
+            \voiceTwo
+            d'4
+            c'8
+            \oneVoice
+         }
+      >>
+
+      |
+
+      <b g'>4 \tenuto
+      d'8 \staccato
+      g'8 \staccato
+      b'8 \staccato
+      d''8 \staccato
+
+      |
+
+      d''8 (
+      <c'' a'>8 \staccato )
+      <c'' a'>8 \staccato
+      d''8 (
+      <b' g'>8 \staccato )
+      <b' g'>8 \staccato
+
+      |
+
+      d''8 (
+      <c'' a'>8 \staccato )
+      <c'' a'>8 \staccato
+      d''8 (
+      <b' g'>8 \staccato )
+      <b' g'>8 \staccato
+
+      |
+
+      d''8 \staccato
+      <c'' a'>8 \staccato
+      <b' g'>8 \staccato
+      d'' \staccato
+      <c'' a'>8 \staccato
+      <b' g'>8 \staccato
+
+      |
+
+      <d'' c'' a'>4 \fermata
+      r8 r4 r8
+   }
+
+   % LH Staff
+   \new Staff {
+      \clef bass
+      \key g \major
+      \time 6/8
+      \partial 2
+      r8
+      r8
+      <d' b>8 \staccato
+      <c' a>8 \staccato
+
+      |
+
+      <b g>4
+      r8
+      r8
+      <e' c'>8 \staccato
+      <d' b>8 \staccato
+
+      |
+
+      <c' a>4
+      r8
+      r8
+      <a fs>8 \staccato
+      <b g>8 \staccato
+
+      |
+
+      <c' a>8 \staccato
+      <b d'>8 \staccato
+      <e' c'>8 \staccato
+      <e' cs'>4. (
+
+      |
+
+      d'4 )
+      r8
+      r8
+      <d' b!>8 \staccato
+      <c'! a>8 \staccato
+
+      |
+
+      <b g>4
+      r8
+      r8
+      <e' c'>8 \staccato
+      <d' b>8 \staccato
+
+      |
+
+      <c' a>4
+      r8
+      r8
+      <a fs>8 \staccato
+      <b g>8 \staccato
+
+      |
+
+      <c' a>8 \staccato
+      <d' b>8 \staccato
+      <e' c'>8 \staccato
+      <b d>4
+      <a d>8 \staccato
+
+      |
+
+      <g g,>4 \tenuto
+      r8
+      r4
+      r8
+
+      |
+
+      r8
+      <d' fs>8 \staccato
+      <d' fs>8 \staccato
+      r8
+      <d' g>8 \staccato
+      <d' g>8 \staccato
+
+      |
+
+      r8
+      <d' fs>8 \staccato
+      <d' fs>8 \staccato
+      r8
+      <d' g>8 \staccato
+      <d' g>8 \staccato
+
+      |
+
+      r8
+      <d' fs>8 \staccato
+      <d' g>8 \staccato
+      r8
+      <d' fs>8 \staccato
+      <d' g>8 \staccato
+
+      |
+
+      <d' fs>4 \fermata
+      r8 r4 r8
+   }
+
+>>
diff --git a/Documentation/snippets/new/figured-bass-headword.ly b/Documentation/snippets/new/figured-bass-headword.ly
new file mode 100644 (file)
index 0000000..db86c2c
--- /dev/null
@@ -0,0 +1,124 @@
+\version "2.12.0"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##f
+  line-width=16\cm
+  indent=1.5\cm
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+% NR 2.7.3 Figured bass
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+% Arcangelo Corelli, 12 Sonate da Camera, Op. 2
+% Sonata II, Allemanda
+% measures 1 - 88
+% Coded by Neil Puttock; modified by Carl Sorensen
+
+extendOn = \bassFigureExtendersOn
+extendOff = \bassFigureExtendersOff
+
+\score {
+
+  \new StaffGroup <<
+
+    \new GrandStaff <<
+
+      \new Staff = "violinoI" {
+        \set Staff.instrumentName = \markup {
+          \hcenter-in #11
+          \line { Violino I. }
+        }
+        \time 4/4
+        \mark \markup { \italic Adagio. }
+        \partial 8
+        r16 a'16 |
+        a'8. [ d''16 d''8.  e''16 ] cis''8 a'4 a''16 bes''16 |
+        cis''8 d''16 ( e'' ) e''8.  d''16 d''4 r8 d''16 e''16 |
+        f''8 f''4 g''16 ( f''16 ) e''8 e''4 f''16 ( e''16 ) |
+        d''8.  d''16 g''16 ( f''16 ) e''16 ( d''16 ) cis''8
+            cis''4 cis''16 cis''16 |
+        d''8 d''8 c''8.  c''16 c''8 ( b'4 ) b'16 b'16 |
+        c''8 c''8 bes'8.  bes'16 bes'8 ( a'4 ) a''16 a''16 |
+        a''8 g''8 g''8.  g''16 g''8 ( f''8 ) r8 f''8 |
+      }
+
+      \new Staff = "violinoII" {
+        \set Staff.instrumentName = \markup {
+          \hcenter-in #11
+          \line { Violino II. }
+        }
+        \time 4/4
+        \partial 8
+        r16 f'16 |
+        f'8.  g'16 g'4 a'4 r8 d''16 d''16 |
+        e''8 a'8 cis''8.  d''16 d''4 r8 f''16 g''16 |
+        a''8 a''8 d''8.  d''16 g'8 g'8 c''8.  c''16 |
+        f'8.  f''16 bes''16 ( a''16 ) g''16 ( f''16 ) e''8 e''4 e''16 e''16 |
+        a'8 fis''8 g''8 a''8 d''8 d''4 d''16 d''16 |
+        g'8 e''8 f''8 g''8 c''8 c''4 cis''16 cis''16 |
+        d''8 d''8 e''8.  e''16 e''8 a'8 r8 d''8 |
+      }
+
+    >>
+
+    \new Staff = "violone" {
+      \set Staff.instrumentName = \markup {
+        \hcenter-in #13 {
+          \center-column {
+            Violone,
+            \line { e Cembalo. }
+          }
+        }
+      }
+      \time 4/4
+      \clef bass
+      \partial 8
+      r16 d16 |
+      d4 bes,4 a,4 f4 |
+      g8 f16 g16 a8 a,8 d4 d'4 ~ |
+      d'8 c'8 b4 c'8 c'16 bes16 a4 |
+      bes8 bes16 a16 g4 a8 a,4 a16 g16 |
+      fis8 d8 e8 fis8 g8 g,4 g16 f16 |
+      e8 c8 d8 e8 f8 f,4 a,8 |
+      b,4 cis4 d4 r8 d'8 |
+    }
+
+    \new FiguredBass \figuremode {
+      \set figuredBassAlterationDirection = #RIGHT
+      \set figuredBassPlusDirection = #RIGHT
+      \override VerticalAxisGroup #'minimum-Y-extent = #'()
+      \override BassFigureAlignment #'stacking-dir = #DOWN
+      s8 |
+      s4 <6>4 <_+>4 <6>4 |
+      <6 4\+ 2>8 <6>8 <_+> s8 s2 |
+      <5>8 <6 4>8 <6 5>4 s4 <5>8 <6>8 |
+      s4 <6 5 _-> <_+>2 |
+      <6>8 <_+>8 <6>8 <6 5>8 <5 4>8 \extendOn <5 _!>8 \extendOff s4 |
+      <6>4 <6->8 <6 5->8 <5 4->8 \extendOn <5 3>4 \extendOff <5 _+>8 |
+      <7>8 <6>8 <5>4 <9 4>8 <8 3>8 s4 |
+    }
+
+  >>
+
+  \layout {
+    \context {
+      \Score
+      \override RehearsalMark #'break-align-symbols = #'(time-signature)
+      \override RehearsalMark #'self-alignment-X = #LEFT
+      \override TimeSignature #'break-align-anchor-alignment = #LEFT
+    }
+  }
+}
diff --git a/Documentation/snippets/new/fretted-headword.ly b/Documentation/snippets/new/fretted-headword.ly
new file mode 100644 (file)
index 0000000..0bede7c
--- /dev/null
@@ -0,0 +1,152 @@
+% INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings %
+% Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17"   %
+% on melodies from Bellini's "Norma"                              %
+%*****************************************************************%
+
+\version "2.12.0"
+
+#(set-global-staff-size 15)
+\paper {
+  line-width = 17\cm
+  indent = 0\cm
+}
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+
+\layout {
+  \context {
+    \Score
+    \remove "Bar_number_engraver"
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+%%%% shortcuts
+% fingering orientations
+sfol = \set fingeringOrientations = #'(left)
+sfor = \set fingeringOrientations = #'(right)
+sfod = \set fingeringOrientations = #'(down)
+sfou = \set fingeringOrientations = #'(up)
+
+% string number orientations
+ssnol = \set stringNumberOrientations = #'(left)  %(down right up)
+ssnou = \set stringNumberOrientations = #'(up)
+ssnod = \set stringNumberOrientations = #'(down)
+ssnor = \set stringNumberOrientations = #'(right)
+
+% define fingering offset
+FO = #(define-music-function (parser location offsetX offsetY) (number? number?)
+#{
+  \once \override Voice.Fingering #'extra-offset = #(cons $offsetX $offsetY)
+#})
+
+% markups
+rit = \markup \center-align { \bold { \italic { " rit." } } }
+dim = \markup \center-align { \italic { " dim." } }
+andantino = \markup \left-align { \italic { \bold { \fontsize #2.5 { "Andantino" } } } }
+benmarcato = \markup { \italic { \bold { "il canto ben marcato" } } }
+pdolce = #(make-dynamic-script (markup #:line (#:dynamic "p" #:normal-text #:italic "dol.")))
+
+%%% THE MUSIC %%%
+
+melody = \relative c {
+  \clef "treble_8"
+  \key d \major
+  \time 4/4
+  \voiceOne
+  \sfol
+  e,32 a' c e
+  e, a c e
+  e,, a' c e
+  e, a c e
+  f4\rest <e'-4>4-> | % m. 1
+
+  e,,,32 gis' b e
+  e, gis b e
+  e,, gis' b e
+  e, gis b e
+  f4\rest \FO #'0.4 #'0.5 <gis-1 e'-4>4 | % m. 2
+
+  d4\rest <b e>-> d4\rest^\rit <b e>4-> | % m. 3
+  <gis b e>1 | % m. 4
+
+  \bar "||"
+  \key a \minor
+  R1 % m. 5
+
+  e'4^\benmarcato e8. d16-4
+  d4-4 \times 2/3 { \sfou \FO #'-0.3 #'0.6 <c-2>4 b8 } | % end of m. 6
+
+  \FO #'-0.3 #'0.3
+  <a-3>4 \times 2/3 { c4 b8 } a4 e'8. e16 | % m. 7
+
+  \FO #'-0.3 #'0.3
+  <g-4>4 \times 2/3 { \sfol \FO #'0.3 #'0.0 <f-1>4 e8 } e4  % beg of m. 8
+  \times 2/3 { \sfou <d-4>4 c8 } | % end of m. 8
+
+  b4 \times 2/3 { d4-4 c8 } \sfou \FO #'-1.7 #'-1.5 <b-0>4 e | % end of m. 9
+
+  e4 e8. d16-4 d4 \times 2/3 { c4 b8 } | % m. 10
+
+  \times 2/3 { a4 a8 b4 c8 } % beg of m. 11
+  \sfou \FO #'-0.3 #'0.3
+  <d-4>4^\< \times 2/3 { e4 <d f>8\! } | % end of m. 11
+}
+
+bass = \relative c {
+  \key d \major
+  \time 4/4
+  \voiceTwo
+
+  e,8\fp[ e'] e,[ e'] e, \sfol <c''-1> <a'-2> c, | % m. 1
+
+  e,,8\fp[ e'] e,[ e'] e, \sfod \FO #'0.2 #'-0.2 <b''-1>  % beg m. 2
+  \sfol \FO #'0.3 #'0.0 <e-1> b | % end m. 2
+
+  e,,8 e' gis e e, e' gis_\dim e | % m. 3
+
+  e,1 | % m. 4
+
+  %% new section starts here in A minor
+  \overrideBeamSettings #'Score #'(4 . 4) #'end
+    #'((* . (1 1 1 1))
+       ((1 . 12)  . (3 3 3 3)))
+  \once \override TextScript #'staff-padding = #1.7
+  \times 2/3 { a8\p^\andantino e' a c a e a, e' a c a e } | % m. 5
+
+  \times 2/3 { a,8\pdolce e' a c a e } % beg m. 6
+  \times 2/3 { e,8 \sfou <e'-3> <gis-1> c gis e } | % end m. 6
+
+  \times 2/3 { a,8 <e'-2> a c e, b' a, e' a c a e } | % m. 7
+
+  \times 2/3 { f,8 f' a \sfol \FO #'0.3 #'-0.5 <d-4> a f fis, d' a' d a d, } | % m. 8
+
+  \times 2/3 { <g,-3>8 d' g d' g, d % beg m. 9
+    \sfod \FO #'0.0 #'-2.0 <gis,-4> \sfou <e'-2> <gis-1> b gis e } | % end m. 9
+
+  \times 2/3 { a,8 e' a c a e e, e' gis c gis e } | % m. 10
+
+  \times 2/3 { a,8 e' a b a e f, f' a d a f } | % m. 11
+}
+
+\score {
+  \new Staff = "guitar" <<
+    \context Voice = "upper" { \melody }
+    \context Voice = "lower" { \bass }
+  >>
+  \layout {
+    \context {
+      \Score
+      \override Fingering #'staff-padding = #'()
+      \override TupletNumber #'stencil = ##f
+      \override TupletBracket #'bracket-visibility = ##f
+    }
+  }
+  \midi { }
+}
diff --git a/Documentation/snippets/new/keyboard-headword.ly b/Documentation/snippets/new/keyboard-headword.ly
new file mode 100644 (file)
index 0000000..57d59a7
--- /dev/null
@@ -0,0 +1,248 @@
+\version "2.12.0"
+\include "english.ly"
+
+#(set-global-staff-size 15)
+\paper {
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+% NR 2.2 Keyboard instruments
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+% M. Ravel, Sonatine (1905)
+% First movement
+
+\layout {
+  \context {
+    \Score
+    \remove "Bar_number_engraver"
+  }
+}
+
+fermataLong = \markup {
+  \override #'(direction . 1)
+  \override #'(baseline-skip . 2) {
+    \dir-column {
+      \musicglyph #"scripts.ufermata"
+      \text \italic \center-align long
+    }
+  }
+}
+
+\new PianoStaff <<
+  \set PianoStaff.connectArpeggios = ##t
+  \new Staff {
+    \time 2/4
+    \key fs \major
+    <<
+      \new Voice {
+        \voiceOne
+        fs''8 ( ^\markup {
+          \override #'(baseline-skip . 2.4) \column {
+            \line \bold { Un peu retenu }
+            \line \italic { très expressif }
+          }
+        }
+        es''16
+        cs''16
+        as'4 )
+        |
+        fs''8 (
+        es''16
+        cs''16
+        as'4 )
+        |
+        fs''8 (
+        es''16
+        cs''16
+        as'8
+        cs''8 )
+        |
+      }
+      \new Voice {
+        \voiceTwo
+        gs'8\rest \ppp
+        fs'4 (
+        es'8 )
+        |
+        gs'8\rest
+        fs'4 (
+        es'8 )
+        |
+        gs'8\rest
+        fs'4 (
+        es'8 )
+        |
+      }
+    >>
+    \clef bass
+    <ds b! es'>4 ( ^ \markup \bold { Rall. }
+    \override Script #'stencil = #(lambda (grob)
+      ly:script::print (grob-interpret-markup grob fermataLong))
+    <ds' as'>8 ) \fermata
+    \noBeam
+    \clef treble
+    \slurUp
+    \once \override Hairpin #'to-barline = ##f
+    <as fs'>8 ( \pp \>
+    |
+    <gs b cs'>4. \! ) ^\markup \bold { a Tempo }
+    \slurUp
+    <as fs'>8 ^\( \>
+    |
+    <gs b cs'>4. \! \)
+    <<
+      \new Voice {
+        \voiceOne
+        <as fs'>8 (
+        |
+        cs'8 ^\markup \bold { Rallentando }
+        b16
+        cs'16
+        d'8
+        e'16
+        fs'16
+        |
+        <as! cs' gs'>4. )
+        s8
+        |
+        r8
+        <cs'' as'' cs'''>4 \arpeggio
+        e''16 ( ^\markup \bold { Lent }
+        fs''16
+        |
+        \voiceTwo
+        <as'! cs'' gs''>2 )
+        |
+      }
+      \new Voice {
+        \voiceTwo
+        s8
+        |
+        <gs b>4 \<
+        <fs bs>4 \>
+        |
+        s4. \!
+        \slurUp
+        \once \override Script #'direction = #UP
+        <a bs e'>8 ( \accent
+        |
+        <as! cs' gs'>4. )
+        \once \override Hairpin #'to-barline = ##f
+        <a' bs'>8 \ppp \>
+        |
+        s8 \!
+        \stemDown
+        \once \override Script #'direction = #UP
+        \ottava #1
+        \voiceOne
+        \once \override PianoStaff.Arpeggio #'padding = #0.8
+        <cs''' as''' cs''''>4. \arpeggio \fermata
+        \ottava #0
+        \bar "|."
+      }
+    >>
+  }
+  \new Staff <<
+    \set Staff.pedalSustainStyle = #'bracket
+    \key fs \major
+    \clef bass
+    \new Voice {
+      \voiceOne
+      ds'4 \tenuto
+      cs'4 \tenuto
+      |
+      ds'4 \tenuto
+      cs'4 \tenuto
+      |
+      ds'4 \tenuto
+      cs'4 \tenuto
+      |
+      s8
+      \clef treble
+      <b' cs''>8 [
+      \clef bass
+      <es b cs'>8 \fermata ]
+      s8
+      |
+      fs8\rest
+      \clef treble
+      <b' cs''>4 \tenuto
+      s8
+      |
+      fs8\rest
+      \clef treble
+      <b' cs''>4 \tenuto
+      s8
+      |
+      s2
+      |
+      ds8\rest
+      \clef treble
+      <as' cs''>4
+      \clef bass
+      s8
+      |
+      s8
+      \clef treble
+      <as'>4 \arpeggio
+      \clef bass
+      s8
+      |
+      s8
+      \clef treble
+      <as''>4. \arpeggio \fermata
+      |
+    }
+    \new Voice {
+      \voiceTwo
+      ds'8 [ (
+      < ds bs >8
+      cs'8
+      < ds as >8 ] )
+      |
+      ds'8 [ (
+      < ds bs >8
+      cs'8
+      < ds as >8 ] )
+      |
+      ds'8 [ (
+      < ds bs >8
+      cs'8
+      < ds as >8 ] )
+      |
+      \once \override Script #'outside-staff-priority = #100
+      \once \override TextScript #'outside-staff-priority = #500
+      <cs, gs,>4. \fermata _\markup \italic { ped. }
+      <fs, cs>8 (
+      |
+      <e, b,>4. ) \sustainOn
+      \clef bass
+      <fs, cs>8 \( \sustainOff
+      |
+      <e, b,>4. \) \sustainOn
+      \clef bass
+      <fs, cs>8 ( \sustainOff
+      |
+      <e, b,>4
+      <d, a,>4
+      |
+      <fs,, cs,>4. ) \sustainOn
+      <a, e>8 ( \sustainOff
+      |
+      <fs, cs>4. ) \sustainOn
+      \slurUp
+      <a e'>8 ( \sustainOff \sustainOn
+      |
+      <fs cs'>2 ) \sustainOff \sustainOn
+      |
+    }
+  >>
+>>
diff --git a/Documentation/snippets/new/pitches-headword.ly b/Documentation/snippets/new/pitches-headword.ly
new file mode 100644 (file)
index 0000000..0af775e
--- /dev/null
@@ -0,0 +1,150 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+% 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
+   }
+
+>>
diff --git a/Documentation/snippets/new/repeats-headword.ly b/Documentation/snippets/new/repeats-headword.ly
new file mode 100644 (file)
index 0000000..75a99b8
--- /dev/null
@@ -0,0 +1,131 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper {
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+% NR 1.7 Repeats
+
+% Beethoven, Op. 57
+% Piano sonata 23 - Dem Grafen Franz von Brunswick Gewidmet
+% Movt II, Andante con moto
+% Measures 9 - 16
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+
+\new PianoStaff <<
+
+   \new Staff = RH {
+      \clef bass
+      \key df \major
+      \time 2/4
+      \set Score.currentBarNumber = #9
+      \bar "|:"
+      <af ef c>4 (
+      <af gf c>8..
+      <af ef c>32
+      |
+      <af f df>8. )
+      <df' af f>16 (
+      <c' af gf>8
+      <df' af f>8 )
+      |
+      <af ef c>4 (
+      <af gf c>8..
+      <af ef c>32
+      |
+      <af f df>8. )
+      \slurDown
+      <f' af f>16 (
+      <<
+         {
+            \voiceTwo
+            gf8
+            f8 )
+         }
+         \new Voice {
+            \voiceOne
+            <f' af>16
+            ef'16
+            <df' af>8
+         }
+      >>
+      \oneVoice
+      |
+      <af ef c>4 (
+      <af gf c>8..
+      <af ef c>32
+      \clef treble
+      |
+      <af' df' af>8. )
+      <af' f' df'>16 (
+      <af' ef' c'>16
+      gf'16
+      <f' df' af>8 )
+      |
+      \slurUp
+      <ef' bf gf>4
+      \change Staff = LH
+      \voiceOne
+      <af ef c>4
+      |
+      <df' f df>4.
+      \change Staff = RH
+      \oneVoice
+      r8
+      \clef bass
+      \bar ":|"
+   }
+
+   \new Staff = LH {
+      \clef bass
+      \key df \major
+      \time 2/4
+      <af, gf,>4 (
+      <af, ef,>8..
+      <af, gf,>32
+      |
+      <af, f,>8. )
+      <af, df,>16 (
+      <af, ef,>8
+      <af, df,>8 )
+      |
+      <af, gf,>4 (
+      <af, ef,>8..
+      <af, gf,>32
+      |
+      <af, f,>8. )
+      <af, df,>16 (
+      <af, c,>8
+      <af, df,> )
+      |
+      <af, gf,>4 (
+      <af, ef,>8..
+      <af, gf,>32
+      |
+      <f f,>8. )
+      <df df,>16 (
+      <ef ef,>8
+      <f f,>8 )
+      |
+      \voiceTwo
+      gf,4  (
+      af,4 ~ )
+      |
+      af,16. [ (
+      gf,32
+      f,16.
+      ef,32 ]
+      df,8 )
+      \oneVoice
+      r8
+   }
+
+>>
diff --git a/Documentation/snippets/new/rhythms-headword.ly b/Documentation/snippets/new/rhythms-headword.ly
new file mode 100644 (file)
index 0000000..9a80e6e
--- /dev/null
@@ -0,0 +1,216 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper {
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+% NR 1.2 Rhythms
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+
+% Beethoven, Op. 81a
+% Piano sonata 26 - Das Lebewohl
+% Movt II - Abwesenheit
+% Measures 31 - 34
+
+\layout {
+  \context {
+    \Score
+    \override SpacingSpanner #'base-shortest-duration =
+      #(ly:make-moment 1 40)
+      %\override SpacingSpanner #'strict-grace-spacing = ##t
+  }
+}
+
+\new PianoStaff <<
+
+   % RH Staff
+   \new Staff {
+      \clef treble
+      \key c \minor
+      \time 2/4
+      \set Score.currentBarNumber = #31
+
+      <c''' c''>8 ( -\markup {
+        \override #'(baseline-skip . 2) \italic \column {
+          \line { a tempo }
+          cantabile
+        }
+      }
+      <g'' g'>8 )
+      ~
+      <g'' g'>8 (
+      <a'' a'>16
+      <f'' f'>16 )
+
+      |
+
+      \afterGrace
+         <f'' f'>8 [ (
+         {
+            e''16 [
+            f''16
+            e''16
+            d''16 ]
+         }
+      <e''! e'>16
+      <f'' f'>16 ] )
+      \once \override TextScript #'padding = #3.8
+      <g'' g'>16 ( \staccato -\markup { \italic cresc. }
+      <a'' a'>16 ) \staccato
+      <bf'' bf'>32  (
+      <b'' b'>32 )
+      <b'' b'>32 (
+      <c''' c''>32 )
+
+      |
+
+      \once \override DynamicLineSpanner #'padding = #2
+      b''32 ( \p \>
+      c'''32
+      d'''32
+      c'''32 ) \!
+      g''8 (
+      ~
+      g''32 [
+      a''64
+      g''64 ) ]
+
+      a''64 ( [
+      g''64 )
+      bf''64 (
+      a''64 ) ]
+
+      bf''64 ( [
+      a''64 )
+      c'''64 (
+      b''64 ) ]
+
+      c'''128 ( [
+      b''128
+      d'''128
+      c'''128
+      f'''64
+      f''64 ) ]
+
+      |
+
+      \afterGrace
+         <f'' f'>8 [ (
+         {
+            e''16 [
+            f''16
+            e''16
+            d''16 ]
+         }
+      <e''! e'>16
+      <f'' f'>16 ] )
+      <g'' g'>16 ( \staccato -\markup { \italic cresc. }
+      <af''! af'!>16 ) \staccato
+      <bf'' bf'>32  (
+      <b'' b'>32 )
+      <b'' b'>32 (
+      <c''' c''>32 )
+   }
+
+   % LH Staff
+   \new Staff {
+      \clef bass
+      \key c \minor
+      \time 2/4
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <a f>32
+      c'32
+      <a f>32
+      c'32
+
+      |
+
+      <bf g>32
+      c'32
+      <bf g>32
+      c'32
+
+      <bf g>32
+      c'32
+      <bf g>32
+      c'32
+
+      <bf g>32
+      c'32
+      <a f>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      |
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+
+      <a f>32
+      c'32
+      <a f>32
+      c'32
+
+      |
+
+      <bf! g>32
+      c'32
+      <bf g>32
+      c'32
+
+      <bf g>32
+      c'32
+      <bf g>32
+      c'32
+
+      <bf g>32
+      c'32
+      <af! f>32
+      c'32
+
+      <g e>32
+      c'32
+      <g e>32
+      c'32
+   }
+
+>>
diff --git a/Documentation/snippets/new/simultaneous-headword.ly b/Documentation/snippets/new/simultaneous-headword.ly
new file mode 100644 (file)
index 0000000..71574f7
--- /dev/null
@@ -0,0 +1,320 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+% NR 1.5 Simultaneous notes
+
+% L. v. Beethoven, Op. 111
+% Piano sonata 32
+% Movt II - Arietta - Adagio molto semplice e cantabile
+% measures 108 - 118
+
+\layout {
+   \context {
+      \Score
+      \override SpacingSpanner #'base-shortest-duration =
+         #(ly:make-moment 1 18)
+      \override NonMusicalPaperColumn #'line-break-system-details =
+         #'((alignment-offsets . (0 -12)))
+   }
+}
+
+trillflat =
+  \once \override TrillSpanner #'(bound-details left text) =
+    #(markup #:translate-scaled '(-0.05 . -1)
+             #:concat (#:musicglyph "scripts.trill"
+                       #:translate '(-0.5 . 1.9) #:fontsize -7 #:flat))
+
+
+\new PianoStaff <<
+
+   % RH
+   \new Staff <<
+      \clef treble
+      \key c \major
+      \time 9/16
+      \set Score.currentBarNumber = #108
+
+      % RH voice 1
+      \new Voice {
+
+         \voiceOne
+         s4.
+         s8.
+
+         |
+
+         s4.
+         a''8 \p \> [ (
+         g''16 ] )
+
+         |
+
+         g''4.
+         af''8 [ (
+         g''16 ] )
+
+         |
+
+         g''8. [
+         g''8.
+         g''8. \pp ]
+
+         |
+
+         g''8. [
+         af''8.
+         af''8. ]
+
+         |
+
+         af''8. [
+         af''8.
+         af''8. ]
+
+         |
+         \break
+
+         \trillflat
+         af''4. \startTrillSpan
+         ~
+         af''8.
+         ~
+
+         |
+
+         af''4.
+         ~
+         af''8.
+         ~
+
+         |
+
+         \oneVoice
+         <af'' d''>8. [
+         a''8. \p \<
+         bf''8. ]
+         ~
+
+         |
+
+         bf''8. [
+         b''8.
+         c'''8. ]
+         ~
+
+         \bar "||"
+
+         \key ef \major
+         c'''8. [
+         cs'''8. \f ] \stopTrillSpan
+         r8.
+
+      }
+
+      % RH voice 2
+      \new Voice {
+         \voiceTwo
+         \override Voice.TrillSpanner #'direction = #down
+         d''4. \f \startTrillSpan
+         ~
+         d''8.
+         ~
+
+         |
+
+         d''4.
+         ~
+         d''8.
+         ~
+
+         |
+
+         d''8. \stopTrillSpan
+         \trillflat
+         d''4. \startTrillSpan
+         ~
+
+         |
+
+         d''4.
+         ~
+         d''8.
+         ~
+
+         |
+
+         d''4.
+         ~
+         d''8.
+         ~
+
+         |
+
+         d''4.
+         ~
+         d''8. \stopTrillSpan
+         ~
+
+         |
+
+         \trillflat
+         d''4. \startTrillSpan
+         ~
+         d''8.
+         ~
+
+         |
+
+         d''4.
+         ~
+         d''8.
+         ~
+
+         |
+
+         \once \override NoteColumn #'ignore-collision = ##t
+         \once \override NoteHead #'transparent = ##t
+         \once \override Dots #'transparent = ##t
+         \once \override Stem #'transparent = ##t
+         d''8. \stopTrillSpan
+         s4.
+
+         |
+
+         s8.
+         s8.
+
+      }
+
+   >>
+
+   % LH staff
+   \new Staff {
+      \clef bass
+      \key c \major
+      \time 9/16
+
+      r8.
+      r8.
+      <c! c,!>8 [ (
+      <g, g,,>16 ] )
+
+      |
+
+      <g, g,,>4.
+      \clef treble
+      c''8 [ (
+      b'16 ] )
+
+      |
+
+      b'4.
+      c''8 [ (
+      b'16 ] )
+
+      |
+
+      b'8. [
+      b'8.
+      b'8. ]
+
+      |
+
+      b'8. [
+      bf'8. ]
+      \clef bass
+      <f f,>8 [ (
+      <bf, bf,,>16 ] )
+
+      |
+
+      <bf, bf,,>4.
+      \clef treble
+      f'8 [ (
+      bf16 ] )
+
+      |
+
+      <<
+
+         \new Voice {
+            \voiceOne
+            \override Voice.TrillSpanner #'direction = #up
+            f'4. \startTrillSpan
+            ~
+            f'8.
+            ~
+
+            |
+
+            f'4.
+            ~
+            f'8.
+            ~
+
+            |
+
+            f'8. \stopTrillSpan
+         }
+
+         \new Voice {
+            \voiceTwo
+            \override Voice.TrillSpanner #'direction = #down
+            bf8. [
+            bf8.
+            bf8. ]
+
+            |
+
+            bf8. [
+            bf8.
+            bf8. ]
+
+            |
+
+            bf8.
+         }
+
+      >>
+
+      \oneVoice
+      r8.
+      r8.
+
+      |
+
+      r8.
+      r8.
+      r8.
+      \clef bass
+
+      |
+
+      \key ef \major
+      r8.
+      r8.
+      r8.
+
+   }
+
+>>
diff --git a/Documentation/snippets/new/staff-headword.ly b/Documentation/snippets/new/staff-headword.ly
new file mode 100644 (file)
index 0000000..7eb5514
--- /dev/null
@@ -0,0 +1,126 @@
+\version "2.12.0"
+\include "catalan.ly"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+\header {
+       mutopiatitle = "Napolitan Dance (Swan Lake)"
+       mutopiacomposer = "TchaikovskyPI"
+       mutopiainstrument = "Piano, Trumpet, Percussion"
+       source = "New arrangement"
+       style = "Classical"
+       copyright = "Public Domain"
+       maintainer = "Laurence Sardain"
+       lastupdated = "2006/Dec/21"
+%      title = "Le Lac des Cygnes"
+%      subtitle = "Danse Napolitaine"
+%      composer = "Piotr Ilitch Tchaïkovski"
+%      arranger = "arr. Laurence Sardain"
+%       footer = "Mutopia-2006/12/22-896"
+}
+
+trompette = \relative do'' {
+  \clef treble
+  \key mib \major
+  \time 2/4
+  R2^\markup { \italic Comodo } |
+  r8 \once \override TextScript #'padding = #2.0
+  sib16-.^\markup {\dynamic p \italic grazioso} do-. mib( re)-. do-. sib-. |
+  re8-. r8 re4->( |
+  re8) do16-. re-. mib( re) do-. re-. |
+  do8-. r8 sib4-> |
+}
+
+tambourin = \relative do' {
+  \time 2/4
+  r8 do16 do do8 do |
+  r8 do16 do do8 do |
+  r8 do r do |
+  r8 do16 do do8 do |
+  r8 do r do |
+}
+
+tambourinMidi = \drummode {
+  \time 2/4
+  r8 tamb16 tamb tamb8 tamb |
+  r8 tamb16 tamb tamb8 tamb |
+  r8 tamb r tamb |
+  r8 tamb16 tamb tamb8 tamb |
+  r8 tamb r tamb |
+}
+
+upper = \relative do' {
+  \clef treble
+  \key mib \major
+  \time 2/4
+  r8\p <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
+  r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
+  r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
+  r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
+  r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
+}
+
+lower = \relative do {
+  \clef bass
+  \key mib \major
+  \time 2/4
+  mib4-. r4 |
+  sib-. r |
+  fa'-. r |
+  sib, r |
+  mib4-. r4 |
+}
+
+
+\score {
+  <<
+    \context Staff = "trumpet" <<
+      \set Staff.instrumentName = \markup { "Trumpet" \concat{ B \teeny \raise #0.4 \flat } }
+      \transpose sib do'
+      \trompette
+    >>
+    \context RhythmicStaff = "tambourin" <<
+      \set Staff.instrumentName = "Tambourine"
+      \tambourin
+    >>
+    \context PianoStaff = "prima" <<
+      \set PianoStaff.instrumentName = "Piano  "
+      \context Staff = "uppera" \upper
+      \context Staff = "lowera" \lower
+    >>
+  >>
+  \layout { }
+}
+\score {
+  <<
+    \context Staff = "trumpet" {
+      \set Staff.midiInstrument = "trumpet"
+      \trompette
+    }
+    \context DrumStaff = "tambourin" {
+      \tambourinMidi
+    }
+    \context Staff = "piano" <<
+      \upper
+      \lower
+    >>
+  >>
+  \midi {
+    \context {
+      \Score
+      tempoWholesPerMinute = #(ly:make-moment 72 4)
+    }
+  }
+}
+
diff --git a/Documentation/snippets/new/text-headword.ly b/Documentation/snippets/new/text-headword.ly
new file mode 100644 (file)
index 0000000..8a0237f
--- /dev/null
@@ -0,0 +1,243 @@
+\version "2.12.0"
+\include "english.ly"
+#(set-global-staff-size 15)
+\paper{
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
+
+% NR 1.8 Text
+
+% L. v. Beethoven, Op. 110
+% Piano sonata 31
+% measures 1 - 7
+
+\layout {
+   \context {
+      \Score
+      \override SpacingSpanner #'base-shortest-duration =
+         #(ly:make-moment 1 20)
+      %\override NonMusicalPaperColumn #'line-break-system-details =
+      %#'((alignment-offsets . (0 -12)))
+   }
+}
+
+\new PianoStaff <<
+
+   % RH staff
+   \new Staff {
+      \clef treble
+      \key af \major
+      \time 3/4
+
+      \once \override TextScript #'staff-padding = #4
+      <c'' af'>4. (
+      _ \markup { \dynamic p \italic { con amabilità } }
+      <af' ef'>8 )
+      <af' ef'>8. [
+      <af' ef'>16 ]
+
+      |
+
+      <df'' g'>4
+      <bf' g'>2
+      _ \markup { \italic { ten. } }
+
+      |
+
+      <<
+
+         \new Voice {
+            \voiceOne
+            ef''4. (
+            df''8 [ )
+            ef'' (
+            f'' ) ]
+
+            |
+
+            \once \override TextScript #'staff-padding = #4
+            ef''8. (
+            _ \markup { \italic { tranqu. } }
+            d''16 )
+            df''8 \trill \fermata
+            _ \markup { \italic { ten. } }
+         }
+
+         \new Voice {
+            \voiceTwo
+            af'4.
+            af'8 [
+            af'8
+            af'8 ]
+
+            |
+
+            g'4
+            g'8
+         }
+
+      >>
+
+      \oneVoice
+      \once \override TextScript #'staff-padding = #4
+      df''32
+      _ \markup { \italic dolce }
+      c''32
+      df''32
+      ef''32
+      \acciaccatura { df''[ ef'' ] }
+      f''8
+      ef''16
+      df''16
+
+      |
+      \break
+      \overrideProperty "Score.NonMusicalPaperColumn"
+      #'line-break-system-details #'((alignment-offsets . (0 -12)))
+
+      c''4. (
+      ^ \markup \italic { cantabile, con intimissimo sentimento,
+         ma sempre molto dolce e semplice }
+      ef''4
+      af''8 )
+
+      |
+
+      af''4 (
+      g''2 )
+
+      |
+
+      bf''4. (
+      g''4
+      ef''8 )
+
+      |
+   }
+
+   % LH
+   \new Staff {
+      \clef bass
+      \key af \major
+      \time 3/4
+
+      <ef af,>4. (
+      <ef c>8 )
+      <ef c>8. [
+      <ef c>16 ]
+
+      |
+
+      <ef bf,>4
+      <ef df>2 ^ \markup { \italic ten. }
+
+      |
+
+      <<
+
+         \new Voice {
+            \voiceOne
+            ef8 [ (
+            af8
+            c'8
+            bf8 )
+            c'8 ( \staccato
+            df'8 ]  ) \staccato
+
+            |
+
+            bf4
+            bf8 ^ \markup { \italic ten. }
+         }
+
+         \new Voice {
+            \voiceTwo
+            c4. (
+            f8 [ )
+            ef8 ( \staccato
+            df8 ] ) \staccato
+
+            |
+
+            ef4
+            ef8 \fermata
+         }
+
+      >>
+
+      \oneVoice
+      r8
+      r4
+      \clef treble
+
+      |
+
+      \override Staff.SustainPedalLineSpanner #'outside-staff-priority = #1000
+      \override Staff.SustainPedalLineSpanner #'staff-padding = #7
+      \once \override TextScript #'padding = #2
+      af16 \sustainOn
+      ^ \markup \italic { non staccato }
+      _ \markup \italic { molto \concat {\dynamic {p},} sempre tranquillo
+         ed egualmente, non rubato }
+      <ef' c'>16
+      <ef' c'>16
+      <ef' c'>16
+      af16
+      <ef' c'>16
+      <ef' c'>16
+      <ef' c'>16
+      af16 \sustainOn
+      <ef' c'>16
+      <ef' c'>16
+      <ef' c'>16
+
+      |
+
+      bf16 \sustainOn
+      <ef' df'>16
+      <ef' df'>16
+      <ef' df'>16
+      bf16 \sustainOn
+      <ef' df'>16
+      <ef' df'>16
+      <ef' df'>16
+      bf16
+      <ef' df'>16
+      <ef' df'>16
+      <ef' df'>16
+
+      |
+
+      \override Staff.SustainPedalLineSpanner #'staff-padding = #4
+      df'16 \sustainOn
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+      df'16
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+      df'16 \sustainOn
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+      <bf' g' ef'>16
+
+      |
+   }
+
+>>
diff --git a/Documentation/snippets/new/unfretted-headword.ly b/Documentation/snippets/new/unfretted-headword.ly
new file mode 100644 (file)
index 0000000..a01259b
--- /dev/null
@@ -0,0 +1,230 @@
+% #!lilypond lcp-extract.ly -*- coding: utf-8; -*-
+
+%%%
+%%% les-cinq-pieds:
+%%% extract for the lilypond documentaton project
+%%%
+
+%% Title:      Les cinq pieds
+%% Composer:   David Séverin
+%% Date:       Juillet 2007
+%% Instrument: Violon Solo
+%% Dedication: A mon épouse Lívia De Souza Vidal
+%% Additional: avec l'aide de Krzysztof Wagenaar
+
+%% Statement:
+
+%% Here by, I, the composer, agree that this extract of my composition
+%% be in the public domain and can be part of, used and presented in
+%% the LilyPond Documention Project.
+
+%% Statement Date: Octber the 9th, 2008
+
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+
+\version "2.12.0"
+#(set-global-staff-size 15)
+
+%%%
+%%% Abreviations
+%%%
+
+db         = \markup { \musicglyph #"scripts.downbow" }
+dub        = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" } }
+dubetc     = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" "..." } }
+
+ub         = \markup { \musicglyph #"scripts.upbow" }
+udb        = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" } }
+udbetc     = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" "..." } }
+
+fermaTa    = \markup \musicglyph #"scripts.ufermata"
+
+accel   = \markup \tiny \italic \bold "accel..."
+ritar   = \markup \tiny \italic \bold "ritar..."
+
+ignore     = \override NoteColumn #'ignore-collision = ##t
+
+
+%%
+%% Strings
+%%
+
+svib           = \markup \small "s. vib."
+pvib           = \markup \small "p. vib."
+mvib           = \markup \small "m. vib."
+sulp           = \markup \small "s.p."
+norm           = \markup \small "n."
+
+quatre         = \markup \teeny "IV"
+
+
+%%
+%% Shifting Notes
+%%
+
+shift      = \once \override NoteColumn #'force-hshift = #0.9
+shifta     = \once \override NoteColumn #'force-hshift = #1.2
+shiftb     = \once \override NoteColumn #'force-hshift = #1.4
+
+
+%%
+%% Hairpin
+%%
+
+% aniente        = "a niente"
+aniente        = \once \override Hairpin #'circled-tip = ##t
+
+
+%%
+%% Tuplets
+%%
+
+tupletbp       = \once \override Staff.TupletBracket #'padding = #2.25
+
+
+%%
+%% Flag [Note Head - Stem]
+%%
+
+noflag         = \once \override Stem #'flag-style = #'no-flag
+
+%%%
+%%% Functions
+%%%
+
+#(define-markup-command (colmark layout props args)
+  (markup-list?)
+  (let ((entries (cons (list '(baseline-skip . 2.3)) props)
+       ))
+   (interpret-markup layout entries
+    (make-column-markup
+     (map (lambda (arg)
+          (markup arg))
+      (reverse args))))))
+
+
+%%%
+%%% Instruments
+%%%
+
+ViolinSolo = \relative c' {
+
+  \voiceOne
+
+  \set Score.markFormatter     =  #format-mark-box-numbers
+  \override Score.VoltaBracket #'font-name                  = #"sans"
+  \override Score.VoltaBracket #'extra-offset               = #'(0 . 1)
+  \override SpacingSpanner     #'uniform-stretching         = ##t
+
+
+  %% Measure 1
+  \time 25/8
+  \mark \default
+  r2 ^\markup \colmark { \italic "fatigué" " " \bold "lentement"} r4 r r8
+  <<
+    { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \svib } \shifta e1 } \\
+    { d2 \open \mf \< ~ \aniente d1  \! \> r4 r ^\markup \colmark { " " \fermaTa } \! }
+  >>
+
+
+  %% Measure 2
+  \time 7/4
+  \set Score.repeatCommands = #'((volta "1) n.      2) s.p."))
+  <<
+    { \shift d2 \glissando ^\markup \colmark { \quatre \udbetc } \shifta e1 } \\
+    { d2 \open \mf \< ~ d1 \! \> ~ d4 ^\markup \colmark { " " \fermaTa } \! }
+  >>
+  \set Score.repeatCommands = #'((volta #f))
+
+
+  %% Measure 3
+  \time 15/4
+  <<
+    { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \pvib \norm } \shifta e1 \glissando d2 } \\
+    { d2 \open \mf \< ~ d1 ~ d2 \ff  ~ d1 \> ~ d2 ^\markup \colmark { " " " " \svib } ~ d4 \pp}
+  >>
+  \break
+
+  %% Measure 4
+  \time 4/4
+  \stemUp
+  \tupletDown
+  \times 2/3 { d4 ^\markup \colmark { \quatre \db \accel } d d }
+  \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d }
+
+
+
+  %% Measure 5
+  \time 5/4
+  \tupletbp \times 2/3 { d8 \mf \< ^\markup \colmark { \quatre \db \norm } d _\open d }
+  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db \sulp } d _\open d }
+  \tupletbp \times 2/3 { d16 ^\markup \colmark { " " \db \norm } d _\open d d d _\open d }
+  d2 \ff ^\markup \colmark { " " \pvib } \>
+
+
+  %% Measure 6
+  \time 5/8
+  \once \override Beam #'grow-direction = #RIGHT  % \featherDurations #(ly:make-moment 2 3)
+  { d16 \staccato
+    [ d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato]
+  }
+  \break
+
+
+  %% Measure 7
+  \time 7/4
+  \tupletbp \times 2/3 { d16 ^\markup \colmark { \quatre } d _\open d d d _\open d }
+  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db } d _\open d }
+  \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db " " \sulp } d _\open d }
+  \times 2/3 { d4 ^\markup \colmark { \quatre \db \ritar \norm } d d }
+  \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d \ppp ~ }
+
+
+  %% Measure 8
+  d4 ^\markup \colmark { " " " " \pvib \norm }
+  deh2 d dih \<
+
+
+  %% Measure 9
+  <<
+    { \shift d2 \glissando ^\markup \colmark { \quatre } \shifta e1 } \\
+    { d2 \open ~ d1  ^\markup \colmark { " " " " \mvib } }
+  >>
+  \breathe r4 \!
+
+}
+
+
+%%%
+%%% Score
+%%%
+
+\score {
+
+  <<
+    \relative <<
+      \new Staff \ViolinSolo
+    >>
+
+    \override Score.Rest #'transparent = ##t
+    \set Score.defaultBarType          = "empty"
+  >>
+
+  \layout  {
+    indent       = 0.0
+    \context {
+      \Staff
+      \remove "Time_signature_engraver"
+    }
+    \context {
+      \Score
+      \remove "Bar_number_engraver"
+    }
+  }
+}
diff --git a/Documentation/snippets/new/wind-headword.ly b/Documentation/snippets/new/wind-headword.ly
new file mode 100644 (file)
index 0000000..d40a9fe
--- /dev/null
@@ -0,0 +1,52 @@
+\version "2.12.0"
+#(set-global-staff-size 15)
+\paper {
+  line-width = 16\cm
+  indent = 0\cm
+}
+
+% NR 2.whatever  Wind
+
+\header {
+  lsrtags = "headwords"
+  texidoc = ""
+  doctitle = "headword"
+}
+
+% Tchaikovsky
+% Nutcracker Suite, VII Dance of the Merlitons
+\score {
+  \new StaffGroup <<
+    \new Staff \relative c'' {
+      \set Staff.instrumentName = "Flauto I,II"
+      \once \override Score.RehearsalMark #'self-alignment-X = #-1
+      \once \override Score.RehearsalMark #'break-align-symbols =
+#'(time-signature)
+      \once \override Score.TimeSignature
+#'break-align-anchor-alignment = #LEFT
+      \once \override Score.RehearsalMark #'padding = #4
+      \mark \markup \large \bold {Moderato assai}
+      \key d \major
+      \time 2/4
+      \compressFullBarRests
+      R2*2
+      <d a>16-.\p <cis g>-. <d a>-. <cis g>-. <d a>8-. <cis g>-.
+      <e a,>-.\< <d a>32( <fis d> <a fis> <d a> <fis d>4--)\mf
+      <g d>16-. <fis cis>-. <g d>-. <fis cis>-.
+        <e b>(\> <d a>) <a fis>-. <fis d>-.\!
+      <d bes>4--\sf \acciaccatura {<d' bes>8} <cis a>4--\mf
+    }
+    \new Staff \relative c' {
+      \set Staff.instrumentName = "Flauto III"
+      \key d \major
+      \time 2/4
+      \compressFullBarRests
+      R2*2_\markup{Gr.Fl.}
+      fis16-.\p e-. fis-. e-. fis8-. e-.
+      g8-.\< fis32( a d fis a4--)\mf
+      b16-. a-. b-. a-. g(\> fis) d-. a-.\!
+      g4--\sf \acciaccatura fis'8 g4--\mf
+    }
+  >>
+}
+