From: fred <fred>
Date: Wed, 27 Mar 2002 02:02:40 +0000 (+0000)
Subject: lilypond-1.5.8
X-Git-Tag: release/1.5.59~480
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=3994a33b26be83a455744761e2544ad1f7622b6e;p=lilypond.git

lilypond-1.5.8
---

diff --git a/input/emacs-lily.fly b/input/emacs-lily.fly
deleted file mode 100644
index fefa8e317e..0000000000
--- a/input/emacs-lily.fly
+++ /dev/null
@@ -1,2 +0,0 @@
-\
-cpp -P -traditional -o l-fake.ly  -DFAKE_GRACE les-nereides.ly
diff --git a/ly/a4-init.ly b/ly/a4-init.ly
deleted file mode 100644
index 8c729c5f5b..0000000000
--- a/ly/a4-init.ly
+++ /dev/null
@@ -1,5 +0,0 @@
-\version "1.3.146"
-% a4.ly
-
-hsize = 210.0 \mm
-vsize = 296.9 \mm
diff --git a/ly/accordion-defs-init.ly b/ly/accordion-defs-init.ly
deleted file mode 100644
index f363efc71d..0000000000
--- a/ly/accordion-defs-init.ly
+++ /dev/null
@@ -1,56 +0,0 @@
-\version "1.3.146"
-% Symbols needed to print accordion music
-% 
-%  2' = T
-%  4' = F
-%  8' = E
-% 16' = S
-%
-
-accDiscant = \script "accDiscant"
-accDiscantF = \script "accDiscantF"
-accDiscantE = \script "accDiscantE"
-accDiscantEh = \script "accDiscantEh"
-accDiscantFE = \script "accDiscantFE"
-accDiscantFEh = \script "accDiscantFEh"
-accDiscantEE = \script "accDiscantEE"
-accDiscantFEE = \script "accDiscantFEE"
-accDiscantEEE = \script "accDiscantEEE"
-accDiscantFEEE = \script "accDiscantFEEE"
-accDiscantS = \script "accDiscantS"
-accDiscantFS = \script "accDiscantFS"
-accDiscantES = \script "accDiscantES"
-accDiscantEhS = \script "accDiscantEhS"
-accDiscantFES = \script "accDiscantFES"
-accDiscantFEhS = \script "accDiscantFEhS"
-accDiscantEES = \script "accDiscantEES"
-accDiscantFEES = \script "accDiscantFEES"
-accDiscantEEES = \script "accDiscantEEES"
-accDiscantFEEES = \script "accDiscantFEEES"
-accDiscantSS = \script "accDiscantSS"
-accDiscantESS = \script "accDiscantESS"
-accDiscantEESS = \script "accDiscantEESS"
-accDiscantEEESS = \script "accDiscantEEESS"
-
-accFreebase = \script "accFreebase"
-accFreebaseF = \script "accFreebaseF"
-accFreebaseE = \script "accFreebaseE"
-accFreebaseFE = \script "accFreebaseFE"
-
-accBayanbase = \script "accBayanbase"
-accBayanbaseT = \script "accBayanbaseT"
-accBayanbaseE = \script "accBayanbaseE"
-accBayanbaseTE = \script "accBayanbaseTE"
-accBayanbaseEE = \script "accBayanbaseEE"
-accBayanbaseTEE = \script "accBayanbaseTEE"
-
-accStdbase = \script "accStdbase"
-accStdbaseFE = \script "accStdbaseFE"
-accStdbaseTFE = \script "accStdbaseTFE"
-accStdbaseMES = \script "accStdbaseMES"
-accStdbaseTFMES = \script "accStdbaseTFMES"
-
-accSB = \script "accSB"
-accBB = \script "accBB"
-accOldEE = \script "accOldEE"
-accOldEES = \script "accOldEES"
diff --git a/ly/book-init-init.ly b/ly/book-init-init.ly
deleted file mode 100644
index f12fc8683b..0000000000
--- a/ly/book-init-init.ly
+++ /dev/null
@@ -1,14 +0,0 @@
-% Toplevel initialisation file. 
-	
-\version "1.3.146"
-
-
-\include "declarations-init.ly"
-\include "paper16-init.ly"
-
- \paper{
-	\paperSixteen
-}
-
-
-\maininput
diff --git a/ly/catalan.ly b/ly/catalan.ly
deleted file mode 100644
index 74d42851d1..0000000000
--- a/ly/catalan.ly
+++ /dev/null
@@ -1,74 +0,0 @@
-%{
-
- Common catalan names for notes. "b" means flat (bemoll), "d" means sharp (diesi).
- Also "s" is included for sharp (sostingut).  Both "diesi" and "sostingut" are approved
- by "Diccionari de la Llengua Catalana" from "Institut d'Estudis Catalans".
-
- Adapted from italiano.ly.
-
- English: a   b   c   d   e   f   g
- Catalan: la  si  do  re  mi  fa  sol
-
- For spanish naming just use the sharp sign "s" (sostenido) instead of "s"
-(sostenido) .
-%}
-
-% contributed by Jaume Obrador <jobrador@ipc4.uib.es>
-
-
-% For using "sostingut" notation, which is also correct
-\pitchnames #`(
-	(dobb . ,(make-pitch -1 0 -2 ))
-	(dob . ,(make-pitch -1 0 -1 ))
-	(do . ,(make-pitch -1 0 0 ))
-	(dod . ,(make-pitch -1 0 1 ))
-	(dodd . ,(make-pitch -1 0 2 ))
-	(rebb . ,(make-pitch -1 1 -2 ))
-	(reb . ,(make-pitch -1 1 -1 ))
-	(re . ,(make-pitch -1 1 0 ))
-	(red . ,(make-pitch -1 1 1 ))
-	(redd . ,(make-pitch -1 1 2 ))
-	(mibb . ,(make-pitch -1 2 -2 ))
-	(mib . ,(make-pitch -1 2 -1 ))
-	(mi . ,(make-pitch -1 2 0 ))
-	(mid . ,(make-pitch -1 2 1 ))
-	(midd . ,(make-pitch -1 2 2 ))
-	(fabb . ,(make-pitch -1 3 -2 ))
-	(fab . ,(make-pitch -1 3 -1 ))
-	(fa . ,(make-pitch -1 3 0 ))
-	(fad . ,(make-pitch -1 3 1 ))
-	(fadd . ,(make-pitch -1 3 2 ))
-	(solbb . ,(make-pitch -1 4 -2 ))
-	(solb . ,(make-pitch -1 4 -1 ))
-	(sol . ,(make-pitch -1 4 0 ))
-	(sold . ,(make-pitch -1 4 1 ))
-	(soldd . ,(make-pitch -1 4 2 ))
-	(labb . ,(make-pitch -1 5 -2 ))
-	(lab . ,(make-pitch -1 5 -1 ))
-	(la . ,(make-pitch -1 5 0 ))
-	(lad . ,(make-pitch -1 5 1 ))
-	(ladd . ,(make-pitch -1 5 2 ))
-	(sibb . ,(make-pitch -1 6 -2 ))
-	(sib . ,(make-pitch -1 6 -1 ))
-	(si . ,(make-pitch -1 6 0 ))
-	(sid . ,(make-pitch -1 6 1 ))
-	(sidd . ,(make-pitch -1 6 2 ))
-	(dos . ,(make-pitch -1 0 1 ))
-	(doss . ,(make-pitch -1 0 2 ))
-	(res . ,(make-pitch -1 1 1 ))
-	(ress . ,(make-pitch -1 1 2 ))
-	(mis . ,(make-pitch -1 2 1 ))
-	(miss . ,(make-pitch -1 2 2 ))
-	(fas . ,(make-pitch -1 3 1 ))
-	(fass . ,(make-pitch -1 3 2 ))
-	(sols . ,(make-pitch -1 4 1 ))
-	(solss . ,(make-pitch -1 4 2 ))
-	(las . ,(make-pitch -1 5 1 ))
-	(lass . ,(make-pitch -1 5 2 ))
-	(sis . ,(make-pitch -1 6 1 ))
-	(siss . ,(make-pitch -1 6 2 ))
-)
-
-
-
-\version "1.3.146"
diff --git a/ly/center-init.ly b/ly/center-init.ly
deleted file mode 100644
index 72ecace841..0000000000
--- a/ly/center-init.ly
+++ /dev/null
@@ -1,15 +0,0 @@
-% Toplevel initialisation file. 
-	
-\version "1.3.146"
-
-
-\include "declarations-init.ly"
-\include "paper16-init.ly"
-
- \paper { 
-  \paperSixteen
-%  linewidth = 7.\cm
-  linewidth = 11.\cm
-}
-
-\maininput
diff --git a/ly/chord-modifiers-init.ly b/ly/chord-modifiers-init.ly
deleted file mode 100644
index dd82fdb331..0000000000
--- a/ly/chord-modifiers-init.ly
+++ /dev/null
@@ -1,17 +0,0 @@
-\version "1.3.146"
-
-% urg!
-%
-\chordmodifiers #`(
-	(m . ,(make-pitch 0 2 -1 ))
-	(min . ,(make-pitch 0 2 -1 ))
-	(aug . ,(make-pitch 0 4 1 ))
-	;; (dim . ,(make-pitch -100 4 -1 ))	
-	(dim . ,(make-pitch -100 2 -1 ))
-	;; urg, not actually a chord-modifier, but it works
-	;;  c7 -> <c bes>, c 7+ -> c b
-	(maj . ,(make-pitch 0 6 1 ))
-	;; sus4 should delete 2 too...
-	(sus . ,(make-pitch 0 3 0 ))
-)
-
diff --git a/ly/declarations-init.ly b/ly/declarations-init.ly
deleted file mode 100644
index c200465244..0000000000
--- a/ly/declarations-init.ly
+++ /dev/null
@@ -1,56 +0,0 @@
-
-\version "1.3.146"
-breve = \duration #(make-duration -1 0)
-longa = \duration #(make-duration -2 0 )
-maxima = \duration #(make-duration -3 0)
-
-\include "nederlands.ly"		% dutch
-\include "chord-modifiers-init.ly"
-\include "script-init.ly"
-
-% declarations for standard directions
-left = -1
-right = 1
-up = 1
-down = -1
-start = -1
-stop = 1
-smaller = -1
-bigger = 1
-center=0
-
-break =  \penalty  #-10000
-noBreak =  \penalty #10000
-\include "scale-definitions-init.ly"
-
-melisma = \property Staff.melismaBusy = ##t
-melismaEnd = \property Staff.melismaBusy = ##f
-
-
-\include "engraver-init.ly"
-\include "grace-init.ly"
-
-singleLine = \paper { linewidth = 1. }
-
-% ugh
-\include "midi-init.ly"
-
-papersize = "a4"
-paperfile = \papersize + "-init.ly"
-
-\include "generic-paper-init.ly"
-\include "paper20-init.ly"
-
-
-\include "dynamic-scripts-init.ly"
-\include "spanners-init.ly"
-
-\include "property-init.ly"
-
-
-
-% reset default duration
-unusedEntry = \notes { c4 }	
-
-% music = "\melodic\relative c"
-
diff --git a/ly/deutsch.ly b/ly/deutsch.ly
deleted file mode 100644
index 8476b59531..0000000000
--- a/ly/deutsch.ly
+++ /dev/null
@@ -1,52 +0,0 @@
-% common german names for notes. "es" means flat, "is" means sharp
-%
-% by Roland Meier <meier@informatik.th-darmstadt.de>
-% based on swedish.ly by Mats Bengtsson.
-
-% 1999/06/09 Bjoern Jacke <bjoern.jacke@gmx.de>
-%            added asas and marked ases as `unusual'
-
-
-\pitchnames  #`(
-	(ceses . ,(make-pitch -1 0 -2 ))
-	(ces . ,(make-pitch -1 0 -1 ))
-	(c . ,(make-pitch -1 0 0 ))
-	(cis . ,(make-pitch -1 0 1 ))
-	(cisis . ,(make-pitch -1 0 2 ))
-	(deses . ,(make-pitch -1 1 -2 ))
-	(des . ,(make-pitch -1 1 -1 ))
-	(d . ,(make-pitch -1 1 0 ))
-	(dis . ,(make-pitch -1 1 1 ))
-	(disis . ,(make-pitch -1 1 2 ))
-	(eses . ,(make-pitch -1 2 -2 ))
-	(es . ,(make-pitch -1 2 -1 ))
-	(e . ,(make-pitch -1 2 0 ))
-	(eis . ,(make-pitch -1 2 1 ))
-	(eisis . ,(make-pitch -1 2 2 ))
-	(feses . ,(make-pitch -1 3 -2 ))
-	(fes . ,(make-pitch -1 3 -1 ))
-	(f . ,(make-pitch -1 3 0 ))
-	(fis . ,(make-pitch -1 3 1 ))
-	(fisis . ,(make-pitch -1 3 2 ))
-	(geses . ,(make-pitch -1 4 -2 ))
-	(ges . ,(make-pitch -1 4 -1 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(gis . ,(make-pitch -1 4 1 ))
-	(gisis . ,(make-pitch -1 4 2 ))
-	(asas . ,(make-pitch -1 5 -2 ))
-	(ases . ,(make-pitch -1 5 -2 ))   ;;non-standard name for asas
-	(as . ,(make-pitch -1 5 -1 ))
-	(a . ,(make-pitch -1 5 0 ))
-	(ais . ,(make-pitch -1 5 1 ))
-	(aisis . ,(make-pitch -1 5 2 ))
-	(heses . ,(make-pitch -1 6 -2 ))
-	(b . ,(make-pitch -1 6 -1 ))
-	(h . ,(make-pitch -1 6 0 ))
-	(his . ,(make-pitch -1 6 1 ))
-	(hisis . ,(make-pitch -1 6 2 ))
-)
-
-
-
-
-\version "1.3.146"
diff --git a/ly/drumpitch-init.ly b/ly/drumpitch-init.ly
deleted file mode 100644
index b55e8bb1f4..0000000000
--- a/ly/drumpitch-init.ly
+++ /dev/null
@@ -1,160 +0,0 @@
-% GM drum pitches.
-% I use different accidentals to distinguish drums at the same GM pitch.
-% Always accidental 0 (white keys) or 1 (black keys) to get the "correct" gm name.
-% i.e. fis, for closed highat  ges, for highat.
-
-% 2001/03/25 Rune Zedeler <rune@zedeler.dk>
-
-
-%% TODO: don't pollute global namespace in this way . 
-
-
-#(define drum-pitch-names `(
-	(acousticbassdrum bda	,(make-pitch -3 6 0 ))
-	(bassdrum	  bd	,(make-pitch -2 0 0 ))
-	(hisidestick	  ssh	,(make-pitch -3 6 2))
-	(sidestick	  ss	,(make-pitch -2 0 1))
-	(losidestick	  ssl	,(make-pitch -2 1 -1))
-	(acousticsnare	  sna	,(make-pitch -2 1 0))
-	(snare		  sn	,(make-pitch -2 2 -2))
-	(handclap	  hc	,(make-pitch -2 1 1))
-	(electricsnare	  sne	,(make-pitch -2 2 0))
-	(lowfloortom	  tomfl	,(make-pitch -2 3 0))
-	(closedhihat	  hhc	,(make-pitch -2 3 1))
-	(hihat		  hh	,(make-pitch -2 4 -1))
-	(highfloortom	  tomfh	,(make-pitch -2 4 0))
-	(pedalhihat	  hhp	,(make-pitch -2 4 1))
-	(lowtom		  toml	,(make-pitch -2 5 0))
-	(openhihat	  hho	,(make-pitch -2 5 1))
-	(halfopenhihat	  hhho	,(make-pitch -2 5 1))
-	(lowmidtom	  tomml	,(make-pitch -2 6 0))
-	(himidtom	  tommh	,(make-pitch -1 0 0))
-	(crashcymbala	  cymca	,(make-pitch -1 0 1))
-	(crashcymbal	  cymc	,(make-pitch -1 1 -1))
-	(hightom	  tomh	,(make-pitch -1 1 0))
-	(ridecymbala	  cymra	,(make-pitch -1 1 1))
-	(ridecymbal	  cymr	,(make-pitch -1 2 -1))
-	(chinesecymbal	  cymch	,(make-pitch -1 2 0))
-	(ridebell	  rb	,(make-pitch -1 3 0))
-	(tambourine	  tamb	,(make-pitch -1 3 1))
-	(splashcymbal	  cyms	,(make-pitch -1 4 0))
-	(cowbell	  cb	,(make-pitch -1 4 1))
-	(crashcymbalb	  cymcb	,(make-pitch -1 5 0))
-	(vibraslap	  vibs	,(make-pitch -1 5 1))
-	(ridecymbalb	  cymrb	,(make-pitch -1 6 0))
-	(hibongo	  boh	,(make-pitch 0 0 0))
-	(lobongo	  bol	,(make-pitch 0 0 1))
-	(mutehiconga	  cghm	,(make-pitch 0 1 0))
-	(openhiconga	  cgho	,(make-pitch 0 1 1))
-	(hiconga	  cgh	,(make-pitch 0 2 -1))
- (openloconga      cglo  ,(make-pitch 0 1 2))
-	(loconga	  cgl	,(make-pitch 0 2 0))
-	(hitimbale	  timh	,(make-pitch 0 3 0))
-	(lotimbale	  timl	,(make-pitch 0 3 1))
-	(hiagogo	  agh	,(make-pitch 0 4 0))
-	(loagogo	  agl	,(make-pitch 0 4 1))
-	(cabasa		  cab	,(make-pitch 0 5 0))
-	(maracas	  mar	,(make-pitch 0 5 1))
-	(shortwhistle	  whs	,(make-pitch 0 6 0))
-	(longwhistle	  whl	,(make-pitch 1 0 0))
-	(shortguiro	  guis	,(make-pitch 1 0 1))
-	(longguiro	  guil	,(make-pitch 1 1 0))
-	(guiro		  gui	,(make-pitch 1 0 2))
-	(claves		  cl	,(make-pitch 1 1 1))
-	(hiwoodblock	  wbh	,(make-pitch 1 2 0))
-	(lowoodblock	  wbl	,(make-pitch 1 3 0))
-	(mutecuica	  cuim	,(make-pitch 1 3 1))
-	(opencuica	  cuio	,(make-pitch 1 4 0))
-	(mutetriangle	  trim	,(make-pitch 1 4 1))
-	(triangle	  tri	,(make-pitch 1 4 2))
-	(opentriangle	  trio	,(make-pitch 1 5 0))
-	;; "transposing" pitches:
-	(oneup		  ua	,(make-pitch 0 1 0))
-	(twoup		  ub	,(make-pitch 0 2 0))
-	(threeup	  uc	,(make-pitch 0 3 0))
-	(fourup		  ud	,(make-pitch 0 4 0))
-	(fiveup		  ue	,(make-pitch 0 5 0))
-	(onedown	  da	,(make-pitch -1 6 0))
-	(twodown	  db	,(make-pitch -1 5 0))
-	(threedown	  dc	,(make-pitch -1 4 0))
-	(fourdown	  dd	,(make-pitch -1 3 0))
-	(fivedown	  de	,(make-pitch -1 2 0))
-))
-
-#(define drums `(
-	(acousticbassdrum default 	,#f	  ,(make-pitch -1 4 0))
-	(bassdrum	  default 	,#f	  ,(make-pitch -1 4 0))
-	(sidestick	  cross		,#f	  ,(make-pitch 0 1 0))
-	(acousticsnare	  default 	,#f	  ,(make-pitch 0 1 0))
-	(snare		  default 	,#f	  ,(make-pitch 0 1 0))
-	(handclap	  triangle	,#f	  ,(make-pitch 0 1 0))
-	(electricsnare	  default 	,#f	  ,(make-pitch 0 1 0))
-	(lowfloortom	  default 	,#f	  ,(make-pitch -1 3 0))
-	(closedhihat	  cross		"stopped" ,(make-pitch 0 3 0))
-	(hihat		  cross		,#f	  ,(make-pitch 0 3 0))
-	(highfloortom	  default 	,#f	  ,(make-pitch -1 5 0))
-	(pedalhihat	  cross		,#f	  ,(make-pitch -1 2 0))
-	(lowtom		  default 	,#f	  ,(make-pitch 0 0 0))
-	(openhihat	  cross		"open"	  ,(make-pitch 0 3 0))
-	(halfopenhihat	  xcircle	,#f	  ,(make-pitch 0 3 0))
-	(lowmidtom	  default 	,#f	  ,(make-pitch 0 1 0))
-	(himidtom	  default 	,#f	  ,(make-pitch 0 2 0))
-	(crashcymbala	  xcircle 	,#f	  ,(make-pitch 0 5 0))
-	(crashcymbal	  xcircle 	,#f	  ,(make-pitch 0 5 0))
-	(hightom	  default 	,#f	  ,(make-pitch 0 4 0))
-	(ridecymbala	  cross		,#f	  ,(make-pitch 0 5 0))
-	(ridecymbal	  cross		,#f	  ,(make-pitch 0 5 0))
-	(chinesecymbal	  mensural 	,#f	  ,(make-pitch 0 5 0))
-	(ridebell	  default	,#f	  ,(make-pitch 0 5 0))
-	(splashcymbal	  diamond 	,#f	  ,(make-pitch 0 5 0))
-	(cowbell	  triangle	,#f	  ,(make-pitch 0 5 0))
-	(crashcymbalb	  cross		,#f	  ,(make-pitch 0 5 0))
-	(vibraslap	  diamond 	,#f	  ,(make-pitch 0 4 0))
-	(ridecymbalb	  cross		,#f	  ,(make-pitch 0 5 0))
- ))
-
-#(define timbales `(
-	(losidestick	  cross		,#f	  ,(make-pitch -1 6 0))
-	(lotimbale	  default	,#f	  ,(make-pitch -1 6 0))
-	(cowbell	  triangle	,#f	  ,(make-pitch 0 0 0))
-	(hisidestick	  cross		,#f	  ,(make-pitch 0 1 0))
-	(hitimbale	  default	,#f	  ,(make-pitch 0 1 0))
- ))
-
-#(define congas `(
-	(losidestick	  cross		,#f	  ,(make-pitch -1 6 0))
-	(loconga	  default	,#f	  ,(make-pitch -1 6 0))
-	(openloconga      default       ,"open"   ,(make-pitch -1 6 0))
-	(hisidestick	  cross		,#f	  ,(make-pitch 0 1 0))
-	(hiconga	  default	,#f	  ,(make-pitch 0 1 0))
-	(openhiconga      default       "open"    ,(make-pitch 0 1 0))
-        (mutehiconga      default       "stopped" ,(make-pitch 0 1 0))
-  
- ))
-
-#(define bongos `(
-	(lobongo	  default	,#f	  ,(make-pitch -1 6 0))
-	(hibongo	  default	,#f	  ,(make-pitch 0 1 0))
- ))
-
-#(define guiro `(
-	(shortguiro	  default	"staccato",(make-pitch 0 0 0))
-	(longguiro	  default	"tenuto"  ,(make-pitch 0 0 0))
-	(guiro		  default	,#f	  ,(make-pitch 0 0 0))
- ))
-
-#(define triangle `(
-	(opentriangle	  cross		"open"	  ,(make-pitch 0 0 0))
-	(mutetriangle	  cross		"stopped" ,(make-pitch 0 0 0))
-	(triangle	  cross		,#f	  ,(make-pitch 0 0 0))
- ))
-
-
-
-\pitchnames
-#(append (map (lambda (x) (cons (car x) (caddr x))) drum-pitch-names)
-	 (map (lambda (x) (cons (cadr x) (caddr x))) drum-pitch-names)
- )
-
-
-\version "1.3.146"
diff --git a/ly/dynamic-scripts-init.ly b/ly/dynamic-scripts-init.ly
deleted file mode 100644
index 0f2f3e6b24..0000000000
--- a/ly/dynamic-scripts-init.ly
+++ /dev/null
@@ -1,27 +0,0 @@
-\version "1.3.146"
-
-%
-% declare the standard dynamic identifiers.
-%
-ppppp = \dynamicscript #"ppppp"
-pppp = \dynamicscript #"pppp"
-ppp = \dynamicscript #"ppp"
-pp = \dynamicscript #"pp"
-p = \dynamicscript #"p"
-mp = \dynamicscript #"mp"
-mf = \dynamicscript #"mf"
-f = \dynamicscript #"e"			% see feta-din layout
-ff = \dynamicscript #"ff"
-fff = \dynamicscript #"fff"
-ffff = \dynamicscript #"ffff"
-fp = \dynamicscript #"fp"
-
-sf = \dynamicscript #"sf"
-sfp = \dynamicscript #"sfp"
-sff = \dynamicscript #"sff"
-sfz = \dynamicscript #"sfz"
-fz = \dynamicscript #"fz"
-sp = \dynamicscript #"sp"
-spp = \dynamicscript #"spp"
-rfz = \dynamicscript #"rfz"
-
diff --git a/ly/english.ly b/ly/english.ly
deleted file mode 100644
index 9afeff28f6..0000000000
--- a/ly/english.ly
+++ /dev/null
@@ -1,82 +0,0 @@
-%{
-     English note names spelled out in full, and abbreviated
-     with s for sharp and f for flat.
-%}
-
-\pitchnames #`(
-	(cflatflat . ,(make-pitch -1 0 -2 ))
-	(cflat . ,(make-pitch -1 0 -1 ))
-	(c . ,(make-pitch -1 0 0 ))
-	(csharp . ,(make-pitch -1 0 1 ))
-	(csharpsharp . ,(make-pitch -1 0 2 ))
-	(dflatflat . ,(make-pitch -1 1 -2 ))
-	(dflat . ,(make-pitch -1 1 -1 ))
-	(d . ,(make-pitch -1 1 0 ))
-	(dsharp . ,(make-pitch -1 1 1 ))
-	(dsharpsharp . ,(make-pitch -1 1 2 ))
-	(eflatflat . ,(make-pitch -1 2 -2 ))
-	(eflat . ,(make-pitch -1 2 -1 ))
-	(e . ,(make-pitch -1 2 0 ))
-	(esharp . ,(make-pitch -1 2 1 ))
-	(esharpsharp . ,(make-pitch -1 2 2 ))
-	(fflatflat . ,(make-pitch -1 3 -2 ))
-	(fflat . ,(make-pitch -1 3 -1 ))
-	(f . ,(make-pitch -1 3 0 ))
-	(fsharp . ,(make-pitch -1 3 1 ))
-	(fsharpsharp . ,(make-pitch -1 3 2 ))
-	(gflatflat . ,(make-pitch -1 4 -2 ))
-	(gflat . ,(make-pitch -1 4 -1 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(gsharp . ,(make-pitch -1 4 1 ))
-	(gsharpsharp . ,(make-pitch -1 4 2 ))
-	(aflatflat . ,(make-pitch -1 5 -2 ))
-	(aflat . ,(make-pitch -1 5 -1 ))
-	(a . ,(make-pitch -1 5 0 ))
-	(asharp . ,(make-pitch -1 5 1 ))
-	(asharpsharp . ,(make-pitch -1 5 2 ))
-	(bflatflat . ,(make-pitch -1 6 -2 ))
-	(bflat . ,(make-pitch -1 6 -1 ))
-	(b . ,(make-pitch -1 6 0 ))
-	(bsharp . ,(make-pitch -1 6 1 ))
-	(bsharpsharp . ,(make-pitch -1 6 2 ))
-
-	(cff . ,(make-pitch -1 0 -2 ))
-	(cf . ,(make-pitch -1 0 -1 ))
-	(c . ,(make-pitch -1 0 0 ))
-	(cs . ,(make-pitch -1 0 1 ))
-	(css . ,(make-pitch -1 0 2 ))
-	(dff . ,(make-pitch -1 1 -2 ))
-	(df . ,(make-pitch -1 1 -1 ))
-	(d . ,(make-pitch -1 1 0 ))
-	(ds . ,(make-pitch -1 1 1 ))
-	(dss . ,(make-pitch -1 1 2 ))
-	(eff . ,(make-pitch -1 2 -2 ))
-	(ef . ,(make-pitch -1 2 -1 ))
-	(e . ,(make-pitch -1 2 0 ))
-
-	(es . ,(make-pitch -1 2 1 ))    
-	(ess . ,(make-pitch -1 2 2 ))
-	(fff . ,(make-pitch -1 3 -2 ))
-	(ff . ,(make-pitch -1 3 -1 ))
-	(f . ,(make-pitch -1 3 0 ))
-	(fs . ,(make-pitch -1 3 1 ))
-	(fss . ,(make-pitch -1 3 2 ))
-	(gff . ,(make-pitch -1 4 -2 ))
-	(gf . ,(make-pitch -1 4 -1 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(gs . ,(make-pitch -1 4 1 ))
-	(gss . ,(make-pitch -1 4 2 ))
-	(aff . ,(make-pitch -1 5 -2 ))
-	(af . ,(make-pitch -1 5 -1 ))
-	(a . ,(make-pitch -1 5 0 ))
-	(as . ,(make-pitch -1 5 1 ))
-	(ass . ,(make-pitch -1 5 2 ))
-	(bff . ,(make-pitch -1 6 -2 ))
-	(bf . ,(make-pitch -1 6 -1 ))
-	(b . ,(make-pitch -1 6 0 ))
-	(bs . ,(make-pitch -1 6 1 ))
-	(bss . ,(make-pitch -1 6 2 ))
-)
-
-\version "1.3.146"
-
diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
deleted file mode 100644
index 9717e3c5e2..0000000000
--- a/ly/engraver-init.ly
+++ /dev/null
@@ -1,415 +0,0 @@
-\version "1.3.146"
-
-%
-% setup for Request->Element conversion. Guru-only
-%
-
-StaffContext=\translator {
-	\type "Engraver_group_engraver"
-	\name Staff 
-	\consists "Output_property_engraver"	
-	Generic_property_list = #generic-staff-properties
-	
-	\consists "Bar_engraver"
- % Bar_engraver must be first so default bars aren't overwritten
-% with empty ones.
-	\consists "Font_size_engraver"
-
-%	\consists "Repeat_engraver"
-	\consists "Volta_engraver"
-	\consists "Separating_line_group_engraver"	
-
-
-
-	\consists "Clef_engraver"
-	\consists "Key_engraver"
-	\consists "Time_signature_engraver"
-	\consists "Staff_symbol_engraver"
-	\consists "Collision_engraver"
-	\consists "Rest_collision_engraver"
-	\consists "Local_key_engraver"
-	\consists "Piano_pedal_engraver"
-	\consists "Instrument_name_engraver"
-
-	\consistsend "Axis_group_engraver"
-	
-	MinimumVerticalExtent = #'(-4 . 4)
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-
-	% explicitly set instrument, so we don't get 
-	% weird effects when doing instrument names for
-	% piano staves
-
-	instrument = ##f
-	instr = ##f
-	  
-	\accepts "Voice"
-}
-
-
-StaffContainerContext = \translator {
-	\type Engraver_group_engraver
-	\consists "Axis_group_engraver"
-	MinimumVerticalExtent = ##f
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-	
-	\accepts Staff
-	\name StaffContainer
-}
-
-InnerChoirStaffContext = \translator {
-	\type "Engraver_group_engraver"
-	\name InnerChoirStaff
-	alignmentReference = #0
-	\consists "System_start_delimiter_engraver"
-	SystemStartDelimiter \override #'glyph = #'bracket
-
-	\accepts "Staff"
-	\accepts "RhythmicStaff"
-	\accepts "GrandStaff"
-	\accepts "PianoStaff"
-	\accepts "Lyrics"
-	\accepts "ChordNames"
-}
-ChoirStaffContext = \translator {
-	\InnerChoirStaffContext
-	\name ChoirStaff
-	\accepts "InnerChoirStaff"
-	\accepts "InnerStaffGroup"
-}
-
-
-RhythmicStaffContext=\translator{
-	\type "Engraver_group_engraver"
-	
-	\consists "Output_property_engraver"	
-
-	Generic_property_list = #generic-staff-properties
-	MinimumVerticalExtent = ##f
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-
-	\consists "Pitch_squash_engraver"
-	\consists "Separating_line_group_engraver"	
-	\name RhythmicStaff
-	\alias "Staff"
-	
-	Bar \override #'bar-size = #4
-	VoltaBracket \override #'minimum-space =  #15  % urg, in \pt
-	VoltaBracket \override #'padding =  #5  % urg, in \pt
-	StaffSymbol \override #'line-count = #1	
-
-%	\consists "Repeat_engraver"
-	\consists "Volta_engraver"
-	\consists "Bar_engraver"
-	\consists "Time_signature_engraver"
-	\consists "Staff_symbol_engraver"
-	\consistsend "Axis_group_engraver"
-	\accepts "Voice"
-}
-
-
-VoiceContext = \translator {
-	\type "Engraver_group_engraver"
-	\name Voice
-
-	Generic_property_list = #generic-voice-properties
-	\consists "Font_size_engraver"
-	
-	% must come before all
-	\consists "Voice_devnull_engraver"
-	\consists "Output_property_engraver"	
-	\consists "Arpeggio_engraver"
-	\consists "Multi_measure_rest_engraver"
-	\consists "Text_spanner_engraver"
-	
-	\consists "Breathing_sign_engraver"
- 	% \consists "Rest_engraver"
-	\consists "Dot_column_engraver"
-	\consists "Stem_engraver"
-	\consists "Beam_engraver"
-	\consists "Auto_beam_engraver"
-
-	\consists "Chord_tremolo_engraver"
-	\consists "Percent_repeat_engraver"
-	\consists "Melisma_engraver"
-
-%{
- Must come before text_engraver, but after note_column engraver.
-
-%}
-	\consists "Dynamic_engraver"
-	\consists "Text_engraver"
-
-	\consists "Script_engraver"
-	\consists "Script_column_engraver"
-	\consists "Rhythmic_column_engraver"
-	\consists "Phrasing_slur_engraver"
-	\consists "Slur_engraver"
-	\consists "Tie_engraver"
-	\consists "Tuplet_engraver"
-	\consists "A2_engraver"
-
-	\consists "Skip_req_swallow_translator"
-	\accepts Thread % bug if you leave out this!
-}
-
-ThreadContext = \translator{
-	\type Engraver_group_engraver
-	\name Thread
-
-	\consists "Font_size_engraver"	
-	\consists "Thread_devnull_engraver"
-	\consists "Note_heads_engraver"
-	\consists "Rest_engraver"
-	\consists "Note_head_line_engraver"
-	\consists "Output_property_engraver"	
-	Generic_property_list = #generic-thread-properties
-}
-
-GrandStaffContext=\translator{
-	\type "Engraver_group_engraver"
-	\name GrandStaff
-	\consists "Span_bar_engraver"
-	\consists "Span_arpeggio_engraver"
-	\consists "System_start_delimiter_engraver"
-	SystemStartDelimiter \override #'glyph = #'brace
-	
-	Generic_property_list = #generic-grand-staff-properties
-	\accepts "Staff"
-}
-
-PianoStaffContext = \translator{
-	\GrandStaffContext
-	\name "PianoStaff"
-
-	\consists "Vertical_align_engraver"
-	\consists "Instrument_name_engraver"
-	
-	instrument = ##f
-	instr = ##f
-	
-	verticalAlignmentChildCallback = #Align_interface::fixed_distance_alignment_callback
-	VerticalAlignment \override #'forced-distance = #12
-	VerticalAlignment \override #'self-alignment-Y = #0
-%	\consistsend "Axis_group_engraver"
-}
-
-InnerStaffGroupContext= \translator {
-	\type "Engraver_group_engraver"
-	\name InnerStaffGroup
-
-	\consists "Span_bar_engraver"
-	\consists "Span_arpeggio_engraver"
-	\consists "Output_property_engraver"	
-	SystemStartDelimiter \override #'glyph = #'bracket
-
-	\consists "System_start_delimiter_engraver"
-	\accepts "Staff"
-	\accepts "RhythmicStaff"
-	\accepts "GrandStaff"
-	\accepts "PianoStaff"
-	
-	\accepts "Lyrics"
-	\accepts "ChordNames"
-}
-StaffGroupContext = \translator {
-	\InnerStaffGroupContext
-	\name StaffGroup
-	\accepts "InnerChoirStaff"
-	\accepts "ChoirStaff"
-	\accepts "InnerStaffGroup"
-}
-
-
-% UGH! JUNKME
-LyricsVoiceContext= \translator{
-	\type "Engraver_group_engraver"
-	\consistsend "Axis_group_engraver"
-	MinimumVerticalExtent = #(cons -1.2 1.2)
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-	\name LyricsVoice 
-	\consists "Separating_line_group_engraver"
-	\consists "Lyric_engraver"
-	\consists "Extender_engraver"
-	\consists "Hyphen_engraver"
-	\consists "Stanza_number_engraver"
-	phrasingPunctuation = #".,:!?\""
-	
-}
-NoteNamesContext = \translator {
-	\type "Engraver_group_engraver"
-	\name NoteNames
-	\consistsend "Axis_group_engraver"
-
-	MinimumVerticalExtent = ##f
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-
-	
-	\consists "Note_name_engraver"
-	\consists "Separating_line_group_engraver"
-}
-
-LyricsContext = \translator {
-	\type "Engraver_group_engraver"
-	\name Lyrics
-	\consists Vertical_align_engraver %need this for getting folded repeats right.
-	Generic_property_list = #generic-lyrics-properties
-
-	\consistsend "Axis_group_engraver"
-	MinimumVerticalExtent = ##f
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-	
-	\accepts "LyricsVoice"
-}
-
-
-ChordNamesContext = \translator {
-	\type "Engraver_group_engraver"
-	\name ChordNames
-
-	Generic_property_list = #generic-chord-staff-properties
-
-
-	\consists "Output_property_engraver"	
-	\consists "Separating_line_group_engraver"
-	\consists "Chord_name_engraver"
-	\consists "Skip_req_swallow_translator"
-	\consistsend "Axis_group_engraver"
-	MinimumVerticalExtent = ##f
-	ExtraVerticalExtent = ##f
-	VerticalExtent = ##f 
-
-	VerticalAxisGroup \override #'invisible-staff = ##t
-	}
-
-
-
-StupidScore = \translator {
- 	\type "Score_engraver"
-	\name Score
-	\consists "Note_heads_engraver"
-}
-
-
-
-
-HaraKiriStaffContext = \translator {
-	\StaffContext
-	\remove "Axis_group_engraver"
-	\consistsend "Hara_kiri_engraver"
-	\consists "Instrument_name_engraver"
-	\accepts "Voice"
-}
-%{
-  The HaraKiriStaffContexts doesn't override \name,
-  so it is still named `Staff'.
-
-  %\translator { \HaraKiriStaffContext }
-%}
-
-
-
-
-ScoreContext = \translator {
-	\type Score_engraver
-	\name Score
-	
-
-	\consists "Repeat_acknowledge_engraver"
-	\consists "Timing_engraver"
-	\consists "Output_property_engraver"
-	\consists "System_start_delimiter_engraver"
-	\consists "Mark_engraver"	
-	\consists "Break_align_engraver"
-	\consists "Spacing_engraver"
-	\consists "Vertical_align_engraver"
-
-	\consists "Lyric_phrasing_engraver"
-	\consists "Bar_number_engraver"
-	\consists "Span_arpeggio_engraver"
-
-	\accepts "Staff"
-	\accepts "StaffContainer"
-	\accepts "StaffGroup"
-	\accepts "RhythmicStaff"	
-	\accepts "Lyrics"
-	\accepts "ChordNames"
-	\accepts "GrandStaff"
-	\accepts "ChoirStaff"
-	\accepts "PianoStaff"
-	\accepts "NoteNames"
-
-	soloText = #"Solo"
-	soloIIText = #"Solo II"
-	aDueText = #"a2"
-	soloADue = ##t
-	splitInterval = #'(0 . 1)
-	changeMoment = #`(,(make-moment 0 0) . ,(make-moment 1 512))
-
-	barAuto = ##t
-	voltaVisibility = ##t
-	%  name, glyph id, clef position 
-	% where is c0 in this clef?
-
-	clefGlyph = #"clefs-G"
-	clefPosition = #-2
-	centralCPosition = #-6
-	
-        automaticPhrasing = ##t
-	alignmentReference = #-1   % \down
-	defaultBarType = #"|"
-
-	explicitClefVisibility = #all-visible
-	explicitKeySignatureVisibility = #all-visible
-	
-	scriptDefinitions = #default-script-alist
-
-	verticalAlignmentChildCallback = #Align_interface::alignment_callback
-
-	pedalSustainStrings = #'("Ped." "*Ped." "*")
-	pedalUnaCordaStrings = #'("una corda" "" "tre corde")
-	pedalSostenutoStrings = #'()  % FIXME
-
-	tupletNumberFormatFunction = #denominator-tuplet-formatter
-	
-       keyAccidentalOrder = #'(
-         (6 . -1) (2  . -1) (5 . -1 ) (1  . -1) (4  . -1) (0  . -1) (3  . -1)
-	 (3  . 1) (0 . 1) (4 . 1) (1 . 1) (5 . 1) (2 . 1) (6 . 1)
-         (6 . -2) (2  . -2) (5 . -2 ) (1  . -2) (4  . -2) (0  . -2) (3 . -2)
-         (3  . 2) (0 . 2) (4 . 2) (2 . 2) (5 . 2) (2 . 2) (6 . 2)
-        )
-	breakAlignOrder = #'(
-	  Instrument_name
-	  Left_edge_item
-	  Span_bar
-	  Breathing_sign
-	  Clef_item
-	  Key_item
-	  Staff_bar
-	  Time_signature
-	  Custos
-	)
-
-
-	\elementdescriptions #all-grob-descriptions
-}
-
-OrchestralScoreContext= \translator {
-	\ScoreContext
-}
-EasyNotation =  \translator {
-	\ScoreContext
-	NoteHead \override #'molecule-callback = #Note_head::brew_ez_molecule
-	easyPlay = ##t
-}
-
-% retain for compatibility reasons (FIXME: convert-ly)
-GraceContext = \translator {
-	\type "Engraver_group_engraver"
-}
diff --git a/ly/generate-documentation.ly b/ly/generate-documentation.ly
deleted file mode 100644
index 104d57efeb..0000000000
--- a/ly/generate-documentation.ly
+++ /dev/null
@@ -1,6 +0,0 @@
-\version "1.3.146"
-
-%
-% Running LilyPond on this file generates the documentation
-%
-#(eval-string (ly-gulp-file "generate-documentation.scm"))
diff --git a/ly/generate-interface-doc-init.ly b/ly/generate-interface-doc-init.ly
deleted file mode 100644
index a50eeaf3d0..0000000000
--- a/ly/generate-interface-doc-init.ly
+++ /dev/null
@@ -1,5 +0,0 @@
-
-%
-% Running LilyPond on this file generates the short interface doc
-%
-#(eval-string (ly-gulp-file "generate-interface-doc.scm"))
diff --git a/ly/generic-paper-init.ly b/ly/generic-paper-init.ly
deleted file mode 100644
index df96f2abcd..0000000000
--- a/ly/generic-paper-init.ly
+++ /dev/null
@@ -1,8 +0,0 @@
-\version "1.3.146"
-
-\paper {
-	texsetting = ""
-	pssetting = ""
-	scmsetting = "(lilyponddefs.ps) findlibfile {exch pop //systemdict /run get exec} { /undefinedfilename signalerror } ifelse\n"% UGH. 
-
-}
diff --git a/ly/german-chords-init.ly b/ly/german-chords-init.ly
deleted file mode 100644
index cb741eba14..0000000000
--- a/ly/german-chords-init.ly
+++ /dev/null
@@ -1,41 +0,0 @@
-\version "1.3.148"
-
-%  german-chords.ly:
-% german/norwegian/danish?
-
-% To get Bb instead of B, use
-% \include "german-chords.ly"
-% #(set! german-Bb #t)
-
-#(define german-Bb #f)
-
-#(define (pitch->chord-name-text-banter pitch steps)
-   (let ((dopitch (if (member (cdr pitch) '((6 -1) (6 -2)))
-		      (list 7 (+ (if german-Bb 0 1) (caddr pitch)))
-		      (cdr pitch)
-		 )))
-     (cons
-       (list-ref '("C" "D" "E" "F" "G" "A" "H" "B") (car dopitch))
-       (accidental->text-super (cadr dopitch))
-     )
-   )
- )
-
-
-
-#(define (pitch->note-name-text-banter pitch)
-   (let ((dopitch (if (member (cdr pitch) '((6 -1) (6 -2)))
-		     (list 7 (+ 1 (caddr pitch)))
-		     (cdr pitch)
-		 )))
-     (list
-       (string-append
-	  (list-ref '("c" "d" "e" "f" "g" "a" "h" "b") (car dopitch))
-	  (if (or (equal? (car dopitch) 2) (equal? (car dopitch) 5))
-	    (list-ref '( "ses"  "s" "" "is" "isis") (+ 2 (cadr dopitch)))
-	    (list-ref '("eses" "es" "" "is" "isis") (+ 2 (cadr dopitch)))
-	  )
-       )
-     )
-   )
- )
diff --git a/ly/grace-init.ly b/ly/grace-init.ly
deleted file mode 100644
index 691498d1bd..0000000000
--- a/ly/grace-init.ly
+++ /dev/null
@@ -1,45 +0,0 @@
-
-#(define (grace-beam-space-function multiplicity)
-  (* (if (<= multiplicity 3) 0.816 0.844) 0.8))
-
-
-startGraceMusic = {
-    \property Voice.Stem \override  #'direction = #1
-    \property Voice.Stem \override #'length = #6
-    \property Voice.Stem \override #'lengths = 
-        #(map (lambda (x) (* 0.8 x)) '(3.5 3.5 3.5 4.5 5.0))
-    \property Voice.Stem \override #'beamed-lengths =
-        #(map (lambda (x) (* 0.8 x)) '(0.0 2.5 2.0 1.5))
-    \property Voice.Stem \override #'beamed-minimum-lengths =
-        #(map (lambda (x) (* 0.8 x)) '(0.0 1.5 1.25 1.0))
-    \property Voice.Stem \override #'no-stem-extend = ##t
-    \property Voice.Stem \override #'flag-style  = #"grace"
-
-    \property Voice.Beam \override #'space-function = #grace-beam-space-function
-    \property Voice.Beam \override #'thickness = #0.384
-    
-    % Can't use Staff.fontSize, since time sigs, keys sigs, etc. will
-    % be smaller as well.
-
-    \property Voice.fontSize = #-2
-    \property Staff.Accidentals \override #'font-relative-size = #-2
-}
-
-stopGraceMusic = {
-    \property Voice.Beam \revert #'space-function
-    \property Voice.Beam \revert #'thickness
-
-    \property Voice.Stem \revert #'flag-style
-    \property Voice.Stem \revert #'no-stem-extend
-    \property Voice.Stem \revert #'beamed-lengths
-    \property Voice.Stem \revert #'beamed-minimum-lengths
-    \property Voice.Stem \revert #'lengths    
-    \property Voice.Stem \revert #'length
-    \property Voice.Stem \revert #'direction    
-    
-    % Can't use Staff.fontSize, since time sigs, keys sigs, etc. will
-    % be smaller as well.
-
-    \property Voice.fontSize \unset
-    \property Staff.LocalKeyItem \revert #'font-relative-size
-}
diff --git a/ly/init-as.fly b/ly/init-as.fly
deleted file mode 100644
index 757ca7c47e..0000000000
--- a/ly/init-as.fly
+++ /dev/null
@@ -1,43 +0,0 @@
-% Toplevel AsciiScript initialisation file. 
-
-\version "1.3.146"
-
-\include "declarations-as.ly"
-
-% burp.  need to override lily.scm
-#(define cmr-alist
-  '(("bold" . "as-dummy") 
-    ("brace" . "as-braces")
-    ("default" . "as-dummy") 
-    ("dynamic" . "as-dummy") 
-    ("feta" . "feta") 
-    ("feta-1" . "feta") 
-    ("feta-2" . "feta") 
-    ("finger" . "as-number") 
-    ("typewriter" . "as-dummy") 
-    ("italic" . "as-dummy") 
-    ("roman" . "as-dummy") 
-    ("script" . "as-dummy") 
-    ("large" . "as-dummy") 
-    ("Large" . "as-dummy") 
-    ("mark" . "as-number") 
-    ("number" . "as-number") 
-    ("timesig" . "as-number")
-    ("volta" . "as-number"))
-)
-
-\score { 
-  \context Voice \notes\relative c {
-    \maininput
-  }
-  \paper {
-    \paper_as_nine
-    %linewidth=-1.0
-    %indent = 0.0
-    \translator { \StaffContext barSize = \staffheight }
-
-    % no beam-slope
-    %\translator { \VoiceContext beamHeight = #0 }
-  }  
-  %\midi{ }
-}
diff --git a/ly/init.ly b/ly/init.ly
deleted file mode 100644
index 0ddb2db3a9..0000000000
--- a/ly/init.ly
+++ /dev/null
@@ -1,8 +0,0 @@
-% Toplevel initialisation file. 
-
-
-\version "1.3.146"
-
-\include "declarations-init.ly"
-
-\maininput
diff --git a/ly/italiano.ly b/ly/italiano.ly
deleted file mode 100644
index 263d2bfab9..0000000000
--- a/ly/italiano.ly
+++ /dev/null
@@ -1,51 +0,0 @@
-%{
- Common italian names for notes. "b" means flat (bemolle), "d" means sharp (diesis)
- Adapted from dutch.ly.
-
- English: a   b   c   d   e   f   g
- Italian: la  si  do  re  mi  fa  sol
-
- For french naming just change 'do' in 'ut'.
-%}
-
-% contributed by Paolo Zuliani <zuliap@easynet.it>
-
-\pitchnames #`(
-	(dobb . ,(make-pitch -1 0 -2 ))
-	(dob . ,(make-pitch -1 0 -1 ))
-	(do . ,(make-pitch -1 0 0 ))
-	(dod . ,(make-pitch -1 0 1 ))
-	(dodd . ,(make-pitch -1 0 2 ))
-	(rebb . ,(make-pitch -1 1 -2 ))
-	(reb . ,(make-pitch -1 1 -1 ))
-	(re . ,(make-pitch -1 1 0 ))
-	(red . ,(make-pitch -1 1 1 ))
-	(redd . ,(make-pitch -1 1 2 ))
-	(mibb . ,(make-pitch -1 2 -2 ))
-	(mib . ,(make-pitch -1 2 -1 ))
-	(mi . ,(make-pitch -1 2 0 ))
-	(mid . ,(make-pitch -1 2 1 ))
-	(midd . ,(make-pitch -1 2 2 ))
-	(fabb . ,(make-pitch -1 3 -2 ))
-	(fab . ,(make-pitch -1 3 -1 ))
-	(fa . ,(make-pitch -1 3 0 ))
-	(fad . ,(make-pitch -1 3 1 ))
-	(fadd . ,(make-pitch -1 3 2 ))
-	(solbb . ,(make-pitch -1 4 -2 ))
-	(solb . ,(make-pitch -1 4 -1 ))
-	(sol . ,(make-pitch -1 4 0 ))
-	(sold . ,(make-pitch -1 4 1 ))
-	(soldd . ,(make-pitch -1 4 2 ))
-	(labb . ,(make-pitch -1 5 -2 ))
-	(lab . ,(make-pitch -1 5 -1 ))
-	(la . ,(make-pitch -1 5 0 ))
-	(lad . ,(make-pitch -1 5 1 ))
-	(ladd . ,(make-pitch -1 5 2 ))
-	(sibb . ,(make-pitch -1 6 -2 ))
-	(sib . ,(make-pitch -1 6 -1 ))
-	(si . ,(make-pitch -1 6 0 ))
-	(sid . ,(make-pitch -1 6 1 ))
-	(sidd . ,(make-pitch -1 6 2 ))
-)
-
-\version "1.3.146"
diff --git a/ly/ledger-init.ly b/ly/ledger-init.ly
deleted file mode 100644
index e1b774d343..0000000000
--- a/ly/ledger-init.ly
+++ /dev/null
@@ -1,8 +0,0 @@
-\version "1.3.146"
-
-% ledger.ly
-
-hsize = 11.0 \in
-vsize = 17.0 \in
-
-
diff --git a/ly/legal-init.ly b/ly/legal-init.ly
deleted file mode 100644
index 47f413c0d3..0000000000
--- a/ly/legal-init.ly
+++ /dev/null
@@ -1,5 +0,0 @@
-\version "1.3.146"
-% legal-init.ly
-
-hsize = 8.5 \in
-vsize = 14.0 \in
diff --git a/ly/letter-init.ly b/ly/letter-init.ly
deleted file mode 100644
index 1ae8c499db..0000000000
--- a/ly/letter-init.ly
+++ /dev/null
@@ -1,7 +0,0 @@
-\version "1.3.146"
-% letter-init.ly
-
-hsize = 8.5 \in
-vsize = 11.0 \in
-
-
diff --git a/ly/midi-init.ly b/ly/midi-init.ly
deleted file mode 100644
index 730d92a483..0000000000
--- a/ly/midi-init.ly
+++ /dev/null
@@ -1,7 +0,0 @@
-\version "1.3.146"
-\midi {
-        \tempo 4=60
-	\include "performer-init.ly"
-%	unfold_all = "1"
-}
-
diff --git a/ly/nederlands.ly b/ly/nederlands.ly
deleted file mode 100644
index bba3d0ad31..0000000000
--- a/ly/nederlands.ly
+++ /dev/null
@@ -1,49 +0,0 @@
-\version "1.3.146"
-%{
- common dutch names for notes. es means flat, is means sharp
-%}
-
-\pitchnames #`(
-	(ceses . ,(make-pitch -1 0 -2))
-	(ces . ,(make-pitch  -1 0 -1 ))
-	(c . ,(make-pitch  -1 0 0 ))
-	(cis . ,(make-pitch  -1 0 1 ))
-	(cisis . ,(make-pitch  -1 0 2 ))
-	(deses . ,(make-pitch  -1 1 -2 ))
-	(des . ,(make-pitch  -1 1 -1 ))
-	(d . ,(make-pitch  -1 1 0 ))
-	(dis . ,(make-pitch  -1 1 1 ))
-	(disis . ,(make-pitch  -1 1 2 ))
-	(eeses . ,(make-pitch  -1 2 -2 ))
-	(eses . ,(make-pitch  -1 2 -2 ))
-	(ees . ,(make-pitch  -1 2 -1 ))
-	(es . ,(make-pitch  -1 2 -1 ))
-	(e . ,(make-pitch  -1 2 0 ))
-	(eis . ,(make-pitch  -1 2 1 ))
-	(eisis . ,(make-pitch  -1 2 2 ))
-	(feses . ,(make-pitch  -1 3 -2 ))
-	(fes . ,(make-pitch  -1 3 -1 ))
-	(f . ,(make-pitch  -1 3 0 ))
-	(fis . ,(make-pitch  -1 3 1 ))
-	(fisis . ,(make-pitch  -1 3 2 ))
-	(geses . ,(make-pitch  -1 4 -2 ))
-	(ges . ,(make-pitch  -1 4 -1 ))
-	(g . ,(make-pitch  -1 4 0 ))
-	(gis . ,(make-pitch  -1 4 1 ))
-	(gisis . ,(make-pitch  -1 4 2 ))
-	(aeses . ,(make-pitch  -1 5 -2 ))
-	(ases . ,(make-pitch  -1 5 -2 ))
-	(aes . ,(make-pitch  -1 5 -1 ))
-	(as . ,(make-pitch  -1 5 -1 ))
-	(a . ,(make-pitch  -1 5 0 ))
-	(ais . ,(make-pitch  -1 5 1 ))
-	(aisis . ,(make-pitch  -1 5 2 ))
-	(beses . ,(make-pitch  -1 6 -2 ))
-	(bes . ,(make-pitch  -1 6 -1 ))
-	(b . ,(make-pitch  -1 6 0 ))
-	(bis . ,(make-pitch  -1 6 1 ))
-	(bisis . ,(make-pitch  -1 6 2 ))
-)
-
-
-
diff --git a/ly/norsk.ly b/ly/norsk.ly
deleted file mode 100644
index f6630bab93..0000000000
--- a/ly/norsk.ly
+++ /dev/null
@@ -1,107 +0,0 @@
-
-% 	Idx norsk.ly,v 1.1 1998/03/25 11:38:28 arvidg Exp arvidg $	
-
-%{
-
- Common norwegian names for notes, including versions without the
- double s-es to save typing, as well as the traditional names with
- them not to confuse musicians.  "es" or "ess" means flat, "is" or
- "iss" means sharp.
-
- Otherwise, the main difference from the dutch names is the that the
- "b" is called "h" in norwegian, while the dutch "bes" is a norwegian
- "b".
-
- Staying within the (proud?) naming convention for norwegian language
- setup used in LaTeX, this file is called "norsk.ly" instead of
- "norwegian.ly", even if all other languages' files use the english
- name.
-
- This file is based on "dutch.ly".  Basically, I copied "dutch.ly",
- duplicated all lines containing at least one "is" or "es", changed
- every other "is" into an "iss" and every other "es" into an "ess",
- added "ass" et al, and made some b->h-related changes.  There may be
- bugs in here please tell me (or send patches) if you find any.
-
-                                  Arvid Gr=F8tting <arvidg@ifi.uio.no>
-
-%}
-
-\pitchnames #`(
-	(ceses . ,(make-pitch -1 0 -2 ))
-	(cessess . ,(make-pitch -1 0 -2 ))
-	(ces . ,(make-pitch -1 0 -1 ))
-	(cess . ,(make-pitch -1 0 -1 ))
-	(c . ,(make-pitch -1 0 0 ))
-	(cis . ,(make-pitch -1 0 1 ))
-	(ciss . ,(make-pitch -1 0 1 ))
-	(cisis . ,(make-pitch -1 0 2 ))
-	(cississ . ,(make-pitch -1 0 2 ))
-	(deses . ,(make-pitch -1 1 -2 ))
-	(dessess . ,(make-pitch -1 1 -2 ))
-	(des . ,(make-pitch -1 1 -1 ))
-	(dess . ,(make-pitch -1 1 -1 ))
-	(d . ,(make-pitch -1 1 0 ))
-	(dis . ,(make-pitch -1 1 1 ))
-	(diss . ,(make-pitch -1 1 1 ))
-	(disis . ,(make-pitch -1 1 2 ))
-	(dississ . ,(make-pitch -1 1 2 ))
-	(eeses . ,(make-pitch -1 2 -2 ))
-	(eessess . ,(make-pitch -1 2 -2 ))
-	(eses . ,(make-pitch -1 2 -2 ))
-	(essess . ,(make-pitch -1 2 -2 ))
-	(ees . ,(make-pitch -1 2 -1 ))
-	(eess . ,(make-pitch -1 2 -1 ))
-	(es . ,(make-pitch -1 2 -1 ))
-	(ess . ,(make-pitch -1 2 -1 ))
-	(e . ,(make-pitch -1 2 0 ))
-	(eis . ,(make-pitch -1 2 1 ))
-	(eiss . ,(make-pitch -1 2 1 ))
-	(eisis . ,(make-pitch -1 2 2 ))
-	(eississ . ,(make-pitch -1 2 2 ))
-	(feses . ,(make-pitch -1 3 -2 ))
-	(fessess . ,(make-pitch -1 3 -2 ))
-	(fes . ,(make-pitch -1 3 -1 ))
-	(fess . ,(make-pitch -1 3 -1 ))
-	(f . ,(make-pitch -1 3 0 ))
-	(fis . ,(make-pitch -1 3 1 ))
-	(fiss . ,(make-pitch -1 3 1 ))
-	(fisis . ,(make-pitch -1 3 2 ))
-	(fississ . ,(make-pitch -1 3 2 ))
-	(geses . ,(make-pitch -1 4 -2 ))
-	(gessess . ,(make-pitch -1 4 -2 ))
-	(ges . ,(make-pitch -1 4 -1 ))
-	(gess . ,(make-pitch -1 4 -1 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(gis . ,(make-pitch -1 4 1 ))
-	(giss . ,(make-pitch -1 4 1 ))
-	(gisis . ,(make-pitch -1 4 2 ))
-	(gississ . ,(make-pitch -1 4 2 ))
-	(aeses . ,(make-pitch -1 5 -2 ))
-	(aessess . ,(make-pitch -1 5 -2 ))
-	(ases . ,(make-pitch -1 5 -2 ))
-	(assess . ,(make-pitch -1 5 -2 ))
-	(aes . ,(make-pitch -1 5 -1 ))
-	(aess . ,(make-pitch -1 5 -1 ))
-	(as . ,(make-pitch -1 5 -1 ))
-	(ass . ,(make-pitch -1 5 -1 ))
-	(a . ,(make-pitch -1 5 0 ))
-	(ais . ,(make-pitch -1 5 1 ))
-	(aiss . ,(make-pitch -1 5 1 ))
-	(aisis . ,(make-pitch -1 5 2 ))
-	(aississ . ,(make-pitch -1 5 2 ))
-	(bes . ,(make-pitch -1 6 -2 ))
-	(bess . ,(make-pitch -1 6 -2 ))
-	(b . ,(make-pitch -1 6 -1 ))
-	(b . ,(make-pitch -1 6 -1 ))
-	(h . ,(make-pitch -1 6 0 ))
-	(his . ,(make-pitch -1 6 1 ))
-	(hiss . ,(make-pitch -1 6 1 ))
-	(hisis . ,(make-pitch -1 6 2 ))
-	(hississ . ,(make-pitch -1 6 2 ))
-)
-
-
-
-\version "1.3.146"
diff --git a/ly/paper-as5-init.ly b/ly/paper-as5-init.ly
deleted file mode 100644
index f7f58a3a3d..0000000000
--- a/ly/paper-as5-init.ly
+++ /dev/null
@@ -1,17 +0,0 @@
-% paper-as5-init.ly
-
-\version "1.3.146"
-
-paperAsFive = \paper {
-	staffheight = 5.\char
-
-	\stylesheet #(as-make-style-sheet 'as5)
-	
-	\translator { \StaffContext barSize = #5 }
-
-	% no beam-slope
-	%\translator { \VoiceContext beamHeight = #0 }
-	\include "params-as-init.ly"
-}
-
-\paper { \paperAsFive }
diff --git a/ly/paper-as9-init.ly b/ly/paper-as9-init.ly
deleted file mode 100644
index 86866b0eff..0000000000
--- a/ly/paper-as9-init.ly
+++ /dev/null
@@ -1,16 +0,0 @@
-% paper-as9-init.ly
-
-\version "1.3.146"
-
-paperAsNine = \paper {
-	staffheight = 9.\char
-
-	%\translator { \StaffContext barSize = \staffheight }
-
-	\stylesheet #(as-make-style-sheet 'as9)
-
-	\include "params-as-init.ly"
-	
-}
-
-\paper { \paperAsNine }
diff --git a/ly/paper-init.ly b/ly/paper-init.ly
deleted file mode 100644
index f6ac488597..0000000000
--- a/ly/paper-init.ly
+++ /dev/null
@@ -1,15 +0,0 @@
-\version "1.3.146"
-% paper-init.ly
-
-%% Why som complicated?  /MB
-%linewidth20 = \hsize - 2.5 * \staffheight
-%textheight20 = \vsize - 5.0 * \staffheight
-%linewidth = \staffheight/20.0 * \linewidth20
-%textheight = \staffheight/20.0 * \textheight20
-
-linewidth = \hsize - 2.\cm
-% Leave the textheight calculation to the geometry package. /MB
-%textheight = \vsize - 4.\cm
-
-indent = \linewidth / 14.0
-
diff --git a/ly/paper11-init.ly b/ly/paper11-init.ly
deleted file mode 100644
index 2cc39133f3..0000000000
--- a/ly/paper11-init.ly
+++ /dev/null
@@ -1,12 +0,0 @@
-% paper11-init.ly
-
-\version "1.3.146"
-
-paperEleven = \paper {
-	staffheight = 11.0\pt
-	\stylesheet #(make-style-sheet 'paper11)
-
-	\include "params-init.ly"
-}
-
-\paper { \paperEleven }
diff --git a/ly/paper11.ly b/ly/paper11.ly
deleted file mode 100644
index 313d25a0e4..0000000000
--- a/ly/paper11.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper11-init.ly"
diff --git a/ly/paper13-init.ly b/ly/paper13-init.ly
deleted file mode 100644
index d053f1e440..0000000000
--- a/ly/paper13-init.ly
+++ /dev/null
@@ -1,14 +0,0 @@
-% paper13-init.ly
-
-
-\version "1.3.146"
-
-paperThirteen = \paper {
-	staffheight = 13.0\pt
-
-	\stylesheet #(make-style-sheet 'paper13)
-	
-	\include "params-init.ly"
-}
-
-\paper { \paperThirteen }
diff --git a/ly/paper13.ly b/ly/paper13.ly
deleted file mode 100644
index 7ecec51bbb..0000000000
--- a/ly/paper13.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper13-init.ly"
diff --git a/ly/paper16-init.ly b/ly/paper16-init.ly
deleted file mode 100644
index c747eac11d..0000000000
--- a/ly/paper16-init.ly
+++ /dev/null
@@ -1,12 +0,0 @@
-% paper16-init.ly
-
-\version "1.3.146"
-
-paperSixteen = \paper {
-	staffheight = 16.0\pt
-	\stylesheet #(make-style-sheet 'paper16)
-
-	\include "params-init.ly"
-}
-
-\paper {\paperSixteen }
diff --git a/ly/paper16.ly b/ly/paper16.ly
deleted file mode 100644
index 2621cae3e6..0000000000
--- a/ly/paper16.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper16-init.ly"
diff --git a/ly/paper20-init.ly b/ly/paper20-init.ly
deleted file mode 100644
index 13a67f0809..0000000000
--- a/ly/paper20-init.ly
+++ /dev/null
@@ -1,13 +0,0 @@
-% paper20-init.ly
-
-
-\version "1.3.146"
-
-paperTwenty = \paper {
-	staffheight = 20.0\pt
-	\stylesheet #(make-style-sheet 'paper20)
-	
-	\include "params-init.ly"
-}
-
-\paper { \paperTwenty }
diff --git a/ly/paper20.ly b/ly/paper20.ly
deleted file mode 100644
index 4511cff2ad..0000000000
--- a/ly/paper20.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper20-init.ly"
diff --git a/ly/paper23-init.ly b/ly/paper23-init.ly
deleted file mode 100644
index bbb55106e0..0000000000
--- a/ly/paper23-init.ly
+++ /dev/null
@@ -1,12 +0,0 @@
-% paper23-init.ly
-
-
-\version "1.3.146"
-
-paperTwentythree = \paper {
-	staffheight = 23.0\pt
-	\stylesheet #(make-style-sheet 'paper23)
-	\include "params-init.ly"
-}
-
-\paper { \paperTwentythree }
diff --git a/ly/paper23.ly b/ly/paper23.ly
deleted file mode 100644
index 61dfc7fc1b..0000000000
--- a/ly/paper23.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper23-init.ly"
diff --git a/ly/paper26-init.ly b/ly/paper26-init.ly
deleted file mode 100644
index e64eba6a54..0000000000
--- a/ly/paper26-init.ly
+++ /dev/null
@@ -1,12 +0,0 @@
-% paper26-init.ly
-
-\version "1.3.146"
-
-paperTwentysix = \paper {
-	staffheight = 26.0\pt
-	\stylesheet #(make-style-sheet 'paper26)	
-
-	\include "params-init.ly"
-}
-
-\paper { \paperTwentysix }
diff --git a/ly/paper26.ly b/ly/paper26.ly
deleted file mode 100644
index c874b34f25..0000000000
--- a/ly/paper26.ly
+++ /dev/null
@@ -1,2 +0,0 @@
-
-\include "paper26-init.ly"
diff --git a/ly/params-as-init.ly b/ly/params-as-init.ly
deleted file mode 100644
index b9928df8b1..0000000000
--- a/ly/params-as-init.ly
+++ /dev/null
@@ -1,30 +0,0 @@
-\version "1.3.146"
-% params-as-init.ly
-% generic paper parameters
-
-outputscale = \staffheight / 4.0
-
-linewidth = 60.0 \char
-textheight = 60.0 \char
-indent = 8.0\char
-
-staffspace = (\staffheight - 1.0 ) / 4.0
-stafflinethickness = \staffspace / 2.0
-
-\translator { \NoteNamesContext }
-\translator { \ScoreContext }
-\translator { \ChoirStaffContext }
-\translator { \GraceContext }
-\translator { \RhythmicStaffContext}
-\translator { \StaffContext }
-\translator { \VoiceContext }
-\translator { \StaffGroupContext }
-\translator { \ChordNamesContext }
-\translator { \GrandStaffContext }
-\translator { \LyricsContext }
-\translator { \ThreadContext }
-\translator { \PianoStaffContext }
-\translator { \LyricsVoiceContext }
-\translator { \StaffContainerContext }
-
-
diff --git a/ly/params-init.ly b/ly/params-init.ly
deleted file mode 100644
index f406588183..0000000000
--- a/ly/params-init.ly
+++ /dev/null
@@ -1,48 +0,0 @@
-\version "1.3.146"
-% JUNKME.
-
-%% deprecated
-papersizename = \papersize 
-
-% ly2dvi now uses `papersize' internally (and on cmd line)
-papersize = \papersize
-
-% FIXME
-% direct PostScript line height for single line staves
-lineheight = 14
-
-paperfile = \papersize + "-init.ly"
-
-% paperfile = "a4-init.ly"
-
-\include \paperfile
-\include "paper-init.ly"
-
-staffspace = \staffheight / 4.0
-stafflinethickness = \staffspace / 10.0
-outputscale = \staffheight / 4.0
-
-blotdiameter = 0.4 / \outputscale
-
-\translator { \NoteNamesContext }
-\translator { \ScoreContext }
-\translator { \ChoirStaffContext}
-\translator { \InnerChoirStaffContext}
-
-\translator { \RhythmicStaffContext}
-\translator { \StaffContext }
-\translator { \VoiceContext}
-\translator { \StaffGroupContext }
-\translator { \InnerStaffGroupContext }
-\translator { \ChordNamesContext }
-\translator { \GrandStaffContext}
-\translator { \LyricsContext }
-\translator { \ThreadContext}
-\translator { \PianoStaffContext}
-\translator { \LyricsVoiceContext }
-\translator { \StaffContainerContext }
-
-
-
-
-
diff --git a/ly/part-paper-init.ly b/ly/part-paper-init.ly
deleted file mode 100644
index 4e8fea418f..0000000000
--- a/ly/part-paper-init.ly
+++ /dev/null
@@ -1,10 +0,0 @@
-\version "1.3.146"
-
-% JUNKME
-%part-paper-init.ly
-
-\paper {
-	\translator { \OrchestralPartStaffContext }
-	\translator { \ScoreContext skipBars = ##t }
-}
-
diff --git a/ly/performer-init.ly b/ly/performer-init.ly
deleted file mode 100644
index 97c6638c15..0000000000
--- a/ly/performer-init.ly
+++ /dev/null
@@ -1,124 +0,0 @@
-\version "1.3.146"
-%
-% setup for Request->Element conversion. Guru-only
-%
-StaffContext = \translator {
-	\type "Staff_performer"
-	\name Staff
-	\accepts Voice
-
-	\consists "Key_performer"
-	\consists "Tempo_performer"
-	\consists "Time_signature_performer"
-	dynamicStyle = #"dynamic"
-}
-\translator { \StaffContext }
-\translator { \StaffContext
-  \name RhythmicStaff
-}
-
-
-VoiceContext = \translator {
-	\type "Performer_group_performer"
-	\name Voice
-	\consists "Dynamic_performer"
-	\consists "Span_dynamic_performer"
-	\consists "Piano_pedal_performer"
-	\accepts "Thread"
-}
-\translator { \VoiceContext }
-
-ThreadContext = \translator {
-	\type "Performer_group_performer"
-	\name Thread
-	\consists "Note_performer"
-	\consists "Tie_performer"
-}
-\translator { \ThreadContext }
-
-% retain for compatibility reasons (FIXME: convert-ly)
-\translator {
-	\type "Performer_group_performer"
-	\name Grace
-}
-
-\translator
-{
-	\type "Performer_group_performer"
-	\name VoiceTwo\consists "Note_performer"
-
-}
-
-GrandStaffContext = \translator {
-	\type "Performer_group_performer"
-	\name GrandStaff
-	\accepts RhythmicStaff
-	\accepts Staff
-}
-\translator { \GrandStaffContext }
-
-PianoStaffContext = \translator {
-        \type "Performer_group_performer"
-	\name "PianoStaff"
-	\accepts Staff
-}
-\translator { \PianoStaffContext }
-
-\translator {
-	\type "Performer_group_performer"
-	\consists "Lyric_performer"
-	\name LyricsVoice
-}
-
-\translator{
-	\type "Performer_group_performer"
-	\name ChoirStaff
-	\accepts Staff
-}
-\translator { 
-	\type "Staff_performer"
-	\accepts LyricsVoice
-	\name Lyrics
-	\consists "Time_signature_performer"
-	\consists "Tempo_performer"
-}
-
-\translator {
-	\type "Staff_performer"
-	\accepts ChordNameVoice
-	\name ChordNames
-}
-
-\translator {
-	\type Performer_group_performer
-	\consists Note_performer
-	\name ChordNameVoice	
-}
-
-\translator {
-	\type Performer_group_performer
-
-	\name StaffGroup
-	\accepts Staff
-}
-
-ScoreContext = \translator {
-	\type "Score_performer"
-
-	\name Score
-	instrument = #"bright acoustic"
-	\accepts Staff
-	\accepts GrandStaff
-	\accepts PianoStaff
-	\accepts Lyrics 
-	\accepts StaffGroup
-	\accepts ChoirStaff
-	\accepts RhythmicStaff
-	\accepts ChordNames
-	\consists "Swallow_performer"
-
-	dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume
-	instrumentEqualizer = #default-instrument-equalizer
-}
-\translator { \ScoreContext }
-
diff --git a/ly/property-init.ly b/ly/property-init.ly
deleted file mode 100644
index 83ea32eb9a..0000000000
--- a/ly/property-init.ly
+++ /dev/null
@@ -1,167 +0,0 @@
-% property-init.ly
-
-\version "1.3.146"
-
-stemUp = \property Voice.Stem \set #'direction = #1
-stemDown = \property Voice.Stem \set #'direction = #-1 
-stemBoth= \property Voice.Stem \revert #'direction
-
-slurUp   = \property Voice.Slur \override #'direction = #1
-slurDown = \property Voice.Slur \override #'direction = #-1
-slurBoth = \property Voice.Slur \revert #'direction 
-shiftOn  = \property Voice.NoteColumn \override #'horizontal-shift = #1
-shiftOnn  = \property Voice.NoteColumn \override #'horizontal-shift = #2
-shiftOnnn  = \property Voice.NoteColumn \override #'horizontal-shift = #3
-shiftOff  = \property Voice.NoteColumn \revert #'horizontal-shift 
-
-tieUp = \property Voice.Tie \override #'direction = #1
-tieDown = \property Voice.Tie \override #'direction = #-1
-tieBoth = \property Voice.Tie \revert #'direction 
-
-dynamicUp  = {
-  \property Voice.DynamicText \override #'direction = #1
-  \property Voice.DynamicLineSpanner \override #'direction = #1
-}
-dynamicDown = {
-  \property Voice.DynamicText \override #'direction = #-1
-  \property Voice.DynamicLineSpanner \override #'direction = #-1
-}
-dynamicBoth = {
-  \property Voice.DynamicText \revert #'direction
-  \property Voice.DynamicLineSpanner \revert #'direction
-}
-
-scriptUp  = {
-  \property Voice.TextScript \override #'direction = #1
-  \property Voice.Script \override #'direction = #1
-}
-scriptDown = {
-  \property Voice.TextScript \override #'direction = #-1
-  \property Voice.Script \override #'direction = #-1
-}
-scriptBoth = {
-  \property Voice.TextScript \revert #'direction
-  \property Voice.Script \revert #'direction
-}
-
-dotsUp = \property Voice.Dots \override #'direction = #1
-dotsDown = \property Voice.Dots \override #'direction = #-1
-dotsBoth = \property Voice.Dots \revert #'direction 
-
-% why doubly?
-tupletUp  = {
-  \property Voice.TupletBracket \override #'direction = #1
-  \property Voice.TupletBracket \override #'direction = #1
-}
-tupletDown = {
-  \property Voice.TupletBracket \override #'direction = #-1
-  \property Voice.TupletBracket \override #'direction = #-1
-}
-tupletBoth = {
-  \property Voice.TupletBracket \revert #'direction
-  \property Voice.TupletBracket \revert #'direction
-}
-
-
-
-cadenzaOn = \property Score.timing = ##f
-cadenzaOff = {
-  \property Score.timing = ##t
-  \property Score.measurePosition = #(make-moment 0 1)
-}
-
-newpage = {
-  \break
-  % urg, only works for TeX output
-  \context Score \outputproperty #(make-type-checker 'paper-column-interface)
-    #'between-system-string = #"\\newpage"
-}
-
-% dynamic dir?  text script, articulation script dir?	
-oneVoice = { 	
-  \stemBoth
-  \slurBoth
-  \tieBoth
-  \shiftOff
-}
-
-voiceOne = {
-  \stemUp
-  \slurUp
-  \tieUp
-  \dotsUp    
-}
-
-voiceTwo = {
-  \stemDown
-  \slurDown
-  \tieDown
-  \dotsDown  
-
-}
-   
-voiceThree = {
-  \stemUp
-  \slurUp
-  \tieUp
-  \shiftOn
-  \dotsUp
-}
-
-voiceFour = {
-  \stemDown
-  \slurDown
-  \tieDown
-  \shiftOn
-  \dotsDown
-}
-
-% There's also dash, but setting dash period/length should be fixed.
-slurDotted = \property Voice.Slur \override #'dashed = #1
-slurSolid = \property Voice.Slur \revert #'dashed
-tieDotted = \property Voice.Tie \override #'dashed = #1
-tieSolid = \property Voice.Tie \revert #'dashed
-
-	
-tiny  = 
-	\property Voice.fontSize= -2
-
-
-small  = 
-	\property Voice.fontSize= -1
-
-
-normalsize = {
-	\property Voice.fontSize= 0
-}
-
-normalkey = {
-	\property Staff.keyOctaviation = ##f
-}
-
-specialkey = {
-	\property Staff.keyOctaviation = ##t
-}
-
-% End the incipit and print a ``normal line start''.
-endincipit = \notes{
-    \partial 16 s16  % Hack to handle e.g. \bar ".|" \endincipit
-    \context Staff \outputproperty #(make-type-checker 'clef-interface) #'full-size-change = ##t
-    \context Staff \outputproperty #(make-type-checker 'clef-interface) #'non-default = ##t
-    \bar ""
-}
-
-autoBeamOff = \property Voice.noAutoBeaming = ##t
-autoBeamOn = \property Voice.noAutoBeaming = ##f
-
-emptyText = \property Voice.textNonEmpty = ##f
-fatText = \property Voice.textNonEmpty = ##t
-
-showStaffSwitch = \property PianoStaff.followVoice = ##t
-hideStaffSwitch = \property PianoStaff.followVoice = ##f
-
-
-% To remove a Volta bracet or some other graphical object,
-% set it to turnOff. Example: \property Staff.VoltaBracket = \turnOff
-
-turnOff = #'((meta .  ((interfaces . ()))))
diff --git a/ly/scale-definitions-init.ly b/ly/scale-definitions-init.ly
deleted file mode 100644
index b3268ffef9..0000000000
--- a/ly/scale-definitions-init.ly
+++ /dev/null
@@ -1,100 +0,0 @@
-\version "1.3.146"
-
-
-major = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . 0)
-    (3 . 0)
-    (4 . 0)
-    (5 . 0)
-    (6 . 0)
-  )
-
-minor = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . -1)
-    (3 . 0)
-    (4 . 0)
-    (5 . -1)
-    (6 . -1)
-    )
-
-
-ionian = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . 0)
-    (3 . 0)
-    (4 . 0)
-    (5 . 0)
-    (6 . 0)
-  )  
-
-
-locrian = #'(
-    (0 . 0)
-    (1 . -1)
-    (2 . -1)
-    (3 . 0)
-    (4 . -1)
-    (5 . -1)
-    (6 . -1)
-  )  
-
-
-aeolian = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . -1)
-    (3 . 0)
-    (4 . 0)
-    (5 . -1)
-    (6 . -1)
-    )
-
-
-mixolydian = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . 0)
-    (3 . 0)
-    (4 . 0)
-    (5 . 0)
-    (6 . -1)
-  )  
-
-
-lydian = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . 0)
-    (3 . 1)
-    (4 . 0)
-    (5 . 0)
-    (6 . 0)
-  )  
-
-
-phrygian = #'(
-    (0 . 0)
-    (1 . -1)
-    (2 . -1)
-    (3 . 0)
-    (4 . 0)
-    (5 . -1)
-    (6 . -1)
-)  
-
-
-dorian = #'(
-    (0 . 0)
-    (1 . 0)
-    (2 . -1)
-    (3 . 0)
-    (4 . 0)
-    (5 . 0)
-    (6 . -1)
-  )
-
diff --git a/ly/script-init.ly b/ly/script-init.ly
deleted file mode 100644
index b0fcedd3dc..0000000000
--- a/ly/script-init.ly
+++ /dev/null
@@ -1,47 +0,0 @@
-\version "1.3.146"
-
-
-dashHat= "marcato"
-dashPlus= "stopped"
-dashDash= "tenuto"
-dashBar= "staccatissimo"
-dashLarger= "accent"
-dashDot= "staccato"
-
-
-thumb = \script "thumb"
-accent = \script "accent"
-marcato = \script "marcato"
-staccatissimo = \script "staccatissimo"
-
-% portato is indicated
-% either by
-%   *  slurred & dotted notes. 
-%or by
-%  * slur and dash notes.
-% Neither are  really supported, but c4-.-- should work.
-% portato = \script "portato"
-
-fermata = \script "fermata"
-stopped = \script "stopped"
-staccato = \script "staccato"
-tenuto = \script "tenuto"
-upbow = \script "upbow"
-downbow = \script "downbow"
-lheel = \script "lheel"
-rheel = \script "rheel"
-ltoe = \script "ltoe"
-rtoe = \script "rtoe"
-turn = \script "turn"
-open = \script "open"
-flageolet = \script "flageolet"
-reverseturn = \script "reverseturn"
-trill = \script "trill"
-prall = \script "prall"
-mordent = \script "mordent"
-prallprall = \script "prallprall"
-prallmordent = \script "prallmordent"
-upprall = \script "upprall"
-downprall = \script "downprall"
-segno = \script "segno"
-coda = \script "coda"
diff --git a/ly/spanners-init.ly b/ly/spanners-init.ly
deleted file mode 100644
index 3fdf1b7b31..0000000000
--- a/ly/spanners-init.ly
+++ /dev/null
@@ -1,53 +0,0 @@
-\version "1.3.146"
-
-cr = \spanrequest \start "crescendo"
-decr = \spanrequest  \start "decrescendo"
-rc = \spanrequest   \stop "crescendo"
-rced = \spanrequest \stop "decrescendo"
-
-cresc = \notes {
-  \commandspanrequest \start "crescendo" 
-  \property Voice.crescendoText = #"cresc."
-  \property Voice.crescendoSpanner = #'dashed-line
-}
-
-% ah, this is handy: maybe drop resetting of properties in
-% dynamic-engraver ?
-endcresc = \notes {
-  \commandspanrequest \stop "crescendo" 
-  \property Voice.crescendoText \unset
-  \property Voice.crescendoSpanner \unset
-}
-
-dim = \notes {
-  \commandspanrequest \start "decrescendo" 
-  \property Voice.decrescendoText = #"dim."
-  \property Voice.decrescendoSpanner = #'dashed-line
-}
-
-enddim = \notes {
-  \commandspanrequest \stop "decrescendo" 
-   \property Voice.decrescendoText \unset
- \property Voice.decrescendoSpanner \unset
-}
-
-%{
-
-cresc = \spanrequest \start "crescendo"
-endcresc = \spanrequest \stop "crescendo"
-
-%}
-
-% better name sustainstart/stop? 
-sustainDown = \spanrequest \start "Sustain"
-sustainUp = \spanrequest \stop "Sustain"
-
-unaCorda = \spanrequest \start "UnaCorda"
-treCorde = \spanrequest \stop "UnaCorda"
-
-sostenutoDown = \spanrequest \start "Sostenuto"
-sostenutoUp = \spanrequest \stop "Sostenuto"
-
-%crescpoco = \property Voice.crescendoText = "cresc. poco a poco"
-%decresc = \property Voice.crescendoText = "decr."
-%dim = \property Voice.crescendoText = "dim."
diff --git a/ly/svenska.ly b/ly/svenska.ly
deleted file mode 100644
index c9b54987e9..0000000000
--- a/ly/svenska.ly
+++ /dev/null
@@ -1,43 +0,0 @@
-%
-% common Swedish names for notes. "ess" means flat, "iss" means sharp
-%
-% by Mats Bengtsson.
-
-\pitchnames #`(
-	(cessess . ,(make-pitch -1 0 -2 ))
-	(cess . ,(make-pitch -1 0 -1 ))
-	(c . ,(make-pitch -1 0 0 ))
-	(ciss . ,(make-pitch -1 0 1 ))
-	(cississ . ,(make-pitch -1 0 2 ))
-	(dessess . ,(make-pitch -1 1 -2 ))
-	(dess . ,(make-pitch -1 1 -1 ))
-	(d . ,(make-pitch -1 1 0 ))
-	(diss . ,(make-pitch -1 1 1 ))
-	(dississ . ,(make-pitch -1 1 2 ))
-	(essess . ,(make-pitch -1 2 -2 ))
-	(ess . ,(make-pitch -1 2 -1 ))
-	(e . ,(make-pitch -1 2 0 ))
-	(eiss . ,(make-pitch -1 2 1 ))
-	(eississ . ,(make-pitch -1 2 2 ))
-	(fessess . ,(make-pitch -1 3 -2 ))
-	(fess . ,(make-pitch -1 3 -1 ))
-	(f . ,(make-pitch -1 3 0 ))
-	(fiss . ,(make-pitch -1 3 1 ))
-	(fississ . ,(make-pitch -1 3 2 ))
-	(gessess . ,(make-pitch -1 4 -2 ))
-	(gess . ,(make-pitch -1 4 -1 ))
-	(g . ,(make-pitch -1 4 0 ))
-	(giss . ,(make-pitch -1 4 1 ))
-	(gississ . ,(make-pitch -1 4 2 ))
-	(assess . ,(make-pitch -1 5 -2 ))
-	(ass . ,(make-pitch -1 5 -1 ))
-	(a . ,(make-pitch -1 5 0 ))
-	(aiss . ,(make-pitch -1 5 1 ))
-	(aississ . ,(make-pitch -1 5 2 ))
-	(hessess . ,(make-pitch -1 6 -2 ))
-	(b . ,(make-pitch -1 6 -1 ))
-	(h . ,(make-pitch -1 6 0 ))
-	(hiss . ,(make-pitch -1 6 1 ))
-	(hississ . ,(make-pitch -1 6 2 ))
-)
-\version "1.3.146"