From 08898365af93e49667700827a43b5da5788e42bf Mon Sep 17 00:00:00 2001
From: Graham Percival <graham@percival-music.ca>
Date: Mon, 30 Apr 2007 02:17:18 -0700
Subject: [PATCH] First phase of input/test -> LSR change, part two (git lost
 these changes)

---
 input/test/add-staccato.ly                |  36 ---
 input/test/add-text-script.ly             |  38 ---
 input/test/ambitus-mixed.ly               |  29 ---
 input/test/ancient-font.ly                | 295 ----------------------
 input/test/ancient-time.ly                |  17 --
 input/test/bar-always.ly                  |  19 --
 input/test/bar-lines-lyric-only.ly        |  38 ---
 input/test/bar-number-every-five-reset.ly |  30 ---
 input/test/bar-number-show-all.ly         |  20 --
 input/test/beam-alternate.ly              |  34 ---
 input/test/beam-auto-4-8.ly               |  39 ---
 input/test/beam-auto-override.ly          |  55 ----
 input/test/beam-control.ly                |  21 --
 input/test/beam-count.ly                  |  27 --
 input/test/boxed-stencil.ly               |  29 ---
 input/test/extra-staff.ly                 |  57 -----
 input/test/fret-diagram.ly                |  53 ----
 input/test/instrument-name-grandstaff.ly  |  19 --
 input/test/mensural-ligatures.ly          |  86 -------
 input/test/mensural-note-heads.ly         |  19 --
 input/test/no-key-at-end-of-line.ly       |  18 --
 input/test/reverse-music.ly               |  46 ----
 input/test/slur-manual.ly                 |  43 ----
 input/test/slur-minimum-length.ly         |  16 --
 input/test/staff-lines.ly                 |  34 ---
 25 files changed, 1118 deletions(-)
 delete mode 100644 input/test/add-staccato.ly
 delete mode 100644 input/test/add-text-script.ly
 delete mode 100644 input/test/ambitus-mixed.ly
 delete mode 100644 input/test/ancient-font.ly
 delete mode 100644 input/test/ancient-time.ly
 delete mode 100644 input/test/bar-always.ly
 delete mode 100644 input/test/bar-lines-lyric-only.ly
 delete mode 100644 input/test/bar-number-every-five-reset.ly
 delete mode 100644 input/test/bar-number-show-all.ly
 delete mode 100644 input/test/beam-alternate.ly
 delete mode 100644 input/test/beam-auto-4-8.ly
 delete mode 100644 input/test/beam-auto-override.ly
 delete mode 100644 input/test/beam-control.ly
 delete mode 100644 input/test/beam-count.ly
 delete mode 100644 input/test/boxed-stencil.ly
 delete mode 100644 input/test/extra-staff.ly
 delete mode 100644 input/test/fret-diagram.ly
 delete mode 100644 input/test/instrument-name-grandstaff.ly
 delete mode 100644 input/test/mensural-ligatures.ly
 delete mode 100644 input/test/mensural-note-heads.ly
 delete mode 100644 input/test/no-key-at-end-of-line.ly
 delete mode 100644 input/test/reverse-music.ly
 delete mode 100644 input/test/slur-manual.ly
 delete mode 100644 input/test/slur-minimum-length.ly
 delete mode 100644 input/test/staff-lines.ly

