]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-0.1.43
authorfred <fred>
Sun, 24 Mar 2002 20:08:27 +0000 (20:08 +0000)
committerfred <fred>
Sun, 24 Mar 2002 20:08:27 +0000 (20:08 +0000)
14 files changed:
input/gallina.ly [deleted file]
input/gallina.tex [deleted file]
input/scsii-menuetto.ly [deleted file]
input/scsii-menuetto.tex [deleted file]
input/standchen-16.ly [deleted file]
input/standchen-16.tex [deleted file]
input/standchen-20.ly [deleted file]
input/standchen-20.tex [deleted file]
input/standchen.ly [deleted file]
input/standje.ly [deleted file]
input/wtk1-fugue1.ly [deleted file]
input/wtk1-fugue2.ly [deleted file]
input/wtk1-prelude1.ly [deleted file]
input/wtk1-prelude2.ly.m4 [deleted file]

diff --git a/input/gallina.ly b/input/gallina.ly
deleted file mode 100644 (file)
index a45ce1d..0000000
+++ /dev/null
@@ -1,241 +0,0 @@
-\header{
-title =         "La Gallina a 2 violini";
-date =  "1637";
-source =        "the manuscript of Canzoni overo Sonate Concertate "
-        "libro terzo, opera duodecima ";
-composer =      "Tarquinio Merula (1594/95-1665)";
-enteredby =     "Mats Bengtsson";
-copyright =     "Public Domain ";
-}
-
-
-%{
-From mats.bengtsson@s3.kth.seThu Aug 14 02:11:19 1997
-Date: Wed, 13 Aug 1997 18:24:53 +0200
-From: Mats Bengtsson <mats.bengtsson@s3.kth.se>
-To: Han-Wen Nienhuys <hanwen@stack.nl>
-Subject: Re: brevis? 
-
-[snip]
-
-Hopefully it could be useful input to future improvements. I've entered the
-music directly from the 1637 manuscript and intend to publish it public
-domain on for example ftp.gmd.de when finished. You could include it as an
-example in the distribution, but in that case I could add a LaTeX title file.
-There were no beams in the manuscript so I didn't use them in this edition 
-either.
-
-      /Mats
-
-
-Tested Features: Note placement, multipart score, figured base, \breve
-
-%}
-%{
-
-note: the sharp signs hoovering over the bass part are no mistake, but
-part of the basso continuo --HWN
-
-%} 
-
-\version "0.1.8";
-
-vi1=\melodic{
-  \meter 4/4;
-  \octave c'';
-
-  d8 d d d d4 A16 B c A |
-  B8 G G G16 A B8 G G G16 A | 
-  B8 G G A16 B c4 B |
-  A8 D G2 Fis4 |
-  G2 r2 |
-  r1 |
-  d8 d d d d4 A16 B c A |
-  B8 G G G16 A B8 G G G16 A | 
-  B8 G G A16 B c8 e d c |
-  B G c2 B4 |
-  c2 r |
-  r1 |
-  g8 g g g g4 d16 e f d |
-  e8 c c c16 d e8 c c c16 d |
-  e8 c c d16 e f4 e |
-  d8 G c2 B4 |
-  c8 G G G16 A B4 G |
-  r8 G G G16 A B4 G |
-  r8 E16 Fis G8 G  Fis! G G Fis! |
-  G2 r |
-  r1 |
-  r16 d c B A G Fis E D8 d d d16 c |
-  B8 d d d16 c B8 d d d16 e |
-  fis4 g2 fis!4 |
-  r16 g f e d c B A G8 g g g16 f |
-  e8 g g g16 f e8 g g g16 a |
-  b4 c'2 b4 |
-  c'8 g g g16 f e4 d |
-  r8 g g g16 f e4 d |
-  r8 d16 A B8 B16 c A2 |
-  B1 |
-  \meter 3/2;
-  r4 d d d d d |
-  e1. |
-  r4 c c c c c |
-  d1. |
-  r4 d8 c B4 c8 d G4 A8 B |
-  E1. |
-  r4 e8 d cis4 d8 e A4 B8 cis! |
-  Fis1. |
-  r4 d d d d d |
-  e e8 d c4 d8 e A4 B8 c |
-  Fis4 fis8 e d4 e8 fis! B4 c8 d |
-  G4 g g g g g |
-  a4 c'8 b a4 b8 c' f4 g8 a |
-  d4 g g g g g |
-  a d8 c B4 c8 d A2 |
-  \meter 4/4;
-  B1 |
-  d8 d d d d4 A16 B c A |
-  B8 G G G16 A B8 G G G16 A | 
-  B8 G  c2 B4 |
-  c2 r |
-  g8 g g g g4 d16 e f d |
-  e8 G G G16 A B8 d d d16 e |
-  fis4 g2 fis!4 |
-  r16 g f e d c B A G8 g g g16 f |
-  e2 r8 d d d16 e |
-  fis a g fis e d c B A8 d d d16 e |
-  fis4 g2 fis!4 |
-  \cadenza 1;
-  g\breve
-  \bar "|.";
-}
-
-vi2=\melodic{
-  \meter 4/4;
-  \octave c'';
-
-  r1 | r | r | 
-  d8 d d d d4 A16 B c A |
-  B8 G G G16 A B8 G G G16 A | 
-  B8 G G A16 B c4 B |
-  A8 D G2 Fis4 |
-  G2 r2 |
-  r1 |
-  g8 g g g g4 d16 e f d |
-  e8 c c c16 d e8 c c c16 d |
-  e8 c c d16 e f4 e |
-  d8 G c2 B4 |
-  c2 r |
-  r1 |
-  g8 g g g g4 d16 e f d |
-  e2 r8 G G G16 A |
-  B4 G r8 G G A16 B 
-  c4 B A2 |
-  G r16 d c B A G Fis E |
-  D8 d d d16 c B8 d d d16 e |
-  fis4 g g4. fis!8 |
-  g2 r |
-  r16 d c B A G Fis E D8 d d d16 c |
-  B4 c2 B4 |
-  c d G2 |
-  r16 g f e d c B A G8 g g g16 f |
-  e4 d r8 g g g16 f |
-  e4 d r8 c16 G B8 B16 c |
-  A4 G2 Fis4 |
-  G1 |
-  \meter 3/2;
-  r1. |
-  r4 g8 f e4 f8 g c4 d8 e |
-  A1. |
-  r4 a8 g fis4 g8 a d4 e8 fis! |
-  B1. |
-  r4 g g g g g |
-  a1. |
-  r4 a a a a a |
-  b d8 c B4 c8 d G4 A8 B |
-  E4 g8 f e4 f8 g c4 d8 e |
-  A4 a8 g fis4 g8 a d4 e8 fis! |
-  B4 b8 a g4 a8 b e4 fis8 g |
-  c4 A A A A A |
-  B d8 c B4 c8 d D4 E |
-  Fis2 G Fis! |
-  \meter 4/4;
-  G1 |
-  r1 | r1 |
-  g8 g g g g4 d16 e f d |
-  e8 c c c16 d e8 G G G16 A |
-  B8 G c2 B4 |
-  c2 r |
-  r16 d c B A G Fis E D8 d d d16 c |
-  B4 c2 B4 |
-  c8 G G G16 A B d c B A G Fis E |
-  D8 d d d16 e fis16 a g fis e d c B |
-  A d c B A G Fis E D4 d |
-  \cadenza 1;
-  B\breve
-  \bar "|.";
-}
-
-bc=\melodic{
-  \clef "bass";
-  \meter 4/4;
-  \octave c;
-
-  G2 d^"4 3" | G1 |
-  g2 c4 G | d1^"3 4 3" |
-  G1 | g2 c4 G |
-  d1^"3 4 3" | G |
-  g2 c4 d | G1^"3 4 3" |
-  c1 | c2 F4 c | 
-  G1^"3 4 3" | c |
-  c2 F4 c | G1^"3 4 3" |
-  c2 G | g G |
-  c4 G d2^"3 4 3" | G g |
-  fis g | d1^"3 4 3" |
-  G2 B | d1^"3 4 3" |
-  G^"3 4 3" | c4 B c2 |
-  G1^"3 4 3" | c4 B c g |
-  c B c G | d1^"3 4 3" |
-  G1 |
-  \meter 3/2;
-  g1. | c |
-       % 30
-  f | d^"\\textsharp" |
-  g | c |
-  A | d^"\\textsharp" |
-  G | c |
-  d^"\\textsharp" | e |
-  f | g1 B2 |
-  d1.^"3 4 3" |
-  \meter 4/4;
-  G1 |
-  g2 fis | g G |
-  g1^"3 4 3" | c |
-  G^"3 4 3" | c2 G |
-  d1^"3 4 3" | G^"3 4 3" |
-  c2 G | d1^"\\textsharp" ( |
-  ) d^"3 4 3" | 
-  \cadenza 1;
-  G\breve 
-  \bar "|.";
-}
-
-\score{
-  \type Staff_group <
-    \vi1
-    \vi2
-    \bc
-  >
-  \paper{
-    %linewidth=18.\cm;
-     \output "gallina.out";
-    gourlay_maxmeasures=7.;
-  }
-  \midi{ 
-       \tempo 4=90;
-  }
-}
-
-
-
-
-
diff --git a/input/gallina.tex b/input/gallina.tex
deleted file mode 100644 (file)
index 21bbf4d..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% gallina.tex
-% Mats Bengtsson, 17/8 1997
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\documentclass[a4paper]{article}
-
-\addtolength{\oddsidemargin}{-1cm}
-\addtolength{\topmargin}{-1cm}
-\setlength{\textwidth}{15cm}
-\input lilyponddefs
-\input titledefs
-\begin{document}
-
-\title{La Gallina a 2 violini \\ 
-\normalsize from \textit{Canzoni overo Sonate Concertate 
-   libro terzo, opera duodecima}, 1637}
-\composer{Tarquinio Merula (1594/95-1665)}
-%\instrument{M\"a\ss ig} % heu
-%#%\tempo{M\"a\ss ig}
-\makelilytitle
-\input{gallina.out}
-
-
-\end{document}
diff --git a/input/scsii-menuetto.ly b/input/scsii-menuetto.ly
deleted file mode 100644 (file)
index 91c488d..0000000
+++ /dev/null
@@ -1,174 +0,0 @@
-\header{
-filename =      "scsii-menuetto.ly";
-title =         "Cello Suite II";
-subtitle = "Part V";
-instrument = "Menuetto I";             % duh
-description =   "Cello suite transcribed for Viola";
-source =        "?";
-opus =  "BWV 1008 no. 5";
-composer =      "Johann Sebastian Bach(1685-1750)";
-enteredby =     "JCN";
-copyright =     "public domain";
-}
-
-%{
- Tested Features:breaking algorithm, chords, multivoice, accents
-%}
-
-\version "0.1.8";
-
-%% Stuff from MPP version
-% \lefttitle{Menuetto}
-% \tempo{Moderato}
-% \metron{4=120}
-%
-% \key\F               % \key is F( f-major )
-%
-% \slope{30}           % Fool MusiXTeX into 30 / 10 steeper beam
-%              % because piece is set very tightly
-
-IImenuetto = \melodic{
-%      \property Voice.beamslopedamping = \infinity
-       \clef"alto";
-       \property Staff.instrument = cello
-       \meter 3/4;
-       \key bes;
-       \octave c';
-
-       \duration 8;
-               < a2 f2 d2 \f > bes4-.  |
-%%2
-       \textstyle "finger";            % ugh.
-       
-       \multi 2 < 
-               { \stemup; [ bes8^"1"( )a8 bes8-. g8-. ] a4-.^"4" }
-               
-               { \stemdown; < e8_"2" c8_"4" > }
-       > |
-       \stemboth;
-%%3
-%      \property Voice.beamslopedamping = \normal
-       < d4 'bes4-. > g4-. [ f8-. e8-. ] |
-%      \property Voice.beamslopedamping = \infinity
-%%4
-       \multi 2 < 
-               { \stemup; [ f8( e8 )d8 cis8-. 'b8-. 'a8-. ] }
-               { \stemdown; 'a }
-       > |
-       \stemboth;
-%%5
-       < a2 f2 d2 > bes!4-. |
-%%6
-       \multi 2 < 
-               { \stemup; [ bes8 a8 bes8-. g8-. ] }
-               { \stemdown; e8 }
-       >
-       \stemboth;
-       c'!4-. |
-%%7
-       < a4-. f4>
-       < d'4-.-\upbow f4 'bes4 >
-       < e'4-.-\downbow g4 'g4 > |
-%%8
-       < cis'2.-\upbow e2. 'a2. > 
-       \bar ":|:";
-%%9
-       \clef "violin";
-       < e'2 a2 \f >
-%      \property Voice.beamslopedamping = \normal
-       [ d'8( e'16 )f'16 ] |
-%      \property Voice.beamslopedamping = \infinity
-%%10
-       \multi 2 < 
-               { \stemup; [ e'8( d' cis'_"2" )e' a( )g8 ] }
-               { \stemdown; g8 }
-       > |
-       \stemboth;
-%%11
-       \multi 2 <
-               { \stemup; a4( )d'4 cis'4-. }
-               { \stemdown; f2 e4 } 
-       > |
-       \stemboth;
-%%12
-       \multi 2 < 
-               { \stemup; [ g'8^"4"( f' e' )f' d'^"3"( ) c' ] } 
-               { \stemdown; d8 }
-       > |
-       \stemboth;
-%%13
-       \clef "alto";
-       \multi 2 <
-               
-               { \stemup; bes2 c'4 }
-               { \stemdown; g4( )f4 e4 }% ugh
-       > |
-       \stemboth;
-%%14
-       \multi 2 < 
-               { \stemup; [ a8 g8 a8 f8 ] } 
-               { \stemdown; f8 }
-       >
-       \stemboth;
-       < d'4-\upbow e4 'bes4 > |
-%%15
-       < c'4-\downbow f4 'a4 > [ bes8( )a8 g8 a8 ] |
-%%16
-       [ f( e8 )f a8-. g8-. bes8-. ] |
-%%17
-       < a2^"0"^\trill fis2_"3" > bes4 |
-%%18
-       \multi 2 < 
-               { \stemup; [ c'8( )bes8 c' a8 ] } 
-               { \stemdown; es8 }
-       >
-       \stemboth;
-       fis4^\trill |
-%%19
-       < d'4-\downbow g4 'bes4 > < c'4-\upbow g4 c4 > < [ bes8 d8 > a8 ] |
-%%20
-       \multi 2 < 
-               { \stemup; [ c'8( bes8 a8 )bes g( )bes8 ] }
-               { \stemdown; < d8  g8  > }
-       > |
-       \stemboth;
-%%21
-       \multi 2 <  
-               { \stemup; d'4( )cis'4 d'4 }  
-               { \stemdown; g2 f4 }
-       > |
-       \stemboth;
-%%22
-       \multi 2 < 
-               { \stemup; [ g8( )f8 g8 e8 ] f4 }
-               { \stemdown; cis8 d4 }
-       > |
-       \stemboth;
-%%23
-%      \property Voice.beamslopedamping = \normal
-       [ 'g8 g8 ] < e4.^\trill 'a4. > d8-\upbow |
-%      \property Voice.beamslopedamping = \infinity
-%%24
-       \textstyle "roman";             % ugh
-       < d2.^"fine" 'a2. 'd2._"3 mins."> 
-       \bar ":|";
-}
-
-\score{
-       \melodic{ 
-               \IImenuetto 
-       }
-       \paper{
-               linewidth= 150.0\mm;
-               % how does this work?
-               % why does space not have dim?
-               arithmetic_basicspace = 3.2;
-               % how can multiplier have dim?
-               arithmetic_mulitplier = 9.\pt;
-               \output "scsii-menuetto.out";
-       }
-       \midi{ 
-               \tempo 4 = 120;
-               \output "scsii-menuetto.midi";
-       }
-}
diff --git a/input/scsii-menuetto.tex b/input/scsii-menuetto.tex
deleted file mode 100644 (file)
index d6628ae..0000000
+++ /dev/null
@@ -1,19 +0,0 @@
-\documentclass{article}         %UGH
-\usepackage{a4}
-\advance\oddsidemargin-15mm
-\evensidemargin\oddsidemargin
-\advance\textwidth30mm
-\begin{document}
-\input lilyponddefs
-\input titledefs
-\def\interscoreline{\vskip6pt}
-\title{Solo Cello Suites\normalsize\\[2ex]Suite II}
-% \subtitle{Suite II}
-\composer{J.\ S.\ Bach}
-% \lefttitle{Menuetto}
-% \tempo{Moderato}
-% \metron{4=120}
-\instrument{Menuetto I} % heu
-\makelilytitle
-\input scsii-menuetto.out
-\end{document}
diff --git a/input/standchen-16.ly b/input/standchen-16.ly
deleted file mode 100644 (file)
index 8c0bda8..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-\header{
-filename =      "standchen.ly";
-title =         "St\"andchen (Serenade) \"Leise flehen meine Lieder\"";
-opus =  "D. 957 No. 4";
-composer =      "Franz Schubert (1797-1828)"
-        "Text by Ludwig Rellstab (1799-1860)";
-enteredby =     "JCN";
-description = "A schubert song in 16 pt";
-copyright =     "public domain";
-} 
-
-\version "0.1.8";
-
-\include "standchen.ly"
diff --git a/input/standchen-16.tex b/input/standchen-16.tex
deleted file mode 100644 (file)
index e22d627..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-\documentclass{article}         %UGH
-\usepackage{a4}
-\advance\oddsidemargin-15mm
-\evensidemargin\oddsidemargin
-\advance\textwidth30mm
-
-\input titledefs
-%\pagestyle{empty}
-\begin{document}
-\def\interscoreline{\vskip3mm}
-\title{St\"andchen\normalsize\\[2ex](Serenade)}
-\composer{Franz Schubert (1797-1828)}
-\instrument{M\"a\ss ig} % heu
-%#%\tempo{M\"a\ss ig}
-\makelilytitle
-\input{standchen-16.out}
-%\input lelie.tex
-\end{document}
diff --git a/input/standchen-20.ly b/input/standchen-20.ly
deleted file mode 100644 (file)
index 0f9dbee..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-\header{
-filename =      "standchen.ly";
-title =         "St\"andchen (Serenade) Leise flehen meine Lieder\"";
-opus =  "D. 957 No. 4";
-composer =      "Franz Schubert (1797-1828)"
-        "Text by Ludwig Rellstab (1799-1860)";
-enteredby =     "JCN";
-copyright =     "public domain";
-description = "A schubert song in 20 pt";
-} 
-\version "0.1.8";
-
-% fool make-website
-% \include "standchen.ly";
diff --git a/input/standchen-20.tex b/input/standchen-20.tex
deleted file mode 100644 (file)
index d295d2f..0000000
+++ /dev/null
@@ -1,22 +0,0 @@
-\documentclass{article}         %UGH
-\usepackage{a4}
-
-%
-% UGH UGH
-\advance\oddsidemargin-30mm
-\evensidemargin\oddsidemargin
-\advance\textwidth30mm
-\addtolength{\textheight}{20mm}
-\pagestyle{empty}
-\begin{document}
-\input lilyponddefs
-\input titledefs
-\def\interscoreline{\vskip3mm}
-\title{St\"andchen\normalsize\\[2ex](Serenade)}
-\composer{Franz Schubert (1797-1828)}
-\instrument{M\"a\ss ig} % heu
-%#%\tempo{M\"a\ss ig}
-\makelilytitle
-\input{standchen-20.out}
-%\input lelie.tex
-\end{document}
diff --git a/input/standchen.ly b/input/standchen.ly
deleted file mode 100644 (file)
index 73792ca..0000000
+++ /dev/null
@@ -1,508 +0,0 @@
-\header{
-filename =      "standchen.ly";
-title =         "St\"andchen (Serenade) \"Leise flehen meine Lieder\"";
-opus =  "D. 957 No. 4";
-composer =      "Franz Schubert (1797-1828)"
-        "Text by Ludwig Rellstab (1799-1860)";
-enteredby =     "JCN";
-copyright =     "public domain";
-} 
-
-%{
- Tested Features: multivoice, accents, lyrics, chords, piano music,
-multiple \paper{}s in one \score 
-%}
-
-\include "paper20.ly"
-\version "0.1.8";
-
-commands = \melodic{
-       \skip 2.*4;
-       \bar "|:";
-       \skip 2.*24;
-%      volta1
-       \skip 2.*8;
-%      volta2
-       \bar ":|";
-       \skip 2.*22;
-       \bar "|."; 
-       }
-
-melodie = \melodic{ 
-       \meter 3/4;
-       \clef "violin";
-       \key bes;
-       \octave c';
-       \duration 8;
-       r \pp < [ d 'a-| > f-| < d 'a-| > f-| < d 'a-| ] > |
-%%2
-       r < [ d 'bes-| > f-| < d 'bes-| > f-| < d 'bes-| ] > |
-%%3
-       \textstyle "italic";
-       r_"simile" < [ d 'bes > e < d 'bes > e < d 'bes ] >|
-       \textstyle "roman";
-       
-%%4
-       r < [ 'a cis > e < 'a cis > e < 'a cis ] > |
-%%5
-       [2/3 a() bes a ]1/1 d'4. a |
-%%6
-       [2/3 g() a g ]1/1 d'4 g r |
-
-%%7
-       a4.^> g [2/3 g() f e ]1/1 |
-%%8
-       f2 r4 |
-%%9
-       < { a'4.()  g' [2/3 g'( f' )e' ]1/1 }
-       { cis'4. e'_"dolce" \[2/3 e' \] } > |
-%%10
-       < f'2. d'2. > |
-%%11
-       [2/3 a ()  bes a ]1/1 f'4. a |
-%%12
-       [2/3 g()   a g ]1/1 e'4. d' |
-%%13
-       c'4. bes [2/3 bes()   a g ]1/1 |
-%%14
-       a2 r 
-       < { d'()  c'4. g [2/3 bes a g ]1/1 }
-       { f \p ()  e4._"dolce" bes \[2/3 g \] } > |
-%%16
-       < a2. f2. > |
-%%17
-       \textstyle "italic";
-       [ a8._"cresc." cis'16 ] f'4. e'
-       \textstyle "roman";|
-%%18
-       [ d'8. a16 ] f4. d |
-%%19
-%#%    c'\grace\stemup
-       [2/3 bes ()   a bes ]1/1 d'4. bes |
-%%20
-       a2. |
-%%21
-%#%    a\grace
-       [2/3 g()  fis g ]1/1 bes4.^> g |
-%%22
-       f!2. |
-%%23
-       [ a8. \mf cis'16 ] f'4. e' |
-%%24
-       [ d'8. a16 ] fis4. d |
-%%25
-       [2/3 b \mf()   ais b ]1/1 d'4. b |
-%%26
-       < a2. fis2. > |
-%%27
-       [2/3 e' \f()  dis' e' ]1/1 g'4. cis' |
-%%28
-       < d'2. fis2. > |
-%#%\volta1
-%%29
-       < { bes2( [ d'8.() )bes16 ] }
-       { g2 \mf [ bes8. g16 ] } > |
-%%30
-       < { a4. [ a-. a-. a-. ] }
-       { fis4. [ fis-.( fis-. )fis-. ] } > |
-%%31 
-       < { a4. [ a-. a-. a-. ] }
-       { g4. [ cis-.( e-. )g-. ] } > |
-%%32
-       < a2 fis2 \pp > < a4 fis4 > |
-%%33
-       < { b2( [ d'8.() )b16 ] }
-       { g2 [ b8. g16 ] } > |
-%%34
-       < { a4. [ a-. a-. a-. ] }
-       { fis4. [ fis-.( fis-. )fis-. ] } > |
-%%35
-       < { a4. [ a-. a-. a-. ] }
-       { g4. [ cis-.( e-. )g-. ] } > |
-%%36
-       < a2. fis2. > |
-%#%\volta2
-%%37
-       [ a8. a16 ] [ cis'8. cis'16 ] [ e'8. e'16 ] |
-%%38
-       d'4()  cis'4 r4 |
-%%39
-%#%    > a4. [ cis' e'8. >! d'16 ] |
-       a4. \> [ cis' e'8. \! d'16 ] |
-%%40
-       cis'2 r4 |
-%%41
-       < fis'4. \> cis'4. \f > e' [2/3 e'()  d' \! cis' ]1/1 |
-%%42
-       [ b8. cis'16 ] d'4^> b r |
-%%43
-
-       [ b8. \f cis'16 ] d'4^> b r |
-%%44
-       [ b8. \> cis'16 ] d'4^> b \! r |
-%%45
-       [2/3 b \p ()  ais b ]1/1 d'4. b |
-%%46
-       <a!2. fis2. > |
-%%47
-       [2/3 e' \f()  dis' e' ]1/1 g'4.^> cis' |
-%%48
-       \textstyle "italic";
-       < 
-       { fis2.(
-       %\group "+1"; 
-               \stemdown )f2. }
-       { d'2. ( \stemup
-               ) d'4 r4_"decresc." d'4 } 
-       >
-       \textstyle "roman"; |
-%%50
-       < bes2. e2. > |
-%%51
-       < a2. cis2. > |
-%%52
-       < fis2 d2 > < a4 fis4 \pp > |
-%%53
-
-       < bes2 g2 > < [ d'8.^> bes8. > < bes16 g16 ] > |
-%%54
-       < { a4. [ a-. a-. a-. ] }
-       { fis4. [ fis-.( fis-. )fis-.] } > |
-%%55
-       < { a4. [ a-. a-. a-. ] }
-       { g4. [ cis-.( e-. )g-. ] } > |
-%%56
-       \textstyle "italic";
-       < a2. fis2._"dim." >
-       \textstyle "roman"; |
-%%57
-       < a2. fis2. > |
-%%58
-       < a2.^\fermata fis2. > |
-%#%\tighten
-}
-
-begeleiding = \melodic{ 
-       \meter 3/4;
-       \clef"bass";
-       \key bes;
-       \octave c';
-       \duration 2;
-       'd r4 |
-%%2
-       ''bes r4 |
-
-%%3
-       ''g r4 |
-
-%%4
-       ''a r4 |
-%%5
-\duration 8;
-       \multi 2 < { \stemup    
-               [ 'f 'a d 'a d 'a ] 
-               [ 'd 'e 'g 'e 'g 'e ] 
-               [ 'cis 'e 'g 'e 'g 'e ]
-               [ 'd 'a d 'a d 'a ]
-               }
-       { \stemdown 
-               'd2 r4 
-                ''bes2 r4 
-                ''a2 r4
-               'd2 r4
-       } >
-%%9
-       \stemboth
-       [ 'a e g e g e ] |
-%%10
-       [ 'd 'a d 'a d 'a ] |
-%%11
-       \multi 2 <      
-       { \stemup
-               [ 'f 'a d 'a d 'a ]
-               [ 'd 'e 'g 'e 'g 'e ] 
-               [ 'e 'g 'bes 'g 'bes 'g ] 
-               [ 'a c f c f c ]
-       } { \stemdown 
-               'd2 r4 
-                ''bes2 r4
-                'c2 r4 
-                'f2 r4 } 
-       >
-%%15
-       \stemboth
-       [ 'c 'g 'bes 'g 'bes 'g ] |
-%%16
-       [ ''f 'c 'f 'c 'f 'c ] |
-       \multi 2 <
-       { \stemup 
-               [ ''a 'e 'g 'e 'g 'e ][ 'd 'a d 'a d 'a ]
-               [ ''bes 'f 'bes 'f 'bes 'f ][ ''f 'c 'f 'c 'f 'c ] }
-       { \stemdown 
-               ''a2 r4
-               'd2 r4 
-               ''bes2 r4 
-               ''f2 r4 
-       } > 
-%%21
-       \stemboth
-       < [ 'e 'c > 'g c 'g c 'g ] |
-%%22
-       [ 'f 'a c 'a 'f 'c ] |
-       \multi 2 < {
-               \stemup
-               [ ''a 'e 'g 'e 'g 'e ] 
-               [ 'd 'fis 'a 'fis 'a 'fis ] 
-               [ ''g 'd 'b 'd 'b 'd ] 
-               [ 'd 'a d 'a d 'a ] 
-       }
-       {\stemdown
-               ''a2 r4 
-               'd2 r4 
-               ''g2 r4 
-               'd2 r4 
-       }
-       >
-       \stemboth
-       < [ 'cis ''a > 'e 'a 'e 'a 'e ] |
-%%28
-       [ 'd 'a d 'a d 'a ] |
-%%29
-       [ 'd 'g 'bes 'g 'bes 'g ] |
-%#%\volta1
-%%30 
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%%31
-       [ ''a 'e 'a 'e 'a 'e ] |
-%%32
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%%33
-       [ 'd 'g 'b 'g 'b 'g ] |
-%%34
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%%35
-       [ ''a 'e 'a 'e 'a 'e ] |
-%%36
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%#%\volta2
-%%37
-       [ ''a 'e 'g 'e ''bes^> 'e ] |
-%%38
-       [ ''a < e cis 'a > < e cis 'a > < e cis 'a > < e cis 'a > < e cis 'a ] > |
-%%39
-       [ ''a 'e 'g 'e ''bes^> 'e ] |
-%%40
-       [ ''a < e cis 'a > < e cis 'a > < e cis 'a > < e cis 'a > < e cis 'a ] > |
-%%41
-       [ ''ais 'e 'fis 'e 'fis 'e ] |
-%%42
-       < [ 'd ''b > 'fis 'b 'fis 'b 'fis ] |
-%%43
-       < [ 'e ''b > 'g 'b 'g 'b 'g ] |
-%%44
-       < [ 'd ''b > 'fis 'b 'fis 'b 'fis ] |
-%%45
-       \multi 2 < { \stemup 
-               [ ''g 'd 'b 'd 'b 'd ] 
-               [ 'd 'a d 'a d 'a ] 
-       } {
-               \stemdown
-               ''g2 r4
-               'd2 r4 
-       } >
-
-%%47
-       \stemboth
-       < [ 'cis ''a > 'e 'a 'e 'a 'e ] |
-%%48
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%%49
-       [ 'd 'a d 'a d 'a ] |
-%%50
-       [ ''g 'e 'g 'e 'g 'e ] |
-%%51
-       [ ''a 'e 'g 'e 'g 'e ] |
-%%52
-       [ ''d 'd 'fis 'd 'fis 'd ] |
-%%53
-       [ 'd 'g 'bes 'g 'bes 'g ] |
-%%54
-       [ 'd 'fis 'a 'fis 'a 'fis ] |
-%%55
-       [ ''a 'e 'g 'e 'g 'e ] |
-%%56
-       [ ''d ''a 'd ''a 'd ''a ] |
-%%57
-       [ ''d ''a 'd ''a 'd ''a ]
-%%58
-       < 'd2.^\fermata ''d2. > |
- }
-
-
-tekstI = \lyric{
-       \meter 3/4;
-       \duration 4;
-       _ _ _
-       _ _ _
-       _ _ _
-       _ _ _
-% 5
-       \[2/3 Lei- se8 \] fleh-4. en8 
-       \[2/3 mei- ne8 \] Lie- der8 _8
-       Durch4. die8 \[2/3 Nacht zu8 \] 
-       dir;2 _    
-       _ _ _ 
-       _ _ _
-% 11
-       \[2/3 In den8 \] stil-4. len8 
-       \[2/3 Hain her-8 \] nie-4. der,8
-       Lieb4. chen,8 \[2/3 komm zu8 \] 
-       mir!2 _
-       _ _ _ 
-       _ _ _
-
-% 17
-       Fl\"us-8. ternd16 schlan-4. ke8 
-       Wip-8. fel16 rau-4. schen8
-       \[2/3 In des8 \] Mon-4. des8 
-       Licht;2.
-       _ _ _ 
-       _ _ _
-
-% 23
-       Des8. Ver-16 r\"a-4. ters8 
-       feind-8. lich16 Lau-4. schen8
-       \[2/3 F\"urch- te,8 \] Hol-4. de,8 
-       nicht.2.
-       _ _ _ 
-       _ _ _
-
-% volta 1
-% 29
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-
-% volta 2
-% 37
-       La\ss8. auch16 dir8. die16 Brust8. be-16
-       we- gen, _
-       Lieb-4. chen,8 h\"o-8. re16 
-       mich!2 _
-       Be-8. bend16 harr' ich8 _8
-       dir8. ent-16 ge- gen!8 _8
-       \[2/3 Komm, be-8 \] gl\"u4. cke8 
-       mich!2.
-       _ _ _ _ _ _
-% 47
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-% 57
-       _ _ _ _ _ _ 
-       
-}
-
-tekstII = \lyric{
-    \meter 3/4;
-       \duration 4;
-       _ _ _
-       _ _ _
-       _ _ _
-       _ _ _
-% 5
-       \[2/3 H\"orst die8 \] Nach-4. ti-8 
-       \[2/3 gal- len8 \] schla- gen?8 _8
-       Ach!4. sie8 \[2/3 fleh- en8 \] 
-       dich,2 _
-       _ _ _ 
-       _ _ _
-
-% 11
-       \[2/3 Mit der8 \] T\"o-4. ne8
-       \[2/3 s\"u\ss- en8 \] Kla-4. gen8
-       Fleh-4. en8 \[2/3 sie f\"ur8 \]
-       mich.2 _
-       _ _ _ 
-       _ _ _
-
-% 17
-       Sie-8. ver-16 stehn4. des8
-       Bus-8. ens16 Seh-4. nen,8
-       \[2/3 Ken- nen8 \] Lieb-4. es-8 
-       schmerz,2.
-       _ _ _ 
-       _ _ _
-
-% 23
-       R\"uh-8. ren16 mit4. den8 
-       Sil-8. ber-16 t\"o-4. nen8
-       \[2/3 Jed- es8 \] wei-4. che8 
-       Herz.2.
-       _ _ _ 
-       _ _ _
-% volta 1
-% 29
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-
-% volta 2
-% 37
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _ 
-       _ _ _ _ _ _
-% 47
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-       _ _ _ _ _ _
-% 57
-       _ _ _ _ _ _ 
-       
-}
-themusic = 
-       <       
-               \type Lyrics < 
-                       \tekstI
-                        \tekstII
-               >
-               \type Grandstaff   <
-                       \melodic < \melodie \commands >
-                       \melodic < \begeleiding \commands >
-               >
-       >
-
-
-\score{
-       \themusic
-       \midi{
-               \tempo 4 = 54;
-       }
-       \paper{
-               \paper_twenty
-               % 20pt music uses whole pagewidth
-               % ja Vette Pech.  Koop maar een A3 printer
-               % huh? [jcn]
-               linewidth= 195.\mm;
-               arithmetic_multiplier = 7.\pt;
-               
-               gourlay_maxmeasures = 9.;
-               \output "standchen-20.out";
-       }
-       \paper{
-               % 16pt mustn't use whole page width
-               linewidth= 160.\mm;
-               arithmetic_multiplier = 6.\pt;
-               gourlay_maxmeasures = 9.;
-               \output "standchen-16.out";
-       }
-}
diff --git a/input/standje.ly b/input/standje.ly
deleted file mode 100644 (file)
index e6d29fd..0000000
+++ /dev/null
@@ -1,208 +0,0 @@
-\header{
-filename =      "standje.ly";
-title =         "St\"andchen (Serenade) \"Leise flehen meine Lieder\"";
-opus =  "D. 957 No. 4";
-composer =      "Franz Schubert (1797-1828)"
-        "Text by Ludwig Rellstab (1799-1860)";
-enteredby =     "JCN";
-copyright =     "public domain";
-} 
-
-%{
- Tested Features@ multivoice, accents, lyrics, chords, piano music,
-multiple \paper{}s in one \score 
-%}
-
-\version "0.1.8";
-
-$vocal_verse1 = \melodic{
-       \octave c';
-       % ugh: treble/bass
-%      \clef treble;
-       \clef violin;
-       [2/3 g8( )as] g \] c'4. g8 |
-       [2/3 f8( )g] f \] c'4 f8 r |
-       g4.-> f8 [2/3 f( )es] d \] |
-       es2 r4 |
-       % ugh: a whole should be a measure
-       %r1 |
-       r2. |
-       r2. |
-       [2/3 g8( )as] g \] es'4. g8 |
-       [2/3 f8( )g] f \] d'4. c'8 |
-       bes4. as8 [2/3 as( )g] f \] |
-       g2 r4 |
-       r2. |
-       r2. |
-       g8. b16 es'4. d'8 |
-       c'8. g16 es4. c8 |
-       % [as3 2\grace( bes3 2\grace] )
-       [2/3 as8( )g] as \] c'4. as8 |
-       g2. |
-       %[f3 2\grace( g] )
-       [2/3 f8( )e] f \] as4. f8 |
-       es!2. |
-       g8. b16 es'4. d'8 |
-       c'8. g16 e4. c8 |
-       % [a3 2\grace b] )
-       [2/3 a!8( ) gis] a \] c'4. a8 |
-       g!2. |
-       [2/3 d'8\f cis'] d \] f'4. b8 |
-       c'2. |
-       r2. |
-       r2. |
-}
-
-$lyric_verse1 = \lyric{
-% 5
-       \[2/3 Lei-4 se8 \] fleh-4. en8 |
-       \[2/3 mei-4 ne8 \] Lie-4 der8 _8 |
-       Durch4. die8 \[2/3 Nacht4 zu8 \] |
-       dir;2 _4 |
-       _4 _ _ |
-       _ _ _ |
-% 11
-       \[2/3 In4 den8 \] stil-4. len8 |
-       \[2/3 Hainr4 her-8 \] nie-4. der,8 |
-       Lieb4. chen,8 \[2/3 komm4 zu8 \] |
-       mir!2 _4 |
-       _4 _ _ |
-       _ _ _ |
-% 17
-       Fl\"us-8. ternd16 schlan-4. ke8 |
-       Wip-8. fel16 rau-4. schen8 |
-       \[2/3 In4 des8 \] Mon-4. des8 |
-       Licht;2. |
-       _4 _ _ |
-       _4 _ _ |
-% 23 
-       Des8. Ver-16 r\"a-4. ters8 |
-       feind-8. lich16 Lau-4. schen8 |
-       \[2/3 F\"urch-4 te,8 \] Hol-4. de,8 |
-       nicht,2. |
-       \[2/3 f\"urch-4 te,8 \] Hol-4. de,8 |
-       nicht.2. |
-       _4 _ _ 
-       _ _ _
-}
-       
-$treble_intro = \melodic{
-       \octave c';
-       \clef violin;
-       % ugh: i'd like to type this!
-       %r8 [<'g-. c-.> <c-. es-.> <'g-. c-.> <c-. es-.> <'g-. c-.>] |
-       r8 <['g-. c-.> <c-. es-.> <'g-. c-.> <c-. es-.> <'g-. c-.]> |
-       r8 <['as-. c-.> <c-. es-.> <'as-. c-.> <c-. es-.> <'as-. c-.]> |
-       r8 <['as-. c-.> <c-. d-.> <'as-. c-.> <c-. d-.> <'as-. c-.]> |
-       r8 <['g-. 'b-.> <'b-. d-.> <'g-. 'b-.> <'b-. d-.> <'g-. 'b-.]> |
-       
-}
-
-$treble_verse1 = \melodic{
-       \octave c';
-       \clef violin;
-       r8 <['g c> <c es> <'g c> <c es> <'g c]> |
-       r8 <['f c> <c d> <'f c> <c d> <'f c]> |
-       r8 <['f 'g 'b> <'g 'b d> <'f 'g 'b> <'g 'b d> <'f 'g 'b]> |
-       r8 <['es 'g c> <'g c es> <'es 'g c> <'g c es> <'es 'g c]> |
-       <g'4.( b> <)f'8 d'> <[2/3 f' d'> <es' c'> <d' b]1/1> |
-       <c'2. e'> |
-       r8 <['g c> <c es> <'g c> <c es> <'g c]> |
-       r8 <['f c> <c d> <'f c> <c d> <'f c]> |
-       r8 <['f 'as 'bes> <'as 'bes d> <'f 'g 'bes> <'g 'bes d> <'f 'g 'bes]> |
-       r8 <['es 'g 'bes> <'g 'bes es> <'es 'g 'bes> <'g 'bes es]> 
-       <{ es'( | )bes4. as8}{ c'( | )d4.( )f8 } > 
-       < [2/3 f as> <es g> <d f]1/1> |
-       <es2. g> |
-       r8 <['f 'g> <'g 'b> <'f 'g> <'g 'b> <'f 'g]> |
-       r8 <['es 'g> <'g c> <'es 'g> <'g c> <'es 'g]> |
-       r8\pp <['es 'as c> <'as c es> <'es 'as c> <'as c es> <'es 'as c]> |
-       r8 <['es 'g 'bes> <'g 'bes 'es> <'es 'g 'bes> <'g 'bes 'es> <'es 'g 'bes]> |
-       % [as3 2\grace( bes )
-       [2/3 as8(( g )as]1/1 c'4.-> ) as8 |
-       g2. |
-       r8 <['f 'g> <'g 'b> <'f 'g> <'g 'b> <'f 'g]> |
-       r8 <['e 'g> <'g c> <'e 'g> <'g c> <'e 'g]> |
-       r8 <['f 'a c> <'a c f> <'f 'a c> <'a c f> <'f 'a c]> |
-       r8 <['e 'g c> <'g c e> <'e 'g c> <'g c e> <'e 'g c]> |
-       <{[2/3 f'8\f( e f']1/1 a'4. )f'8 } {\[2/3 f e f \] a4. f8 } > |
-       <e2 e'> r4 |
-%      <{as!2\mf( [c'8. )as16]} {f2 as8( )f}> |
-       as!2\mf( [c'8. )as16] |
-       <e4. g> <[e8-.( g-.> <e8-. g-.> <)e8-. g-.]> |
-}
-
-$bass_intro = \melodic{
-       \octave c;
-       \clef bass;
-       <'c2 c> r4 |
-       <''as2 'as> r4 |
-       <''f2 'f> r4 |
-       <''g2 g> r4 |
-}
-
-$bass_verse1 = \melodic{
-       \octave c;
-       \clef bass;
-       <'c2 c> r4 |
-       <'as2 as> r4 |
-       <'g2 g> r4 |
-       <'c2 c> r4 |
-       <'g8 g> <[g' d''> <d'' f''> <g' d''> <d'' f''> <g' d'']> |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-       <'c2 c> r4 |
-}
-               
-               
-global= \melodic {\meter 3 /4; \key bes es as; }
-
-               
-\score{
-       \melodic<
-               \type Lyrics { 
-                       \meter 3 /4; \skip 4 * 12; \$lyric_verse1
-               }
-               \type Staff { < 
-                       \global 
-                       { \skip 4 * 12; \$vocal_verse1 }
-               > }
-               
-               % i want a (grand) staff!!!
-               
-               \type Grandstaff < 
-                       < 
-                               \global
-                               { \$treble_intro \$treble_verse1 }
-                       >
-                       < 
-                               \global
-                               { \$bass_intro \$bass_verse1 }
-                       >
-               >
-       >
-       \paper{
-               % how does this work?
-               % previously we had the clear 'ideal whole note space' setting?
-               arithmetic_multiplier = 6.\pt;
-               % ugh: the *first* (intro) line may only have four measures...
-               gourlay_maxmeasures = 4.;
-       }
-}
-
diff --git a/input/wtk1-fugue1.ly b/input/wtk1-fugue1.ly
deleted file mode 100644 (file)
index e48c55b..0000000
+++ /dev/null
@@ -1,207 +0,0 @@
-\header{
-filename =      "fugue1.ly";
-title =                 "Fuga a 4";
-description =   "Das Wohltemperierte Clavier I, Fuga I (c-major)";
-opus =           "BWV 846";
-composer =      "Johann Sebastian Bach (1685-1750)";
-enteredby =     "Shay Rojansky";
-copyright =     "Public Domain";
-}
-
-%{
-       
-%}
-\version "0.1.8";
-
-
-global = 
-    \melodic {
-         \meter 4/4;                % should be \meter C
-    }
-  
-tenor =
-    \melodic {
-        \clef "violin";
-        \octave c';
-
-        \stemdown
-        r8 [c8 d e] [f. g32 f] [e8 a] |
-        [d g] ~ [g16 a g f] [e f e d] [c d c 'b] |
-        ['a8 fis] g4 ~ [g8 fis16 e] [f8 d] |
-        [g f! e d] c r r g ~ |
-%% 5
-        [g f16 e] f4 ~ [f16 f e8] d4 |
-        [c8 f] r16 [g f e] [f8 d] g4 ~ |
-       g4 r4 r2 |
-       r1 |
-       r8 [g8 a b] [c'. d'32 c'] [b8 e']
-%% 10
-       [a d'] ~ [d'16 e' d' c'] b8 r8 r d |
-       [e fis] [g. a32 g] [fis8 b e a] ~ |
-       [a16 b a gis] [fis8 f!] [e d] ~ [d16 e fis gis] |
-       [a gis a b] [gis fis gis a] b8 r8 r4 |
-       r8 [c8 d e] \stemup [f. g32 f] [e8 a] |
-%% 15
-       [d g] ~ [g16 a g f] e8 \stemdown [e fis g] ~ |
-       [g8 fis] [gis8 a] ~ [a g! a b] |
-       \stemboth
-       [c'. d'32 c'] [b8 e'] [a d'] ~ [d'16 e' d' c'] |
-       [b8 g' cis' d'] [e' cis' d' e' ] |
-       \stemdown a8 r8 r e [fis g] \stemboth [a. b32 a] |
-%% 20
-       [g8 c' fis b] ~ [b16 c' b a] \stemdown [g fis e d] \stemboth |
-       e4 \stemdown d ~ [d16 a g f!] [e g f! a] |
-       g4 ~ [g16 a bes8] c'4 [d'8 g] |
-       \stemboth g4. f8 ~ [f e] d4 |
-       \stemdown e8 a4 g8 ~ [g8 f g a] |
-%% 25
-       [bes8. c'32 b] [a8 d'] [g c'] ~ [c'16 d' c' bes] |
-       [a bes a g] [f g f e] d4 ~ [d8. g16] |
-       a4 r16 [f'16 d'8] e'2 |
-    }
-
-
-soprane =
-    \melodic {
-        \octave c';
-        \stemup
-        r1 |
-        r2 r8 [g8 a b] |
-        [c'. d'32 c'] [b8 e'] [a d'] ~ [d'16 e' d' c'] |
-        [b g a b] [c' b c' d'] [e' d' e' fis'] [g'8 b] |
-%% 5
-       [c' a] [d'16 c' b a] [g8. g16] [f e f g] |
-       [a g a b] c'2 b4 |
-       \octave c'';
-       r8 [c8 d e] [f. g32 f] [e8 a] |
-       [d g] ~ [g16 a g f] [e8 a] ~ [a16 b a g] |
-       f2 [e8. fis16] g4 ~
-%% 10
-       g4 fis [g16 f! e d] [c d c 'b] |
-       ['a16 c 'b 'a] 'g8 r8 r16 [c16 'b 'a] ['gis8 e] |
-       [d c16 'b16] ['a 'gis 'a 'b] [c 'fis 'a 'gis] ['b8 'a16 'b]
-       [c8 f e d] ~ [d c16 'b] ['b8. 'a16] |
-       'a4 r4 r2 |
-%% 15
-       r2 r8 ['g8 'a 'b] |
-       [c8. d32 c] ['b8 c] [d e] [f!. g32 f!] |
-       [e8 a d g] ~ [g16 a g f] [e8 a] |
-       [d8 bes] [a g16 f] [g f g e] [f g g f32 g] |
-       [a16 cis d g] [e8. d16] d8 r8 r4 |
-%% 20
-       r2 r4 r8 'g |
-       ['a 'b] [c. d32 c] ['b8 e 'a d] ~ |
-       [e16 e d c] ['b c d e] [f g a g] [f e d c] |
-       'b4 [c8 d] 'g c4 'b8 |
-       c4 ['b8 'bes8] 'a d4 c8 |
-%% 25
-       [d8 e] f4 ~ [f16 a g f] [e f e d] |
-       c2 r16 ['g32 'a 'b!16 c] [d e f8] ~ |
-       [f32 c d e f16 g] [a8. b16] <g2 c'2> |
-    }
-
-alt =
-    \melodic {
-        \clef "bass";
-        \octave c;
-       
-       \stemup
-       r1 |
-       r |
-       r |
-       r8 [g8 a b] [c'. d'32 c'] [b8 e'] |
-%% 5
-       [a d'] ~ [d'16 e' d' c'] [b8 c' ~ c' bes8] |
-       [a d' g c'] r16 [a16 b c'] d'4 |
-       g4 r8 g8 [a b] [c'. d'32 c'] |
-       [b8 e' a d'] ~ [d'16 e' d' c'!] [b!8 e'] ~ |
-       e'4 d'4 [c'16 b c' a] [e' d' c' b] |
-%% 10
-       [c'16 a b c'] [d' c' b a] g4 r4 |
-       r1 |
-       r8 [e8 fis gis] [a. b32 a] [gis8 c'] |
-       [fis b] ~ [b16 c' b a] gis8 a4 gis8 |
-       a4 r8 g8 [a b] c'. [d'32 c'] |
-%% 15
-       [b8 e' a d'] ~ [d' g] d'4 |
-       [c'8 a] e'4 d'8 r8 r4 |
-       r8 [a8 b cis'] [d'. e'32 d'] [c'!8 f'] |
-       [b8 e'] ~ [e'16 f' e' d'] cis'8 r8 r4 |
-       r8 [a8 b cis'] [d'. e'32 d'] [c'!8 fis'] |
-%% 20
-       [b e'] ~ [e'16 fis' e' d'] c'2 ~ |
-       [c'16 d' c' b] [a g a fis] [g8 b c' d'] |
-       [e'. f'32 e'] [d'8 g'] [c' f'] ~ [f'16 g' f' e'] |
-       d'4 [e'8 d'] ~ [d' g] g4 ~
-       [g8 c d e] [f. g32 f] [e8 a] |
-%% 25
-       [d g] ~ [g16 a g f] [e d e f] [g a bes g] |
-       [a e f g] [a b c' a] b2 |
-       c'1 |
-    }
-
-bass =
-    \melodic {
-        \clef "bass";
-        \octave c;
-
-       \stemdown
-        r1 |
-       r |
-       r |
-       r |
-%% 5
-       r2 r8 [c8 d e] |
-       [f. g32 f] [e8 a] [d g] ~ [g16 a g f] |
-       [e f e d] [c d c 'b] ['a8 d a fis] |
-       [g16 a bes g] [cis8 d] a4 e4 |
-       [a16 b c' d'] [c' b a g] c'8 r8 r4 |
-%% 10
-       r2 r8 ['g8 'a 'b] |
-       [c. d32 c] ['b8 e] ['a d] ~ [d16 e d c] |
-       'b8 e4 d8 c f!4 e8 ~ |
-       e d4 e8 [f! e16 d] e4 |
-       'a4 r4 r2 |
-%% 15
-       r8 ['g8 'a 'b] [c. d32 c] ['b8 e] |
-       ['a8 d] ~ [d16 e d c] ['b8 'bes 'a g'] |
-       ['a8 fis g e] d4 [e8 f!] |
-       [g8. a32 g] [f8 bes] [e a] ~ [a16 bes a g] |
-       [f e f d] [g8 a] d2 ~ |
-%% 20
-       [d16 e d c] ['b 'a 'g 'fis] ['e8 e fis g] ~ |
-       [g a16 g16] [fis8 d] g2 ~ |
-       g2 a4 [b8 c'] |
-       [f16 a g f] [e d c 'b] [c d e f] [g8 'g] |
-       c1 ~ |
-%% 25
-       c1 ~ |
-       c1 ~ |
-       c1 |
-    }
-
-        
-\score {
-    \melodic \type Grandstaff < 
-                \multi 2 <
-                       \global 
-                       \soprane
-                       \tenor
-                 >
-                 \multi 2 <
-                       \global
-                       \alt
-                      \bass
-                 >
-             >
-
-    \paper{
-       gourlay_maxmeasures =5.;
-%      castingalgorithme = \Wordwrap
-    }
-    \midi {
-        \tempo 4 = 84;
-    }
-}
-
-% EOF
diff --git a/input/wtk1-fugue2.ly b/input/wtk1-fugue2.ly
deleted file mode 100644 (file)
index 2d90c2a..0000000
+++ /dev/null
@@ -1,191 +0,0 @@
-\header{
-filename =      "wohltemperirt.ly";
-title =         "Fuga a 3";
-description =   "Das Wohltemperierte Clavier I, Fuga II (c-minor)";
-opus =  "BWV 847-Fuga";
-source =        "Henle's Urtext";
-composer =      "Johann Sebastian Bach (1685-1750)";
-enteredby =     "HWN and Werner Lemberg";
-copyright =     "Public Domain";
-}
-%{
- Tested Features: stem direction, multivoice, forced accidentals.
-%}
-
-\version "0.1.8";
-
-                                    % should add \need{dutch.ini} for
-                                    % correct parsing of note names
-
-global = 
-    \melodic {
-         \meter 4/4;                % should be \meter C
-         \keyCminor 
-        \skip 1*31;
-        \bar "|."; |
-    }
-  
-dux =
-    \melodic {
-        \clef "violin";
-        \octave c';
-
-        \stemdown
-        r8 [c'16 b] [c'8 g] [as c'16 b] [c'8 d'] |
-        [g c'16 b] [c'8 d'] [f16 g] as4 [g16 f] |
-        [es c' b a] [g f! es d] [c8 es' d' c'] |
-        [bes a bes c'] [fis g a fis] |
-%% 5
-        g4 r16 [c d es] [f g as8~] [as16 d es f] |
-        [g a bes8~] [bes16 es f g] [as g f es] [d8 c'16 b!] |
-                                                    % forced accident!
-        c'4 r4 r8 [f' es' d'] |
-        r8 [as g f] [g f16 es] [f8 d] | 
-        g4 r8 b [c' c'16 b] [c'8 g] |
-%% 10   
-        as4 r8 a [bes bes16 a] [bes8 f] |
-        g4 r8 g [as as g f] |
-       \translator Staff=bass \stemup
-        \octave c; r8 [as bes c'] r8 [as16 g] [as8 f8] |
-        [bes8 c' bes as] [bes g f es] |
-        [f des' c' bes] [c' as g f] |
-%% 15
-       \translator Staff=treble \stemdown
-        g8 \octave c'; [g16 fis] [g8 c] [es g16 fis!] [g8 a] |
-        [d g16 fis] [g8 a!] [c16 d] es4 [d16 c] |
-                                                    % forced accident!
-        'bes8 r8 r16 [d e fis] [g a bes8~] [bes16 e f g] |
-        [a bes c'8~] [c'16 fis16 g a] [bes8 es!16 d] [es8 'g] |
-        ['as f16 es] [f8 'a8] ['bes g16 f] [g8 'b] |
-%% 20
-        [c16 f es d] [c Bes! As G] [F8 as g f] |
-        [es d es f] [B c d B] |
-        c4 r8 e8 [f f16 e] [f8 c] |
-        d4 r8 d8 [es8 es16 d] [es8 Bes] |
-        c2 ~  [c8 d16 es][ f es f d] |
-%% 25
-        B8 r8 r B c r r es |
-        d r r f~ f r r f |
-        [es as g f] [es d es f] |
-        [B c d B] [B c] r c |
-        [f16 d es c]~ [c8 B] c4 r8 e |
-%% 30
-        f4 r8 f [f es16 d] [es8 <f as]> |
-        <B d> r <B d> r <G2 c> |
-    }
-
-
-comes =
-    \melodic {
-        \octave c'';
-        \stemup
-        r1 |
-        r1 |
-        r8 [g16 fis] [g8 c] [es g16 fis] [g8 a] |
-        [d8 g16 fis] [g8 a] [c16 d] es4 [d16 c] |
-%% 5
-        ['bes8 es16 d] [es8 'g8] ['as f16 es] [f8 'a] 
-        ['bes8 g16 f] [g8 'b] [c8 d16 es] f4~ |
-        [f8 es16 d] [c16 'bes! 'as 'g] ['f8 as g f] 
-        [es d es f] ['b c d 'b] |
-        [c g16 fis] [g8 d] es4 r8 e8 |
-%% 10 
-        [f f16 e] [f8 c8] d4 r8 d |
-        [es8 es16 d] [es8 'bes] [c es16 d] [es8 f] |
-        ['bes es16 d] [es8 f] ['as16 'bes] c4 ['bes16 'as] |
-        [G16 Es F G] [As Bes c d] [es d c d] [es f g a] |
-        [bes F G As] [Bes c d e] [f es d es] [ f g a b] |
-%% 15
-        [c'8 b16 a] [g f! es d] [c8 es d c] |
-        [Bes A Bes c] [Fis! G A Fis] |
-                                                    % forced accident
-        [G8 d16 c] d8 r8 r8 [e16 d] e8 r8 |
-        r [fis16 e] fis8 r r [G16 F] G8 r8 |
-        r8 [A16 G] A8 r r [B16 A] B8 r |
-%% 20
-        r8 [c16 'b] [c8 'g] [As c16 'b] [c8 d] |
-        [G c16 B] [c8 d] [F16 G] As4 [G16 F] |
-        [Es8 c16 B] [c8 G] As4 r8 A |
-        [Bes8 Bes16 A] [Bes8 F8] 'g4 r8 G~ |
-        [G As16 Bes] [c B c As] F2~ |
-%% 25
-        [F8 d16 c] [d8 F] [Es es16 d] [es8 G] |
-        [F f16 es] [f8 As] [G16 f es d] [c B A G] |
-        [c8 f es d] r [As G F] |
-        [G F16 Es] [F8 D] [As G] r A |
-        [B c] [F16 Es D C] C8 [c16 B] [c8 G] |
-%% 30
-        [As c16 B] [c8 <d 'b! 'as!]> [G8 c16 B] [c8 d] |
-        [F16 G] As4 [G16 F] E2 |
-    }
-
-bassdux =
-    \melodic {
-        \clef "bass";
-        \octave c';
-        r1 |
-        r |
-        r |
-        r |
-%% 5
-        r |
-        r1 |
-        r8 [c16 B] [c8 G] [As c16 B] [c8 d] |
-        [G c16 B] [c8 d] [F16 G] As4 [G16 F] | 
-        \octave c; [es c' b a] [g f es d] [c d es d] [c Bes! As! G] |
-                                                    % -> \classic_accidentals
-%% 10
-        [F bes as g] [f es d c] [Bes c d c] [Bes As G F] |
-        [Es as g f] [es des c Bes] [As8 c' bes as] |
-        [g8 f g as] [d es f d] |
-        [es as g f] [g es d c] |
-        [d bes as g] [as f es d!] |
-%% 15
-        es8 r8 r4 r8 [c Bes A] |
-        r [es d c] [d c16 Bes] [c8 d] |
-        [G8 bes16 a] [bes8 d] [es c'16 bes] [c'8 e] |
-        [f d'16 c'] [d'8 fis] g4 r16 [G A B] |
-        [c16 d es8~] [es16 A Bes c] [d es f8~] [f16 'b c d] |
-%% 20    
-        es8 r r e [f F Es! D] |                     % -> \classic_accidentals
-        r [As G F] [G F16 Es] [F8 G] |
-        [c16 d  es d] [c Bes As G] [F bes as g] [f es d c] |
-        [Bes c d c] [Bes As G F] [Es as g f] [es d c Bes] |
-        [As Bes c Bes] [As G F Es] [D g f es] [d c B A] |
-%% 25
-        G4 r4 r16 [G A B] [c d es f] |
-        [g f as g] [f es d c] [B8 c16 B] [c8 G] |
-        [As c16 B] [c8 d] [G c16 B] [c8 d] |
-        [F16 G] As4 [G16 F] Es4 r8 es |
-        [d c g G]
-%% 30
-        \multi 2 <
-               { \stemup c2~ | c1~ | c1 }
-               { \stemdown C2~ | C1~ | C1 }
-        >
-    }
-
-        
-\score {
-    \melodic \type Grandstaff < 
-       \type Staff=treble  < 
-                       \global 
-                       \dux
-                       \comes 
-                 >
-       \type Staff=bass  <
-                       \global
-                       \bassdux
-                 >
-    >
-
-    \paper{
-       gourlay_maxmeasures =5.;
-       
-    }
-    \midi {
-        \tempo 4 = 84;
-    }
-}
-
-% EOF
diff --git a/input/wtk1-prelude1.ly b/input/wtk1-prelude1.ly
deleted file mode 100644 (file)
index dea0195..0000000
+++ /dev/null
@@ -1,184 +0,0 @@
-\header{
-filename =      "prelude1.ly";
-title =         "Preludium";
-description =   "Das Wohltemperierte Clavier I, Prelude I (c-major)";
-opus =  "BWV 846";
-composer =      "Johann Sebastian Bach (1685-1750)";
-enteredby =     "Shay Rojansky";
-copyright =     "Public Domain";
-}
-
-\version "0.1.8";
-
-global = 
-    \melodic {
-        \meter 4/4;                % should be \meter C
-    }
-  
-
-% should do programmable input.
-
-soprane =
-    \melodic {
-        \clef "violin";
-        \octave c';
-
-       \multi 2 <
-       % Real soprane
-       {\stemup
-       r8 [g16 c'] [e' g c' e'] r8 [g16 c'] [e' g c' e'] |
-       r8 [a16 d'] [f' a d' f'] r8 [a16 d'] [f' a d' f'] |
-       r8 [g16 d'] [f' g d' f'] r8 [g16 d'] [f' g d' f'] |
-       r8 [g16 c'] [e' g c' e'] r8 [g16 c'] [e' g c' e'] |
-       r8 [a16 e'] [a' a e' a'] r8 [a16 e'] [a' a e' a'] |
-       r8 [fis16 a] [d' fis a d'] r8 [fis16 a] [d' fis a d'] |
-       r8 [g16 d'] [g' g d' g'] r8 [g16 d'] [g' g d' g'] |
-       r8 [e16 g] [c' e g c'] r8 [e16 g] [c' e g c'] |
-       r8 [e16 g] [c' e g c'] r8 [e16 g] [c' e g c'] |}
-       % Tenor
-       {\stemdown
-       r16 e8. ~ e4 r16 e8. ~ e4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 e8. ~ e4 r16 e8. ~ e4 |
-       r16 e8. ~ e4 r16 e8. ~ e4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 c8. ~ c4 r16 c8. ~ c4 |
-       r16 c8. ~ c4 r16 c8. ~ c4 |}>
-%% 10  
-       r8 [d16 fis] [c' d fis c'] r8 [d16 fis] [c' d fis c'] |
-       r8 [d16 g] [b d g b] r8 [d16 g] [b d g b] |
-       r8 [e16 g] [cis' e g cis'] r8 [e16 g] [cis' e g cis'] |
-       r8 [d16 a] [d' d a d'] r8 [d16 a] [d' d a d'] |
-       r8 [d16 f] [b d f b] r8 [d16 f] [b d f b] |
-       r8 [c16 g] [c' c g c'] r8 [c16 g] [c' c g c'] |
-       r8 ['a16 c] [f 'a c f] r8 ['a16 c] [f 'a c f] |
-       r8 ['a16 c] [f 'a c f] r8 ['a16 c] [f 'a c f] |
-       r8 ['g16 'b] [f 'g 'b f] r8 ['g16 'b] [f 'g 'b f] |
-       r8 ['g16 c] [e 'g c e] r8 ['g16 c] [e 'g c e] |
-%% 20
-       r8 ['bes16 c] [e 'bes c e] r8 ['bes16 c] [e 'bes c e] |
-       r8 ['a16 c] [e 'a c e] r8 ['a16 c] [e 'a c e] |
-       r8 ['a16 c] [ees 'a c ees] r8 ['a16 c] [ees 'a c ees] |
-       r8 ['b16 c] [d 'b c d] r8 ['b16 c] [d 'b c d] |
-       r8 ['g16 'b] [d 'g 'b d] r8 ['g16 'b] [d 'g 'b d] |
-       r8 ['g16 c] [e 'g c e] r8 ['g16 c] [e 'g c e] |
-       r8 ['g16 c] [f 'g c f] r8 ['g16 c] [f 'g c f] |
-       r8 ['g16 'b] [f 'g 'b f] r8 ['g16 'b] [f 'g 'b f] |
-       r8 ['a16 c] [fis 'a c fis] r8 ['a16 c] [fis 'a c fis] |
-       r8 ['g16 c] [g 'g c g] r8 ['g16 c] [g 'g c g] |
-%% 30
-       r8 ['g16 c] [f 'g c f] r8 ['g16 c] [f 'g c f] |
-       r8 ['g16 'b] [f 'g 'b f] r8 ['g16 'b] [f 'g 'b f] |
-       r8 ['g16 'bes] [e 'g 'bes e] r8 ['g16 'bes] [e 'g 'bes e] |
-
-       r8 ['f16 'a] [c f c 'a] [c 'a 'f 'a] ['f 'd 'f 'd] |
-       r8 [g16 b] [d' f' d' b] [d' b g b] [d f e d] |
-       <e1 g c'> ||
-    }
-
-bass =
-    \melodic {
-        \clef "bass";
-        \octave c;
-
-       \stemdown
-       c'2 c' |
-       c' c' |
-       b b |
-       c' c' |
-       c' c' |
-       c' c' |
-       b b |
-       b b |
-       a a |   
-%% 10
-       \multi 2 <
-       % Alt
-       {\stemup
-       r16 a8. ~ a4 r16 a8. ~ a4 |
-       r16 b8. ~ b4 r16 b8. ~ b4 |
-       r16 bes8. ~ bes4 r16 bes8. ~ bes4 |
-       r16 a8. ~ a4 r16 a8. ~ a4 |
-       r16 aes8. ~ aes4 r16 aes8. ~ aes4 |
-       r16 g8. ~ g4 r16 g8. ~ g4 |
-       r16 f8. ~ f4 r16 f8. ~ f4 |
-       r16 f8. ~ f4 r16 f8. ~ f4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 e8. ~ e4 r16 e8. ~ e4 |
-%% 20
-       r16 g8. ~ g4 r16 g8. ~ g4 |
-       r16 f8. ~ f4 r16 f8. ~ f4 |
-       r16 c8. ~ c4 r16 c8. ~ c4 |
-       r16 f8. ~ f4 r16 f8. ~ f4 |
-       r16 f8. ~ f4 r16 f8. ~ f4 |
-       r16 e8. ~ e4 r16 e8. ~ e4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 ees8. ~ ees4 r16 ees8. ~ ees4 |
-       r16 e!8. ~ e4 r16 e8. ~ e4 |
-%% 30
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 d8. ~ d4 r16 d8. ~ d4 |
-       r16 c8. ~ c4 r16 c8. ~ c4 |
-
-       r16 c8. ~ c4 ~ c2 |
-       r16 'b8. ~ 'b4 ~ 'b2 |
-       c1 ||}
-
-       % Bass
-       {\stemdown
-       d2 d |
-       g g |
-       g g |
-       f f |
-       f f |
-       e e |
-       e e |
-       d d |
-       'g 'g |
-       c c |
-%% 20
-       c c |
-       'f 'f |
-       'fis 'fis |
-       'aes 'aes |
-       'g 'g |
-       'g 'g |
-       'g 'g |
-       'g 'g |
-       'g 'g |
-       'g 'g |
-%% 30
-       'g 'g |
-       'g 'g |
-       'c 'c |
-       
-       'c 'c |
-       'c 'c |
-       'c1 }>
-    }
-
-        
-\score {
-    \melodic \type Grandstaff < 
-                  <
-                       \global 
-                       \soprane
-                 >
-                  <
-                       \global
-                      \bass
-                 >
-             >
-
-    \paper{
-       gourlay_maxmeasures =5.;        
-    }
-    \midi {
-        \tempo 4 = 84;
-    }
-}
-
-% EOF
diff --git a/input/wtk1-prelude2.ly.m4 b/input/wtk1-prelude2.ly.m4
deleted file mode 100644 (file)
index 98f6c8a..0000000
+++ /dev/null
@@ -1,88 +0,0 @@
-%% under construction
-
-define(preludepattern, `[' $1 $2 $3 $2 `]')
-define(preludehalfmeasure, preludepattern($1, $2, $3) 
-       preludepattern($4, $2, $3))
-
-define(intromeasure,
-       preludehalfmeasure($1, $2, $3, $4)
-       preludehalfmeasure($1, $2, $3, $4)|     
-)
-define(handymeasure, `intromeasure(translit($*,` ', `,'))')
-
-
-
-trebleIntro=\melodic {
-\octave c';
-handymeasure(c' es d c)
-handymeasure(as f e c)
-handymeasure(b f es d)
-handymeasure(c g f es)
-handymeasure(es' as g es)
-handymeasure(d' fis e d)
-handymeasure(d' g fis d)
-handymeasure(c' e d c)
-handymeasure(c' f e c)
-handymeasure(bes f es d)
-handymeasure(bes g f es)
-handymeasure(as g f es)
-handymeasure(as d c Bes)
-handymeasure(g Bes As es)
-handymeasure(f c Bes A)
-handymeasure(f d c B)
-handymeasure(es c B G)
-handymeasure(F es d f)
-handymeasure(Fis c b es)
-handymeasure(es c B G)
-handymeasure(fis c B A)
-handymeasure(g c B d)
-handymeasure(as c B d)
-}
-
-bassIntro = \melodic {
-\octave c;
-handymeasure(c g f es)
-handymeasure(c as g f)
-handymeasure(c as g f)
-handymeasure(c es d g)
-handymeasure(c c' bes as)
-handymeasure(c a g fis)
-handymeasure(Bes bes a g)
-handymeasure(Bes g f e)
-handymeasure(As as g f)
-handymeasure(As d c f)
-handymeasure(G es d g)
-handymeasure(c es d As)
-handymeasure(d f es as)
-handymeasure(es g f as)
-handymeasure(es a g f)
-handymeasure(d f es as)
-handymeasure(c f e as)
-preludehalfmeasure(c, es, d, f)
-preludehalfmeasure(bes, es, d, f)|
-handymeasure(As c b d)
-handymeasure(A es d c)
-handymeasure(G es d f)
-handymeasure(G es d c)
-handymeasure(G es d f)
-handymeasure(G es d f)
-}
-
-
-middlepiece = \melodic
-{
-       \octave c;
-       \stemdown
-       [G B d] 
-       \stemup f [as f ef] [b f d' b'] [as f e f] |
-       \stemdown [G c es]]
-       \stemup g [c' g fis g ] [es' c' g' es'] [c' as g as]| 
-       \stemdown [G A fis] 
-       \translator Staff=treble
-       \stemsboth \octave c';
-       c [es c B c] [fis  c a fis] [es c B c] |
-}
-
-
-
-}