diff --git a/input/test/add-staccato.ly b/input/test/add-staccato.ly
deleted file mode 100644
index aee898561d..0000000000
--- a/input/test/add-staccato.ly
+++ /dev/null
@@ -1,36 +0,0 @@
-\version "2.10.0"
-\sourcefilename "add-staccato.ly"
-
-\header {
-texidoc= "@cindex Add Stacato
-Using @code{make-music}, you can add various stuff to notes. In this
-example staccato dots are added to the notes."
-} 
-
-#(define (make-script x)
-   (make-music 'ArticulationEvent
-               'articulation-type x))
-
-#(define (add-script m x)
-   (if
-     (equal? (ly:music-property m 'name) 'EventChord)
-     (set! (ly:music-property m 'elements)
-           (cons (make-script x)
-                 (ly:music-property m 'elements))))
-   m)
-
-#(define (add-staccato m)
-   (add-script m "staccato"))
-
-addStacc =
-#(define-music-function (parser location music) 
-					(ly:music?)
-		(music-map add-staccato music))	   
-
-\score {
-  \relative c'' {
-    a b \addStacc { c c } 
-  }
-  \layout{ ragged-right = ##t }
-}
-
diff --git a/input/test/add-text-script.ly b/input/test/add-text-script.ly
deleted file mode 100644
index c0ce18bf7f..0000000000
--- a/input/test/add-text-script.ly
+++ /dev/null
@@ -1,38 +0,0 @@
-\version "2.10.0"
-\sourcefilename "add-text-script.ly"
-
-\header {
-texidoc= "@cindex make-music Fingering
-You can add various stuff to notes using @code{make-music}.
-In this example, an extra fingering is attached to a note. 
-"
-} 
-
-#(define (make-text-script x) 
-   (make-music 'TextScriptEvent
-               'direction DOWN
-               'text (make-simple-markup x)))
-
-#(define (add-text-script m x)
-   (if (equal? (ly:music-property m 'name) 'EventChord)
-       (set! (ly:music-property m 'elements)
-             (cons (make-text-script x)
-                  (ly:music-property m 'elements)))       
-       (let ((es (ly:music-property m 'elements))
-	     (e (ly:music-property m 'element)))
-	 (map (lambda (y) (add-text-script y x)) es)
-	 (if (ly:music? e)
-	     (add-text-script e x))))
-   m)
-
-addScript =
-#(define-music-function (parser location script music )
-					( string? ly:music? )
-		(add-text-script music script))
-
-\score {
-  {
-    \addScript "6" { c'4-3 }
-  }
-}
-
diff --git a/input/test/ambitus-mixed.ly b/input/test/ambitus-mixed.ly
deleted file mode 100644
index c30b8cb4f6..0000000000
--- a/input/test/ambitus-mixed.ly
+++ /dev/null
@@ -1,29 +0,0 @@
-
-\header {
-
-    texidoc = "Ambits can be added per voice. In that case, the
-ambitus must be moved manually to prevent collisions."
-
-}
-
-\version "2.10.0"
-
-\layout {
-    ragged-right = ##t
-}
-
-\new Staff <<
-    \new Voice \with {
-	\consists "Ambitus_engraver"
-    } \relative c'' {
-	\override Ambitus #'X-offset = #-1.0
-	\voiceOne
-	c4 a d e f2
-    }
-    \new Voice \with {
-	\consists "Ambitus_engraver"
-    } \relative c' {
-	\voiceTwo
-	es4 f g as b2
-    }
->>
diff --git a/input/test/ancient-font.ly b/input/test/ancient-font.ly
deleted file mode 100644
index 6ac4481693..0000000000
--- a/input/test/ancient-font.ly
+++ /dev/null
@@ -1,295 +0,0 @@
-\version "2.11.6"
-% TODO: split ancient-font into seperate files; possibly in
-% different locations.
-\header {
-texidoc = "@cindex Ancient Font
-Here are shown many (all?) of the symbols that are
-included in LilyPond's support of ancient notation.
-"
-}
-
-
-upperStaff = \new GregorianStaff =  "upperStaff" <<
-  \context GregorianVoice <<
-    \set Score.timing = ##f
-%   \set Score.forceAccidental = ##t %%%%%%%% FIXME: what happened to this property?
-
-    \override Staff.StaffSymbol  #'line-count = #4
-
-     \transpose c c {
-	\override Staff.KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
-	\override Staff.Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
-	\override NoteHead  #'style = #'vaticana.punctum
-	\key es \major
-	\clef "vaticana-fa2"
-	c!1 des! e! f! ges!
-
-	\override NoteHead  #'style = #'vaticana.inclinatum
-	a! b! ces'
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break % 1 (8*1)
-
-	\override NoteHead  #'style = #'vaticana.quilisma
-	b! des'! ges! fes!
-	\breathe
-	\clef "vaticana-fa1"
-	\override NoteHead  #'style = #'vaticana.plica
-	es d
-	\override NoteHead  #'style = #'vaticana.reverse.plica
-	c d
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break %2 (8*1)
-
-	\override NoteHead  #'style = #'vaticana.punctum.cavum
-	es f
-	\override NoteHead  #'style = #'vaticana.lpes
-	g as
-	\override NoteHead  #'style = #'vaticana.upes
-	bes as
-	\override NoteHead  #'style = #'vaticana.vupes
-	g f
-	\override NoteHead  #'style = #'vaticana.linea.punctum
-	\override Staff.BarLine  #'bar-size = #2.0 \bar "|"
-%	\break % 3 (8*1)
-
-	es d
-	\override NoteHead  #'style = #'vaticana.epiphonus
-	c d
-	\override NoteHead  #'style = #'vaticana.cephalicus
-	es f
-
-	\override Staff.KeySignature #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
-	\override Staff.Accidental #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
-	\override Staff.Custos  #'style = #'medicaea
-	\override NoteHead  #'style = #'medicaea.punctum
-	\clef "medicaea-fa2"
-	ces! des!
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break % 4 (8*1)
-
-	e! f! ges!
-	\clef "medicaea-do2"
-	\override NoteHead  #'style = #'medicaea.inclinatum
-	a! b! ces'!
-	\override NoteHead  #'style = #'medicaea.virga
-	b! a!
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break % 5 (8*1)
-
-	ges! fes!
-	\clef "medicaea-fa1"
-	\override NoteHead  #'style = #'medicaea.rvirga
-	e! des! ces!
-
-	\override Staff.KeySignature #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
-	\override Staff.Accidental #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
-	\override Staff.Custos  #'style = #'hufnagel
-	\override NoteHead  #'style = #'hufnagel.punctum
-	\clef "hufnagel-fa2"
-	ces! des! es!
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break % 6 (8*1)
-
-	fes! ges!
-	\clef "hufnagel-do2"
-	\override NoteHead  #'style = #'hufnagel.lpes
-	as! bes! ces'!
-	\override NoteHead  #'style = #'hufnagel.virga
-	bes! as!
-	\override Staff.BarLine  #'bar-size = #3.0 \bar "|"
-%	\break % 7 (8*1)
-
-	ges! fes!
-	\clef "hufnagel-do-fa"
-	\override NoteHead  #'style = #'hufnagel.punctum
-	es! des! ces! des! es! fes!
-	\bar "||"
-%	\break % 8 (8*1)
-
-	s32*1
-%	\break % 12 (32*1)
-    }
-  >>
->>
-
-lowerStaff = \new MensuralStaff =  "lowerStaff" <<
-  \context MensuralVoice <<
-    
-    % this is broken until further notice -- see refman
-    % \override Staff.StaffSymbol  #'line-count = #5
-    \applyOutput #'Staff #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'line-count 5)
-
-     \transpose c c {
-	\set autoBeaming = ##f
-	\override NoteHead  #'style = #'neomensural
-	\override Rest  #'style = #'neomensural
-	\key a \major
-
-% FIXME: lily crashes on some (invalid?) ligatures with:
-%   ERROR: In procedure gh_scm2int:
-%   ERROR: Wrong type argument in position 1: ()
-
-% FIXME: lily emits "Programming error: Infinity or NaN encountered"
-% on many ligatures such as BB.
-
-	cis'1 d'\breve gis'\breve e'\breve \[ e'\longa fis'\longa \]
-	\set Staff.forceClef = ##t
-	\clef "neomensural-c2"
-	cis1
-	\bar "|"
-%	\break % 2 (16*1)
-
-	\[ g\breve dis''\longa \]
-	b\breve \[ a\longa d\longa \]
-	\clef "petrucci-c2"
-%	\break % 4 (16*1)
-
-	fis1 ces1
-	\clef "petrucci-c2"
-	r\longa
-	\set Staff.forceClef = ##t
-	\clef "mensural-c2"
-	r\breve
-	\bar "|"
-%	\break % 5 (8*1)
-
-	r2
-	\clef "mensural-g"
-	r4 r8 r16 r16
-	\override NoteHead  #'style = #'mensural
-	\override Stem  #'flag-style = #'mensural
-	\override Stem  #'thickness = #1.0
-	\override Rest  #'style = #'mensural
-	\clef "petrucci-f"
-	c8 b, c16 b, c32 b, c64 b, c64 b,
-	d8 e  d16 e  d32 e  d64 e  d64 e
-	r\longa
-	\set Staff.forceClef = ##t
-	\clef "petrucci-f"
-	r\breve
-	\bar "|"
-%	\break % 6 (8*1)
-
-	r\breve 
-	\clef "mensural-f"
-	% FIXME: must set Stem flag-style to #'neomensural to avoid
-	% segmentation fault on r8/r16/r32.  (Strange: what has
-	% Stem flag-style to do with mensural rests?)
-	\override Stem  #'flag-style = #'neomensural
-	% FIXME: produces warnings about "flag `neomensurald4' (or 3) not found".
-	r2 r4 r8 r16 r16
-	\override Stem  #'flag-style = #'mensural
-	\set Staff.forceClef = ##t
-	\clef "mensural-f"
-	e\breve f g a1
-	\clef "mensural-g"
-%	\break % 7 (8*1)
-
-	\[ bes'!\longa a'!\longa c''!\longa \]
-	e'1 d' c' d' \bar "|"
-	\bar "|"
-%	\break % 9 (16*1)
-
-	bes'!\longa fis'!1 as'!1 ges'!\longa % lig
-	\set Staff.forceClef = ##t
-	\clef "mensural-g"
-	e'2 d' c' \bar "|"
-%	\break % 11 (16*1)
-
-	\set Staff.forceClef = ##t
-	\clef "petrucci-g"
-	c'2 d' e' f'
-	\clef "petrucci-g"
-	g' as'! bes'! cis''!
-	bes'! as'! gis'! fis'!
-	\set Staff.forceClef = ##t
-	\clef "mensural-g"
-	es'! des'! cis'!1 \bar "||"
-%	\break % 12 (8*1)
-    }
-  >>
->>
-
-\paper {
-	line-thickness = #(/ staff-space 5.0)
-}
-
-\score {
-    \context Score <<
-	\upperStaff
-	\lowerStaff
-    >>
-    \layout {
-% do we want to keep these settings? -gp
-	line-width = 17.25\cm
-	textheight = 26.0\cm
-	indent = 0.0
-	\context {
-	    \Score
-	    \accepts MensuralStaff
-	    \accepts GregorianStaff
-%	    timing = ##f %%%%%%%% FIXME: this has no effect
-	}
-	\context {
-	    \Voice
-	    \name MensuralVoice
-	    \alias Voice
-	    \remove Ligature_bracket_engraver
-	    \consists Mensural_ligature_engraver
-	    \override NoteHead #'style = #'mensural
-%	    \override Stem #'flag-style = #'mensural %%%%%%%% FIXME: this core dumps
-	    \override Stem #'thickness = #1.0
-	    \override Rest #'style = #'mensural
-	    autoBeaming = ##f
-	}
-	\context {
-	    \Voice
-	    \name GregorianVoice
-	    \alias Voice
-	    \remove Ligature_bracket_engraver
-%	    \consists Gregorian_ligature_engraver %%%%%%%% TODO: not yet implemented
-	    \override NoteHead #'style = #'vaticana.punctum
-	    autoBeaming = ##f
-	}
-	\context {
-	    \Staff
-	    \name MensuralStaff
-	    \alias Staff
-	    \accepts MensuralVoice
-	    \consists Custos_engraver
-	    \override TimeSignature #'style = #'mensural
-	    \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
-	    \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
-	    \override Custos #'style = #'mensural
-	    \override Custos #'neutral-position = #3
-	    \override Custos #'neutral-direction = #down
-	    clefGlyph = #"clefs.petrucci.c2"
-	    clefPosition = #-2
-	    clefOctavation = #0 
-	}
-	\context {
-	    \Staff
-	    \name GregorianStaff
-	    \alias Staff
-	    \accepts GregorianVoice
-	    \consists Custos_engraver
-	    \remove Time_signature_engraver
-	    \override StaffSymbol #'thickness = #2.0
-	    \override StaffSymbol #'line-count = #4
-	    \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
-	    \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
-	    \override Custos #'style = #'vaticana
-	    \override Custos #'neutral-position = #4
-	    \override Custos #'neutral-direction = #down
-	    clefGlyph = #"clefs.vaticana.do"
-	    clefPosition = #1
-	    clefOctavation = #0 
-	}
-	\context {
-	    \RemoveEmptyStaffContext
-	    \accepts MensuralVoice
-	    \accepts GregorianVoice
-        }
-    }
-}
-
diff --git a/input/test/ancient-time.ly b/input/test/ancient-time.ly
deleted file mode 100644
index 31eae53456..0000000000
--- a/input/test/ancient-time.ly
+++ /dev/null
@@ -1,17 +0,0 @@
-\version "2.10.0"
-% TODO: move stuff from ancient-font into here?  See comment
-% for ancient-font.ly
-\header {
-texidoc="@cindex Ancient Time Signatures
-Time signatures may also be engraved in an old style.
-"
-}
-
-\score {
-   { 
-    \override Staff.TimeSignature  #'style = #'neomensural
-    s1 
-  }
-	\layout {ragged-right = ##t}
-}
-
diff --git a/input/test/bar-always.ly b/input/test/bar-always.ly
deleted file mode 100644
index c1c58ef01f..0000000000
--- a/input/test/bar-always.ly
+++ /dev/null
@@ -1,19 +0,0 @@
-
-\version "2.10.0"
-\header {
-
-    texidoc = "@cindex Bars Always
-
-By setting @code{barAlways} and @code{defaultBarType}, barlines may be inserted automatically everywhere."
-
-}
-
-
-\score {
-	 \relative c''{
-		\set Score.barAlways = ##t
-		\set Score.defaultBarType = ":|:"
-		c4 c4 c4 c4 }
-	\layout{ragged-right = ##t}
-}
-
diff --git a/input/test/bar-lines-lyric-only.ly b/input/test/bar-lines-lyric-only.ly
deleted file mode 100644
index 13fa76ed53..0000000000
--- a/input/test/bar-lines-lyric-only.ly
+++ /dev/null
@@ -1,38 +0,0 @@
-\version "2.10.0"
-\header { texidoc = "@cindex Bar line lyric only
-You can move @code{Bar_engraver} and @code{Span_bar_engraver} to 
-a different engraving context, if you want, for example, bar lines 
-on lyrics. "
-}
-
-\score {
-    \relative c' \context ChoirStaff <<
-	\new Staff { c1 c1 c1}
-	\lyricmode <<
-	    \new Lyrics  { bla1 die bla }
-	>>
-	\new Staff { c1 c1 c1} 
-    >>
-
-
-    \layout  {
-	ragged-right = ##t
-	\context {
-	    \Lyrics
-	    \consists Bar_engraver
-
-
-	    %% need procedure, since lyrics doesn't have a staff_sym engraver.
-	    \override BarLine #'bar-size = #3.0
-	}
-	\context{
-	    \ChoirStaff
-	    \remove "Span_bar_engraver"
-	}
-	\context {
-	    \Staff
-	    \remove "Bar_engraver"
-	}
-    }
-}
-
diff --git a/input/test/bar-number-every-five-reset.ly b/input/test/bar-number-every-five-reset.ly
deleted file mode 100644
index fe08b08682..0000000000
--- a/input/test/bar-number-every-five-reset.ly
+++ /dev/null
@@ -1,30 +0,0 @@
-\version "2.10.0"
-
-\header {
-    texidoc = "@cindex Bar Number Every Fifth Reset
-If you would like the bar numbers to appear at regular intervals, but
-not starting from measure zero, you can use a context function,
-@code{set-bar-number-visibility}, to set automatically
-@code{barNumberVisibility}, so that the bar numbers appear at regular
-intervals, starting from the measure in which 
-@code{set-bar-number-visibility} is set using @code{\applyContext}.
-"
-
-}
-
-resetBarnum = \context Score \applyContext
-  #(set-bar-number-visibility 4)
-\score {
-    <<
-         \transpose c c'' {
-	    \override Score.BarNumber  #'break-visibility =#end-of-line-invisible
-	    \override Score.RehearsalMark  #'padding = #2.5
-	    \mark "A" \resetBarnum
-	    \repeat unfold 10 c1
-	    \mark \default \resetBarnum
-	    \repeat unfold 8 c
-            \bar "|."
-        }
-    >>
-\layout{ragged-right = ##t}
-}
diff --git a/input/test/bar-number-show-all.ly b/input/test/bar-number-show-all.ly
deleted file mode 100644
index f6a1afc3ce..0000000000
--- a/input/test/bar-number-show-all.ly
+++ /dev/null
@@ -1,20 +0,0 @@
-
-\version "2.10.0"
-\header{
-    texidoc="@cindex Bar Number Show All
-By default, bar numbers are printed only in the first measure.  This 
-setting can be overridden, so that bar numbers on start of every measure.
-" }
-
-\score{
-    \relative c'{
-	c1 c c
-	\override Score.BarNumber 
-	    #'break-visibility = #end-of-line-invisible
-	\break
-	c c c
-    }
-	\layout{ ragged-right = ##t }
-}
-
-
diff --git a/input/test/beam-alternate.ly b/input/test/beam-alternate.ly
deleted file mode 100644
index 9d599d91da..0000000000
--- a/input/test/beam-alternate.ly
+++ /dev/null
@@ -1,34 +0,0 @@
-
-\header {
-
-    texidoc = "The eighth notes may be seemingly attached to different
-    beams, and the corresponding notes connected by ties (see also
-    @file{tie-cross-voice.ly}). 
-    Such a situation may occur, for example, in the cello suites."
-
-}
-
-\version "2.10.0"
-
-wipeNote = {
-    \once \override NoteHead #'transparent = ##t
-    \once \override Stem #'transparent = ##t 
-}
-\layout { ragged-right = ##t }
-
-
-\relative c''<< {
-    c8[~
-       \wipeNote
-       c8
-       c8~
-       \wipeNote
-       c
-       c]~
-    \wipeNote
-    c\noBeam
-}\\
-   { s8 c8 [ s c s c] }
-
-   
->>
diff --git a/input/test/beam-auto-4-8.ly b/input/test/beam-auto-4-8.ly
deleted file mode 100644
index 4a8c426716..0000000000
--- a/input/test/beam-auto-4-8.ly
+++ /dev/null
@@ -1,39 +0,0 @@
-
-%% \version "2.10.0"
-
-%% keep for now, although merging into beam-auto-override is a possibility.
-\header {
-	texidoc = "@cindex Auto Beaming 4/8
-You can override the automatic beaming settings.
-"
-}
-
-\layout{ragged-right = ##t}
-
-\relative c''{
-  \time 4/8
-
-%{
-    the default for 4/8 (see scm/auto-beam.scm)
-     ----  --------
-     |  |  |   |--|
-    x| x| x|  x| x|
-%}
-  c8 c c c16 c
-
-%{
-    user override
-     --------------
-     |  |  |   |--|
-    x| x| x|  x| x|
-%}
-  %% This has now (2.5.21) changed, (end * * * *) no longer
-  %% masks the default config entry ('(end * * 4 8) 1 4))
-  %% rather than masking by override:
-  %% #(override-auto-beam-setting '(end * * * *) 2 4)
-  %% revert the config file setting.
-  #(revert-auto-beam-setting '(end * * 4 8) 1 4)
-  c8 c c c16 c
-}
-    
-
diff --git a/input/test/beam-auto-override.ly b/input/test/beam-auto-override.ly
deleted file mode 100644
index ef8f544599..0000000000
--- a/input/test/beam-auto-override.ly
+++ /dev/null
@@ -1,55 +0,0 @@
-
-%% ugh
-%% \version "2.10.0"
-
-\header {
-
-    texidoc = "@cindex Auto Beaming Override
-
-The auto-beamer, which can be overridden, will only engrave beams 
-that end before encountering of 
-@itemize @bullet
-@item a rest,
-@item
- an other, manually entered beam, or
-@item
- a bar line. 
-@end itemize
-
-The @code{autoBeaming} can also be turned off.
-
-"
-
-}
-
-%% TODO: check doc string. -hw
-
-\layout{ragged-right = ##t}
-\relative c''{
-  %% This has now (2.5.21) changed, (end * * * *) no longer
-  %% masks the default config entry ('(end * * 2 4) 1 4))
-  %% rather than masking by override:
-  %% #(override-auto-beam-setting '(end * * * *) 1 2)
-  %% revert the config file setting.
-  #(revert-auto-beam-setting '(end * * 2 4) 1 4)
-  \time 2/4
-  
-  %% one beam per measure
-  c8 c c c
-  c16 c c c c c c c
-  
-  %% from here on consider ending beam every 1/4 note
-  #(override-auto-beam-setting '(end * * * *) 1 4)
-
-  c8 c c c
-  %% manually override autobeam with weird beaming
-  c8  c[ c] c
-  c8 c c r
-  c8 c c4
-  r8 c c c
-  %% no autobeaming
-  \set autoBeaming = ##f
-  c8 c c c
-}
-
-
diff --git a/input/test/beam-control.ly b/input/test/beam-control.ly
deleted file mode 100644
index f9b7b6d1c7..0000000000
--- a/input/test/beam-control.ly
+++ /dev/null
@@ -1,21 +0,0 @@
-
-\version "2.10.0"
-\header{
-    texidoc="@cindex Beam Position Control
-
-Beam positions may be controlled manually, by overriding the @code{positions} setting of the @code{Beam} grob.
-
-" }
-\score { 
-    \context Voice \relative c {
-	%% from upper staffline (position 4) to centre (position 0)
-	\override Beam  #'positions = #'(2 . 0)
-	 c'8[ c] 
-	
-	%% from center to one above centre (position 2)
-	\override Beam  #'positions = #'(0 . 1)
-	 c[ c]
-  }
-\layout{ragged-right = ##t}
-}
-
diff --git a/input/test/beam-count.ly b/input/test/beam-count.ly
deleted file mode 100644
index 9ceb691cf4..0000000000
--- a/input/test/beam-count.ly
+++ /dev/null
@@ -1,27 +0,0 @@
-
-%%\version "2.10.0"
-\header{
-	texidoc="@cindex Beam Count
-
-You can alter the number of stems in a beam.  In this example,
-two sets of four 32nds are joined, as if they were 8th notes.
-
-" }
-
-\layout { ragged-right = ##t}  
-
-\relative {
-  %% This has now (2.5.21) changed, (end * * * *) no longer
-  %% masks the default config entry ('(end * * 2 4) 1 4))
-  %% rather than masking by override:
-  %% #(override-auto-beam-setting '(end * * * *) 1 4)
-  %% revert the config file settings.
-  #(revert-auto-beam-setting '(end 1 32 4 4) 1 8)
-  #(revert-auto-beam-setting '(end 1 32 4 4) 3 8)
-  f32 g a b b a g f
-
-  f32 g a 
-  \set stemRightBeamCount = #1  b
-  \set stemLeftBeamCount = #1 b
-  a g f
-}
diff --git a/input/test/boxed-stencil.ly b/input/test/boxed-stencil.ly
deleted file mode 100644
index c94f272d25..0000000000
--- a/input/test/boxed-stencil.ly
+++ /dev/null
@@ -1,29 +0,0 @@
-
-\version "2.10.0"
-\header {
-  texidoc = "@cindex Boxed Stencil
-
-The @code{print-function} can be overridden to draw a box around an arbitrary 
-grob. " }
-
-
-\layout{ragged-right = ##t}
-\relative c''  {
-
-  \override TextScript  #'stencil =
-  #(make-stencil-boxer 0.1 0.3 ly:text-interface::print)
-
-  c'4^"foo"
-
-  \override Stem  #'stencil =
-  #(make-stencil-boxer 0.05 0.25 ly:stem::print)
-
-  \override Score.RehearsalMark  #'stencil =
-  #(make-stencil-boxer 0.15 0.3 ly:text-interface::print)
-  b8
-  \revert Stem #'stencil
-
-
-  c4. c4 \mark "F" c1 
-}
-
diff --git a/input/test/extra-staff.ly b/input/test/extra-staff.ly
deleted file mode 100644
index 4ea143850f..0000000000
--- a/input/test/extra-staff.ly
+++ /dev/null
@@ -1,57 +0,0 @@
-
-\version "2.10.0"
-
-% definitely wil be renamed to something.
-%{
-(Message vers:9)
-To: Adrian Mariano <adrian@camcornelledu>.
-cc: gnu-music-discuss@gnu.org
-Subject: Re: Switching from one staff to two staves 
-Reply-To: janneke@gnu.org
-In-reply-to: Your message of "Tue, 19 Jan 1999 12:27:10 EST."
-             <199901191727.MAA29757@avalanchecamcornelledu>. 
-Date: Wed, 20 Jan 1999 09:39:22 +0100
-From: Jan Nieuwenhuizen <jan@beavis-nt>
-
-On Tuesday, 19 January 1999, Adrian Mariano writes:
-
->> I want to typeset something which starts out with just one staff and then
->> harmony comes in and there are two staves.  I can't figure out how to do
->> this.  I get an extra blank staff during the second section (using
->> Lily 1.1.15):
-
-There used to be an example called 'multi.ly'...
-Try this (we'll include it in pl23/24):
-
-extra-staff.ly:
-%}
-
-
-\header{ texidoc="@cindex Staff Extra
-@cindex Staff Ossia
-You can add (possibly temporarily) an extra staff after the beginning of 
-a piece. "
-}
-
-\score {
-	<<
-		\new Staff \relative c''{ c1 c c c c }
-		\new StaffGroup \relative c''{ 
-			\new Staff 
-			c1 c
-			<< c1 \new Staff { c1 } >>
-			c
-		}
-	>>
-  	\layout {
-		ragged-right = ##t
-		\context{
-			\Score
-
-		}
-	}
-}
-
-
-
-
diff --git a/input/test/fret-diagram.ly b/input/test/fret-diagram.ly
deleted file mode 100644
index 6935693edf..0000000000
--- a/input/test/fret-diagram.ly
+++ /dev/null
@@ -1,53 +0,0 @@
-\header
-{
-  texidoc = "Frets are supported as markup commands."
-}
-
-\version "2.10.0"
-
-\score {
-    <<
-       \chords {d2 d d s fis fis fis s c c c}
-       
-     \new Voice = "mel" {
-% simple D chord
-
-    d'2 ^\markup \fret-diagram-verbose #'((mute 6) (mute 5) (open 4) (place-fret 3 2) (place-fret 2 3) (place-fret 1 2))
-    d' ^\markup \fret-diagram #"6-x;5-x;4-o;3-2;2-3;1-2;"
-    d' ^\markup \fret-diagram-terse #"x;x;o;2;3;2;"
-    r \break
-% fis major chord, 3/4 size, fingering labeled below string
-    
-    fis' ^\markup \override #'(size . 0.75) {\override #'(finger-code . below-string){\fret-diagram-verbose #'((place-fret 6 2 1) (barre 6 1 2) (place-fret 5 4 3) (place-fret 4 4 4) (place-fret 3 3 2) (place-fret 2 2 1) (place-fret 1 2 1))}}
-    fis' ^\markup \override #'(finger-code . below-string) {\fret-diagram #"s:0.75;c:6-1-2;6-2-1;5-4-3;4-4-4;3-3-2;2-2-1;1-2-1;"}
-    fis' ^\markup \override #'(size . 0.75) {\override #'(finger-code . below-string){\fret-diagram-terse #"2-1-(;4-3;4-4;3-2;2-1;2-1-);"}}
-    r \break
-
-% c major barre chord, fingering labeled on frets
-   c' ^\markup \override #'(dot-color . white) {
-                \override #'(finger-code . in-dot) 
-                \fret-diagram-verbose #'((mute 6) (place-fret 5 3 1) (place-fret 4 5 2) (place-fret 3 5 3) (place-fret 2 5 4) (place-fret 1 3 1) (barre 5 1 3)) }
-   c' ^\markup \override #'(barre-type . straight) \fret-diagram #"f:1;c:5-1-3;6-x;5-3-1;4-5-2;3-5-3;2-5-4;1-3-1;"
-   c' ^\markup  \override #'(dot-radius . 0.35) {
-                \override #'(finger-code . in-dot) {
-                \override #'(dot-color . white) {
-                \fret-diagram-terse #"x;3-1-(;5-2;5-3;5-4;3-1-);"}}}
-   r  \break
-   
-% c major scale using open strings
-  c' ^\markup \fret-diagram-verbose #'((mute 6) (place-fret 5 3) (open 4) (place-fret 4 2) (place-fret 4 3) (open 3) (place-fret 3 2)  (open 2) (place-fret 2 1) (mute 1))
-  c' ^\markup \fret-diagram #'"6-x;5-3;4-o;4-2;4-3;3-o;3-2;2-o;2-1;1-x;"
-  c' ^\markup \fret-diagram-terse #'"x;3;2 3;o 2;o 1;x;"
-
-% c major scale using no open strings
-  c' ^\markup \fret-diagram-verbose #'((mute 6) (place-fret 5 3) (place-fret 5 5) (place-fret 4 2) (place-fret 4 3) (place-fret 4 5) (place-fret 3 2)  (place-fret 3 4) (place-fret 3 5) (mute 2) (mute 1))
-  c' ^\markup \fret-diagram #'"6-x;5-3;5-5;4-2;4-3;4-5;3-2;3-4;3-5;2-x;1-x;"
-  c' ^\markup \fret-diagram-terse #'"x;3 5;2 3 5;2 4 5;x;x;"
-  \break
-  
-% g major scale, no open strings, two octaves on six strings, white dots
-  g' ^\markup \override #'(dot-color . white) {\fret-diagram-terse #'"3 5;2 3 5;2 4 5;2 4 5;3 5;2 3;" }
-  r r r}
-    >>
-  \layout{ ragged-right = ##f }
-}
diff --git a/input/test/instrument-name-grandstaff.ly b/input/test/instrument-name-grandstaff.ly
deleted file mode 100644
index ee6d86b56a..0000000000
--- a/input/test/instrument-name-grandstaff.ly
+++ /dev/null
@@ -1,19 +0,0 @@
-\version "2.10.0"
-\header { texidoc = "@cindex Instrument Name Grandstaff
-You can have a name for the whole @code{GrandStaff} in addition to 
-individual @code{Staff}s. " }
-
-\score {
-  
-   \new GrandStaff <<
-    \new Staff =  "treble"    {
-      \set GrandStaff.instrumentName = "Violini  "
-      \set Staff.instrumentName = " vn I" { c''4 }}
-    \new Staff =  "bass" { \set Staff.instrumentName = " vn II" c''4 }>>
-
-
-\layout {
-ragged-right = ##t
-\context { \GrandStaff \consists "Instrument_name_engraver" }
-}}
-
diff --git a/input/test/mensural-ligatures.ly b/input/test/mensural-ligatures.ly
deleted file mode 100644
index 5b52f3e93b..0000000000
--- a/input/test/mensural-ligatures.ly
+++ /dev/null
@@ -1,86 +0,0 @@
-\version "2.10.0"
-% TODO:
-% check with ancient- stuff.  rename, merge, something.  -gp
-
-\header { texidoc = "@cindex Ancient Mensural Ligatures
-In mensural ligatures, notes with ancient durations are printed
-in a tight manner."
-}
-
-
-
-% Note that the horizontal alignment of the fermatas obeys to the
-% graphical width of the ligatures rather to the musical moment in time.
-% This is intended behaviour.
-
-voice =  \transpose c c' {
-  \set Score.timing = ##f
-  \set Score.defaultBarType = "empty"
-  g\longa c\breve a\breve f\breve d'\longa^\fermata
-  \bar "|"
-  \[
-    g\longa c\breve a\breve f\breve d'\longa^\fermata
-  \]
-  \bar "|"
-  e1 f1 a\breve g\longa^\fermata
-  \bar "|"
-  \[
-    e1 f1 a\breve g\longa^\fermata
-  \]
-  \bar "|"
-  e1 f1 a\breve g\longa^\fermata
-  \bar "||"
-}
-
-\paper {
-    line-thickness = \staff-space / 5.0
-}
-\score {
-    \context ChoirStaff <<
-	\new MensuralStaff <<
-	    \context MensuralVoice <<
-		\voice
-	    >>
-	>>
-	\new Staff <<
-	    \context Voice <<
-		\voice
-	    >>
-	>>
-    >>
-    \layout {
-	\context {
-	    \Voice
-	    \name MensuralVoice
-	    \alias Voice
-	    \remove Ligature_bracket_engraver
-	    \consists Mensural_ligature_engraver
-	    \override NoteHead #'style = #'mensural
-	}
-	\context {
-	    \Staff
-	    \name MensuralStaff
-	    \alias Staff
-	    \accepts MensuralVoice
-	    \consists Custos_engraver
-	    \override TimeSignature #'style = #'mensural
-	    \override KeySignature #'style = #'mensural
-	    \override Accidental #'style = #'mensural
-	    \override Custos #'style = #'mensural
-	    \override Custos #'neutral-position = #3
-	    \override Custos #'neutral-direction = #down
-	    clefGlyph = #"clefs.petrucci.g"
-	    clefPosition = #-2
-	    clefOctavation = #-0
-	}
-	\context {
-	    \RemoveEmptyStaffContext
-	    \accepts MensuralVoice
-        }
-	\context {
-	    \Score
-	    \accepts MensuralStaff
-	}
-    }
-}
-
diff --git a/input/test/mensural-note-heads.ly b/input/test/mensural-note-heads.ly
deleted file mode 100644
index 4097392568..0000000000
--- a/input/test/mensural-note-heads.ly
+++ /dev/null
@@ -1,19 +0,0 @@
-
-\version "2.10.0"
-
-\header {
-    texidoc ="@cindex Ancient Mensural Note Heads
-Mensural notes may also have note heads. "
-}
-
-\score {
-	 {
-	\relative c'' {
-		\override NoteHead  #'style = #'mensural
-		c\maxima*1/8
-		c\longa*1/4 c\breve*1/2 c1 c2 c4 c8 
-		}
-	}
-	\layout{ragged-right=##t}
-}
-
diff --git a/input/test/no-key-at-end-of-line.ly b/input/test/no-key-at-end-of-line.ly
deleted file mode 100644
index 4f478c5adf..0000000000
--- a/input/test/no-key-at-end-of-line.ly
+++ /dev/null
@@ -1,18 +0,0 @@
-\version "2.10.0"
-\header {
-
-    texidoc = "@cindex Key Signature End of Line
-According to normal typesetting conventions, LilyPond typesets key
-changes at the end of the line, when the change appears at a line break.
-This example shows how to change this default to only print the
-new key signature at the beginning of the next line.
-" }
-
-\score {
-   \relative c' {
-    \set Staff.explicitKeySignatureVisibility = #end-of-line-invisible
-    c d e f | g a b c | \break
-    \key d \major
-    d cis b a | g fis e d |
-  }
-}
diff --git a/input/test/reverse-music.ly b/input/test/reverse-music.ly
deleted file mode 100644
index 2d9491027b..0000000000
--- a/input/test/reverse-music.ly
+++ /dev/null
@@ -1,46 +0,0 @@
-\version "2.10.0"
-\sourcefilename "reverse-music.ly"
-
-% possible rename to scheme-something.
-\header { texidoc="@cindex Scheme Reverse Music
-Symmetric, or palindromical music can be produced, first, by printing
-some music, and second, by printing the same music applying a Scheme
-function to reverse the syntax.
-"
-}
-
-#(define (reverse-music music)
-  (let* ((elements (ly:music-property music 'elements))
-         (reversed (reverse elements))
-         (e (ly:music-property music 'element))
-         (span-dir (ly:music-property music 'span-direction)))
-
-    (ly:music-set-property! music 'elements reversed)
-
-    (if (ly:music? e)
-        (ly:music-set-property!
-         music 'element
-         (reverse-music e)))
-
-    (if (ly:dir? span-dir)
-        (ly:music-set-property! music 'span-direction (- span-dir)))
-
-    (map reverse-music reversed)
-
-    music))
-
-reverseMusic =
-#(define-music-function (parser location m) (ly:music?)
-		(reverse-music m)
-	)	
-
-music =  \relative c'' { c4 d4( e4 f4 }
-
-\score {
-\context Voice {
-    \music
-    \reverseMusic \music
-  }
-  \layout { ragged-right = ##t}
-}
-
diff --git a/input/test/slur-manual.ly b/input/test/slur-manual.ly
deleted file mode 100644
index db6b8c97a6..0000000000
--- a/input/test/slur-manual.ly
+++ /dev/null
@@ -1,43 +0,0 @@
-\version "2.10.0"
-\header {
-
-
-    texidoc = "In extreme cases, you can resort to setting the 
-    @code{control-points} of a slur manually, althout it involves 
-    a lot of trial and error. Be sure to force line breaks at both sides, since
-    different horizontal spacing will require rearrangement of the
-    slur."
- 
-    }
-
-\score {
-     \new PianoStaff
-    <<
-	\new Staff =  "up" {
-	    \clef bass
-	    s1 * 4
-	} 
-	\new Staff =  "down" \relative c <<
-	    s1*4
-	    {
-	    \clef bass
-	    r4 r8
-	    \once\override Slur  #'extra-offset = #'(0 . 6)
-	    \once\override Slur  #'control-points =
-	    #'((0 . -4) (2 . 0) (60 . 0) (63 . 4))
-	    c8( as' f c' as
-
-	    % line breaks will mess up this example  
-	    \noBreak
-	    f c as' f
-	    \change Staff = up
-	    \clef treble
-	    c' as f' c
-    	    \noBreak
-	    as' f c' as
-	    f' c as' f c'4)
-	}>>
-    >>
-    \layout {  }
-}
-
diff --git a/input/test/slur-minimum-length.ly b/input/test/slur-minimum-length.ly
deleted file mode 100644
index 96a50d77fd..0000000000
--- a/input/test/slur-minimum-length.ly
+++ /dev/null
@@ -1,16 +0,0 @@
-
-\version "2.10.0"
-
-\header { texidoc = "@cindex Slur Minimum Length
-By setting the minimum length of a slur, notes are more separated. " 
-}
-
-\score{
-	\relative c''{
-		\time 2/4
-		\override Slur  #'minimum-length = #40
-		c(c)
-		c~c\break
-		}
-}
-
diff --git a/input/test/staff-lines.ly b/input/test/staff-lines.ly
deleted file mode 100644
index 8a04b83a07..0000000000
--- a/input/test/staff-lines.ly
+++ /dev/null
@@ -1,34 +0,0 @@
-
-\version "2.10.0"
-
-\header {
-
-    texidoc="@cindex Staff Lines 
-The number of lines in a staff may changed by overriding @code{line-count}
-in the properties of @code{StaffSymbol}.
-"
-	  
-}
-
-
-upper = \relative c'' {
-  c1 d e f
-}
-
-lower = \relative c {
-  c1 b a g
-}
-
-\score {
-  \context PianoStaff <<
-    \new Staff <<
-      \upper
-    >>  
-    \new Staff  {
-	\override Staff.StaffSymbol  #'line-count = #4 
-        \clef bass
-        \lower
-    }
-  >>
-  \layout { ragged-right=##t}  
-}
-- 
2.39.5