]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-1.0.8
authorfred <fred>
Tue, 26 Mar 2002 21:25:36 +0000 (21:25 +0000)
committerfred <fred>
Tue, 26 Mar 2002 21:25:36 +0000 (21:25 +0000)
132 files changed:
Documentation/index.yo
Documentation/ntweb/index.yo
Documentation/topdocs/AUTHORS.yo
TODO
init/engraver.ly
input/keys.ly
input/kortjakje.ly
input/pedal.ly
input/praeludium-fuga-E.ly
input/rhythm.ly
input/scales.ly
input/scripts.ly
input/test/a.ly
input/test/beams.ly
input/test/broken.ly
input/test/collisions.ly
input/test/denneboom.ly
input/test/font-body.ly
input/test/font.ly
input/test/font16.ly
input/test/gourlay.ly
input/test/knee.ly
input/test/sleur.ly
input/test/slur-damping.ly
input/test/slurs.ly
input/test/spacing.ly
input/test/stem.ly
input/test/title.ly
input/test/transposition.ly
input/tril.ly
input/twinkle-pop.ly
input/twinkle.ly
lily/chord-iterator.cc
lily/include/chord-iterator.hh
lily/include/identifier.hh
lily/include/lily-proto.hh
lily/include/linear-programming.hh
lily/include/music-list.hh
lily/include/music.hh
lily/include/musical-pitch.hh
lily/include/musical-request.hh
lily/include/my-lily-parser.hh
lily/include/request.hh
lily/include/score-column.hh
lily/include/voice-iterator.hh
lily/item.cc
lily/linear-programming.cc
lily/music-iterator.cc
lily/music-list.cc
lily/music-sequence.cc [new file with mode: 0644]
lily/music.cc
lily/my-lily-parser.cc
lily/parser.yy
lily/request-iterator.cc
lily/voice-iterator.cc
make/lilypond-vars.make
make/mutopia-targets.make
mi2mu/mudela-stream.cc
mudela-mode.el
mutopia/Coriolan/bassi-part.ly
mutopia/Coriolan/clarinetti-part.ly
mutopia/Coriolan/clarinetti.ly
mutopia/Coriolan/clarinetto-1.ly
mutopia/Coriolan/clarinetto-2.ly
mutopia/Coriolan/contrabasso-part.ly
mutopia/Coriolan/contrabasso.ly
mutopia/Coriolan/coriolan.ly
mutopia/Coriolan/corni-part.ly
mutopia/Coriolan/corni.ly
mutopia/Coriolan/corno-1.ly
mutopia/Coriolan/corno-2.ly
mutopia/Coriolan/fagotti-part.ly
mutopia/Coriolan/fagotti.ly
mutopia/Coriolan/fagotto-1.ly
mutopia/Coriolan/fagotto-2.ly
mutopia/Coriolan/flauti-part.ly
mutopia/Coriolan/flauti.ly
mutopia/Coriolan/flauto-1.ly
mutopia/Coriolan/flauto-2.ly
mutopia/Coriolan/global.ly
mutopia/Coriolan/oboe-1.ly
mutopia/Coriolan/oboe-2.ly
mutopia/Coriolan/oboi-part.ly
mutopia/Coriolan/oboi.ly
mutopia/Coriolan/timpani.ly
mutopia/Coriolan/trombe-part.ly
mutopia/Coriolan/trombe.ly
mutopia/Coriolan/trombo-1.ly
mutopia/Coriolan/trombo-2.ly
mutopia/Coriolan/viola-1.ly
mutopia/Coriolan/viola-2.ly
mutopia/Coriolan/viola-part.ly
mutopia/Coriolan/violino-1-part.ly
mutopia/Coriolan/violino-1.ly
mutopia/Coriolan/violino-2-part.ly
mutopia/Coriolan/violino-2.ly
mutopia/Coriolan/violoncello-part.ly
mutopia/Coriolan/violoncello.ly
mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Allemande.ly [new file with mode: 0644]
mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Sinfonia.ly [new file with mode: 0644]
mutopia/J.S.Bach/Petites-Preludes/preludes-1.ly
mutopia/J.S.Bach/Petites-Preludes/preludes-2.ly
mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly
mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly
mutopia/J.S.Bach/Petites-Preludes/preludes-6.ly
mutopia/J.S.Bach/Solo-Cello-Suites/allemande-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/allemande-viola.ly
mutopia/J.S.Bach/Solo-Cello-Suites/courante-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/courante-viola.ly
mutopia/J.S.Bach/Solo-Cello-Suites/gigue-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/gigue-viola.ly
mutopia/J.S.Bach/Solo-Cello-Suites/menuetto-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/menuetto-viola.ly
mutopia/J.S.Bach/Solo-Cello-Suites/prelude-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/prelude-viola.ly
mutopia/J.S.Bach/Solo-Cello-Suites/sarabande-cello.ly
mutopia/J.S.Bach/Solo-Cello-Suites/sarabande-viola.ly
mutopia/J.S.Bach/wtk1-fugue1.ly
mutopia/J.S.Bach/wtk1-fugue2.ly
mutopia/J.S.Bach/wtk1-prelude1.ly
mutopia/W.A.Mozart/cadenza.ly
mutopia/W.A.Mozart/horn-concerto-3.ly
mutopia/gallina.ly
mutopia/los-toros-oboe.ly
mutopia/standchen-16.ly
mutopia/standchen-20.ly
mutopia/standchen.ly
scripts/convert-mudela.py
scripts/mudela-book.py
stepmake/Documentation/topdocs/AUTHORS.yo
tex/fetdefs.tex
tex/lily-debug.tex [new file with mode: 0644]

index b9066871c0396b3257fbad6e5cf0aebecd901789..aa87b18f09cb73380512335ba4117c96688033ae 100644 (file)
@@ -39,7 +39,7 @@ nsubsect(Documentation: manuals)
 
 
 itemize(
-it()url(Mudela)(../tex/DOEXPAND(outdir)/mudela.html)
+it()url(Mudela)(../tex/DOEXPAND(outdir)/tutorial.html)
 it()url(TeX documents about LilyPond)(../tex/DOEXPAND(outdir)/index.html)
 it()url(Manual pages)(../man/DOEXPAND(outdir)/index.html)
 it()url(Musical vocabulary)(../tex/DOEXPAND(outdir)/vocabulary.html)
index bb54acd47df4fae9f718034b8eef4ead009e0ed0..4460f700c880eea3d573ca0e041c1cee9df0232b 100644 (file)
@@ -115,11 +115,11 @@ subsect(Running LilyPond) label(running)
 
 itemize(
   it()Take a look at url(angels.ly)(angels.ly)
-  it()Save angles.ly to your local disk
+  it()Save angels.ly to your local disk
   it()From a Command Prompt run: nl()
-  bf(ly2dvi.py angles.ly) nl()
-  bf(dvips angles.dvi) nl()
-  bf(cmd /c angles.ps) nl()
+  bf(ly2dvi.py angels.ly) nl()
+  bf(dvips angels.dvi) nl()
+  bf(cmd /c angels.ps) nl()
 )
 
 link(Back to top)(contents)
index a1cde6d1e0decbd3c04c352af864ad12566c84b6..99a54a24a9220467b98df36833110fcd90c19576 100644 (file)
@@ -24,6 +24,8 @@ it()nemail(Werner Lemberg)(xlwy01@uxp1.hrz.uni-dortmund.de),
     misc bugfixes, some Beam and Stem code. 
 it()nemail(David R. Linn)(drl@vuse.vanderbilt.edu),
     Mailing list maintenance.
+it()nemail(Adrian Moriano)()
+    Documentation fixes, glossary.
 it()nemail(Han-Wen Nienhuys)(hanwen@cs.uu.nl), 
     lurl(http://www.cs.uu.nl/~hanwen)
     nl()
diff --git a/TODO b/TODO
index 69008b66f2a1d763e24e6b3328390ab04b11d0ae..76db5e603e4d894a08c8d3e874b42b3d28b4ea3d 100644 (file)
--- a/TODO
+++ b/TODO
@@ -7,11 +7,12 @@ done, or is an idea that I want to think about
 Most of the items are marked in the code as well, with full explanation. 
 grep for TODO and ugh/ugr/urg
 
-       * fix LOCALE settings, and \def\foo{2,000pt} output
+       * egcs-1.1a support
 
+       * fix LOCALE settings, and \def\foo{2,000pt} output
 
-       * use streambufs to provide IO handling for TeX stream, mudela stream,
-data-file.
+       * use streambufs and iostream
+       to provide IO handling for TeX stream, mudela stream, data-file.
 
        * seriously buffer TeX output (do profile of writing .5 mb TeX file.)
 
@@ -21,11 +22,30 @@ data-file.
 
        * repeat bars: need distance after ":|" and before "|:"
 
-       * doco should not depend on a4
-
        * text continuationss
 
-       * fix plain tex footer line.
+       * revise documentation
+
+       * abbrev -> tremolo
+
+       * Language:
+       - general plet mechanism.
+
+               \plet 2/3 { c8 c8 c8 }
+
+       ie.
+
+               Music: PLET int '/' int Music
+
+       - \type -> \context ?
+       - \translator -> ?
+       - fix \partial 
+       - \melodic -> \notes
+       - \bla {} vs \bla ; 
+       - mix engraver hacking with music ?
+       - \once\property  KEY = VAL
+       - \addtranslator, \removetranslator
+       - junk ^ and _ for scripts
 
        * install TeX stuff into tex/generic directory.
 
@@ -76,24 +96,21 @@ data-file.
 
        * fix vertical alignment and stafflines
 
-       *GrandStaff needs more work -- I want a single word `harpsichord' to the
-          left of the grandstaff, not one on each stave.
-          (Organ staff -- with separate pedal -- but common properties may be
-          something to think about.  Of course for organ you want to be able
-          to give stop indications on the way through, so the \property
-          Voice.Instrument would be a stop, and \property
-          GrandStaff.instrument would be PipeOrgan...)
-
+       * GrandStaff needs more work -- I want a single word
+       `harpsichord' to the left of the grandstaff, not one on each
+       stave.  (Organ staff -- with separate pedal -- but common
+       properties may be something to think about.  Of course for
+       organ you want to be able to give stop indications on the way
+       through, so the \property Voice.Instrument would be a stop,
+       and \property GrandStaff.instrument would be PipeOrgan...)
 
        * make Tie_req a "command" { <c g> ~ <c g> }
 
        * bib ep1988
 
-       * mix engraver hacking with music ?
-
        * revise the Score_priority_align_engraver concept.  It sucks. 
 
-       * ly2xdvi
+       * ly2xdvi, ly2ps
 
        * make new VoiceOne, VoiceTwo, VoiceThree contexts with
 ydirection and hshift preset
@@ -273,8 +290,6 @@ ydirection and hshift preset
 
        * xdvi: PS in magnifying glass.
 
-       * GNU patch 2.1: hardcoded limit of 1024 to the linelength
-
        * GNU diff 2.7: diff -rN does not see a new directory with empty file
 
        * GNU patch 2.1: <must find simple example> if patch chokes on a
@@ -294,7 +309,6 @@ ydirection and hshift preset
        * GNU make: move hardcoded builtin rules to runtime ?
 
        * GNU patch 
-         - rewrite ? -> check out GNU patch 2.5
          - 'double-fix' mode: ignore identical fix, rather than suggest 
            to revert patch direction when (more or less? exactly) the same 
            thing is fixed
@@ -325,16 +339,12 @@ PROJECTS
  
 
        * use properties for:
-       - Text_style
-       - default_octave
        - plet?
        - Staff_sym size
        - default tempo.
        - font size
        - bartypes (get rid of derived Span_bar_engravers)
        - cadenza mode? 
-       - MIDI instrument
-       - staff title
 
        * page handling:
        - PS output
@@ -355,11 +365,9 @@ PROJECTS
        * \header
        - output header info to MIDI too.
 
-       * Add mudela-output to Rosegarden. (contact Derek Wyatt)
-
        * a musical dictionary. See Documentation/vocabulary-*, other
        languages:
-       - explanation
+       - explanations
        - italian
        - german
        - dutch
@@ -526,7 +534,7 @@ SMALLISH PROJECTS
        * write Dynamic_line (to group dynamics horizontally)
 
        * use Real for all y positions.
-       - use translate_axis( .. ,Y_AXIS) 
+       - use translate_axis( .. ,Y_AXIS)  iso separate variables.
 
        * half-sharps, half-flats
 
@@ -536,9 +544,6 @@ SMALLISH PROJECTS
 
        * centered whole rest
 
-        * qtor, btor, mtor-> tor( QUIET_ver ), tor( DEBUG_ver ), etc.
-       - use tors feature in lily (?)
-
        * declare notenametab?
 
        * midi esp.: use I32 iso int where 32 bits are needed (or assumed...)
@@ -558,10 +563,7 @@ SMALLISH PROJECTS
 
        * textspanner: center position
 
-       * Brackets
-       
-
-            % toe to bheel   four to five
+        *   % toe to bheel   four to five
            %   ^_u            4_5  
            %     -                           
            %  --|x--         --|x--
@@ -611,12 +613,9 @@ IDEAS
 
        * versioning stuff (cvt mudela, mudela, etc.)
 
-       * padded vertical alignment (rods for vertical placement)
-
-       * use String iso Text_def for lyrics.
-
        * Klavarskribo?
 
        * lyrics in chords still fuck up.
 
        * Use hooks/dependency graphs for properties
+
index d2f6c24d2dc6efa0db7b9a71140bcb25a71930f2..010e47dae06b23818c93a9cb1849ad4939860142 100644 (file)
@@ -93,11 +93,6 @@ Voice = \translator {
        %\accepts "Thread";
 }
 
-Thread = \translator {
-       \type "Engraver_group_engraver";
-%      \consists "Note_head_engraver" ;
-%      \consists "Tie_engraver";
-}
 
 GrandStaff = \translator {
        \type "Line_group_engraver_group";
@@ -105,6 +100,7 @@ GrandStaff = \translator {
        \consists "Span_bar_engraver";
        \consists "Vertical_align_engraver";
        \consists "Piano_bar_engraver";
+       minVerticalAlign = 1.5*\staffheight;
 
        % This should come last
        \accepts "Staff";
index 2adf18aa123342d1383ea60b81ee099529ca0e94..b384b7a3a112fe5a78c76d5a38902e88e5c421f6 100644 (file)
@@ -1,4 +1,4 @@
-\version "1.0.1";
+\version "1.0.2";
 
 
 blah = \melodic {
index b32df6721f0117a8c280f539b7e085141fb23caf..8710a3ab34a20013a996437a0bcf4dca1b8ae62d 100644 (file)
@@ -10,7 +10,7 @@ copyright =    "public domain";
 Tested Features: example file with comments
 
 %}
-\version "1.0.1";
+\version "1.0.2";
 
 
 % the % is a comment.
index 7cfb0b090044a944c9c6fe4eda36b969cad5c4d9..494fecc6e494981ce386a782e2763a78c07bb9ca 100644 (file)
@@ -24,7 +24,7 @@
 % \lbheel \lbheel \lfheel \lftoe
 % \rbheel \rbtoe \rfheel \rftoe
 
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
                \melodic {
index fe27b1a420e76af822609323d643fc4f73c38926..d9f89d4c3aac0ce9494e29832947f29b86900598 100644 (file)
@@ -2,15 +2,19 @@
   filename =    "praeludium-fuga-E.ly";
   title =       "praeludium and fuga in E-major";
   opus =        "BWV 566";
-  description = "Praeludium 3 bar excerpt, "
-                "2nd fuga transposed subject -- 4 bar excerpt.  "
-                "We try to imitate the Griepenkerl/Keller edition which "
-                "gives the best approximation to Bach's original layout.";
   composer =    "Johann Sebastian Bach (1685-1750)";
   enteredby =   "JCN";
   copyright =   "public domain";
 }
+%{
+  description
+
+  Praeludium 3 bar excerpt,
+       2nd fuga transposed subject -- 4 bar excerpt. 
+        We try to imitate the Griepenkerl/Keller edition which
+       gives the best approximation to Bach's original layout
 
+%}
 %{
  Tested Features:
  purpose of this file is testing: 
@@ -19,7 +23,7 @@
    * organ staff...
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 
 
index 109ead0cc38b2d6d762f6eeb1794b69904231fde..1ef9d13d0a37ee438b7fba52bb3a0dae79ae0abb 100644 (file)
@@ -7,7 +7,7 @@ TestedFeatures =         "multiple meters, beaming, unsynced bars, userdefd engravers";
 
 
 
-\version "1.0.1";
+\version "1.0.2";
 
 ritme = \melodic\transpose c'' {
        \partial 8;
index dc4144ca2500fe99141471cba6da1fe9e12275ed..215a51d90cdbc86b47d5d48f978446a521f12f88 100644 (file)
@@ -12,7 +12,7 @@ copyright =    "public domain";
 % scales with accents.
 %
 
-\version "1.0.1";
+\version "1.0.2";
 blah =         \melodic {
                \time 6/8;      
 \transpose c {
index 17fb060c2355a1a6a5fb4f326ddd716976361ee7..85fad377e890983163c6b613c4d747a48926d10a 100644 (file)
@@ -1,5 +1,5 @@
        
-\version "1.0.1";
+\version "1.0.2";
 
 
 blah =         \melodic{ \transpose c'' {
index d65526c2e0edde13b2724d9c53fd1893560701f6..31f665f3e3dcbd038a45a42b8fc1ad9f17c101ee 100644 (file)
@@ -5,7 +5,7 @@ TestedFeatures =         "This file tests Feta embedded slurs"
         "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 shortlong = \melodic\transpose c'{
        c4()c( c c  |
index 4912d9472524be7340d47d6f880a37248ccc5e2d..40815dfad39d7f9c5647abf68f3f8ba01f577fbf 100644 (file)
@@ -6,7 +6,7 @@ copyright =      "PD";
 
 TestedFeatures =        "beams and beamflags";
 }
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
        <
index f4e4932a7a347af6b74b3a5a51d3a05ac000f4eb..0ad9fdbb2bd253401de288eb52b0f70dcb623f2e 100644 (file)
@@ -5,7 +5,7 @@ TestedFeatures =         "This file tests Feta embedded slurs"
         "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 shortlong = \melodic{
        c4()c( c c  |
index d0fa529d20a25a1381741936e8906210d368fe30..8e0e87b5998373118019aab4239f02cb990df6d9 100644 (file)
@@ -5,7 +5,7 @@ enteredby =      "HWN,JCN";
 copyright =     "public domain";
 Tested =        "test the Collision resolution ";
 }
-\version "1.0.1";
+\version "1.0.2";
 
 
 
index be5fea4a6d9d10b5e9afb76dd4ef0d499301b43b..81a9f726a0ae673ca2abd6f92840dafa45982f6f 100644 (file)
@@ -7,7 +7,7 @@ TestedFeatures = "This file tests silly line shapes";
 
 \include "paper20.ly"
 
-\version "1.0.1";
+\version "1.0.2";
 
 oden = \lyric{ 
        O8 |
index 6b4ca16955e60aaa2acf598f89bf599d4844f5ff..1d7c1dbf88557a0bff1c29ec384fc029d5b7d42c 100644 (file)
@@ -1,4 +1,4 @@
-\version "1.0.1";
+\version "1.0.2";
 
 FontBody=      \melodic\transpose c''{ 
                \bar "|:";
index f139a81f1a29b47fc4337fc815094f95dfe305c2..61f689b3285d64ac084c1172f33313f3b0e6d5a6 100644 (file)
@@ -7,7 +7,7 @@ description = "This file tests the Feta music font";
 % "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "font-body.ly"
 \score{
index 2540a407889dc29cdbaadbf8b588d03b7e003abb..d0b6efe5bd5d3cac8dbd3fe6705ae93d1a95aa5b 100644 (file)
@@ -7,7 +7,7 @@ description = "This file tests the Feta music font";
 % "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 \include "font-body.ly"
 
 \score{
index 4263aeae1e360f9f7c4beb434dc6e6f354466ef5..a1c477eb01a80b0b0c82216e41d95e378176564e 100644 (file)
@@ -4,7 +4,7 @@ copyright =      "PD";
 TestedFeatures =        "This file tests some nasty Gourlay spacings";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 %{
 
index 2d6f9beb13a7fc2aba84546a185679aaf76c5bdb..2a6edb5386446b2f2b3acb59cca045645643c0a8 100644 (file)
@@ -1,4 +1,4 @@
-\version "1.0.1";
+\version "1.0.2";
 \score{
        \melodic\relative c'{
                [c16 \stemdown c'' \stemboth c,, d]
index a63a95a5922163b23afbf9d6727bb7f3d46de4c0..6ddcf2a1304214dcf818747dc9010253c335bdfa 100644 (file)
@@ -5,7 +5,7 @@ TestedFeatures =         "This file tests Feta embedded slurs"
         "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 shortlong = \melodic{
        c4()c( c c  |
index 6e733c02e10150a89a7e1285d0ec2ca5814eeda9..5b8f29263eb255b50c6e4c2547e6da90bdcd59af 100644 (file)
@@ -1,5 +1,5 @@
 % test damping
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
        \melodic\relative c'{
index cd49211b870e14ab5616c17742384edde3886222..ffb11d69957bf5b7b4efb80c1b0d3b2c52b01cae 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
        \melodic\transpose c'{
index 9c1fc724c71d2e4757b9a88d176772a549e2b795..db64053342a947ea891a02eac0a2a66b7bb9475d 100644 (file)
@@ -6,7 +6,7 @@ copyright =      "public domain";
 TestedFeatures =        "This file tests various spacings";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 multipart = \melodic{ 
     \type StaffGroup < 
index 7bc33a1b4aa4474335937a053b2af51f66957225..cf4f28d3c18dbcc18bf8b3450e868955047e0712 100644 (file)
@@ -8,7 +8,7 @@ of beams";
        
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 beamintervals = \melodic{
                \time 7/4;
index 30869a22258213839586251e77474e8d05c07a94..318a68efa4e0ce6d5e900abb57306ac0dd76937a 100644 (file)
@@ -10,7 +10,7 @@ source =      "urtext";
 instrument=    "Instrument";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
        \melodic
index d2b9011647641e56fbe0f681fa393ddc1c2361a0..f5e258305c8e13e3370c9f6fe98803311bd0edca 100644 (file)
@@ -22,7 +22,7 @@ copyright =    "public domain";
 }
 
 
-\version "1.0.1";
+\version "1.0.2";
 
 vOne = \melodic \relative c''{
         \clef"violin";
index ce996bcf1a6080697bc6383464704cce01502660..64b2a357a12edc11a5e3e42a444bbdd529eb8a98 100644 (file)
@@ -5,7 +5,7 @@ TestedFeatures =         "This file tests trills"
         "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \score{
        \melodic{ 
index da173b7487dd0750ae4c1190b2b0c95ce518d9ae..de7b6036aba3a3b972e3b98e861a27ea2cf3f361 100644 (file)
@@ -12,7 +12,7 @@ copyright =    "public domain";
 Tested Features                lyrics and chords
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 melodie = \melodic\relative c {
         \clef"violin";
index 3c3a0543715c5dcdfd0e2172c84ca23f3bf1cd27..5be1280c2a45d3fe0ca6d0be4071027b492234fb 100644 (file)
@@ -1,21 +1,26 @@
 \header{
 filename =      "twinkle.ly";
 title =         "Twinkle Twinkle Little Star";
-description =   "traditional song in various languages."
-  "Ah, vous dirais-je, maman" 
-  "Altijd is Kortjakje ziek"
-  "Twinkle twinkle little star";
 
 composer =      "Traditional";
 enteredby =     "HWN & JCN";
 copyright =     "public domain";
 }
 
+%{
+DESCRIPTION
+
+traditional song in various languages.
+  "Ah, vous dirais-je, maman" 
+  "Altijd is Kortjakje ziek"
+  "Twinkle twinkle little star"
+%}
+
 %{
 Tested Features: lyrics, interleaving lyrics and staffs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 melody = \melodic \relative c'' {
        \clef violin;
@@ -81,12 +86,12 @@ hegedraagjetekst = \lyric{
 texte = \lyric{ 
        \property Lyrics . textstyle" =  "italic" 
 %      \property Lyrics . textstyle" =  "roman" 
-       Ah!4 vous dir- ai_- je ma man2
+       Ah!4 vous dir- ai_- je ma- man2
        Ce4 qui cau- se mon tour- ment2
-       Pa-4 pa veut que je rai- sonne2
-       Comme4 un- e grand- e per- sonne2
-       Moi4 je dis que les bon- bons2
-       Val-4 ent mieux que la rai- son2
+       Pa-4 pa veut que je rai- son- ne
+       Comm' u- ne gran- de per- son- ne
+       Moi je dis que les bon- bons2
+       Va-4 lent mieux que la rai- son2
 }
 
 texti = \lyric{
index 777a9bcb4431e59ca2da1c23035733fa8337f14a..998ac40224b2bc8d6a9f69c83388a7c3f09f68e6 100644 (file)
@@ -1,5 +1,5 @@
 /*
-  chord-iter.cc -- implement Chord_iterator
+  Simultaneous_music-iter.cc -- implement Simultaneous_music_iterator
 
   source file of the GNU LilyPond music typesetter
 
 #include "music-list.hh"
 
 
-Chord_iterator::~Chord_iterator()
+Simultaneous_music_iterator::~Simultaneous_music_iterator()
 {
 }
 
-Chord_iterator::Chord_iterator (Chord const *chord_C)
+Simultaneous_music_iterator::Simultaneous_music_iterator (Simultaneous_music const *simultaneous_music_C)
 {
-  chord_C_ = chord_C;
+  simultaneous_music_C_ = simultaneous_music_C;
 }
 
 void
-Chord_iterator::construct_children()
+Simultaneous_music_iterator::construct_children()
 {
   int j = 0;
-  for (PCursor<Music*> i (chord_C_->music_p_list_.top());  
+  for (PCursor<Music*> i (simultaneous_music_C_->music_p_list_p_->top());  
        i.ok(); j++, i++) 
     {
       Music_iterator * mi = get_iterator_p (i.ptr());
       if (mi->ok()) 
        {
-         if  (chord_C_->translator_type_str_.empty_b ())
-           set_translator (mi->report_to_l()->ancestor_l (chord_C_->multi_level_i_));
+         if  (simultaneous_music_C_->translator_type_str_.empty_b ())
+           set_translator (mi->report_to_l()->ancestor_l (simultaneous_music_C_->multi_level_i_));
          children_p_list_.bottom().add (mi);
        }
       else 
@@ -43,7 +43,7 @@ Chord_iterator::construct_children()
 
 
 void
-Chord_iterator::do_print() const
+Simultaneous_music_iterator::do_print() const
 {
 #ifndef NPRINT
   for (PCursor<Music_iterator*> i (children_p_list_.top()); i.ok (); i++) 
@@ -54,7 +54,7 @@ Chord_iterator::do_print() const
 }
 
 void
-Chord_iterator::process_and_next (Moment until)
+Simultaneous_music_iterator::process_and_next (Moment until)
 {
   for (PCursor<Music_iterator*> i (children_p_list_.top()); i.ok ();) 
     {
@@ -71,10 +71,10 @@ Chord_iterator::process_and_next (Moment until)
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Chord_iterator,Music_iterator);
+IMPLEMENT_IS_TYPE_B1(Simultaneous_music_iterator,Music_iterator);
 
 Moment
-Chord_iterator::next_moment() const
+Simultaneous_music_iterator::next_moment() const
 {
   Moment next;
   next.set_infinite (1);
@@ -86,7 +86,7 @@ Chord_iterator::next_moment() const
 
 
 bool
-Chord_iterator::ok() const
+Simultaneous_music_iterator::ok() const
 {
   return children_p_list_.size();
 }
index 1dea4149614e7f38b2d95057d0350c261247bccc..be48f33572502738027db2c921709e4355c1ac45 100644 (file)
@@ -7,20 +7,20 @@
 */
 
 
-#ifndef CHORD_ITER_HH
-#define CHORD_ITER_HH
+#ifndef Simultaneous_music_ITER_HH
+#define Simultaneous_music_ITER_HH
 
 
 #include "music-iterator.hh"
 #include "plist.hh"
 
-class Chord_iterator : public Music_iterator
+class Simultaneous_music_iterator : public Music_iterator
 {
-  const Chord *chord_C_;
+  const Simultaneous_music *simultaneous_music_C_;
   Pointer_list<Music_iterator*> children_p_list_;
 public:
-  ~Chord_iterator();
-  Chord_iterator (Chord const*);
+  ~Simultaneous_music_iterator();
+  Simultaneous_music_iterator (Simultaneous_music const*);
   DECLARE_MY_RUNTIME_TYPEINFO;
 protected:
   virtual void do_print() const;
@@ -30,4 +30,4 @@ protected:
   virtual bool ok() const;
 };
 
-#endif // CHORD_ITER_HH
+#endif // Simultaneous_music_ITER_HH
index 56898a043ee23d11d86f67776ecc36ffd1c50776..de26489e32547afc6f0a5c0f177bbe9ac22ef2dd 100644 (file)
 #include "input.hh"
 #include "virtual-methods.hh"
 
+
+#define DECLARE_TYPE_NAME(Class)
+class Translator_identifier;
+class Music_identifier;
+class General_script_def_identifier;
+class Symtables_identifier;
+class Midi_def_identifier;
+class Paper_def_identifier;
+class Lookup_identifier;
+class Real_identifier;
+class int_identifier;
+class String_identifier;
+class Request_identifier;
+class Score_identifier;
+class Duration_identifier;
+
+
+
 #define IDACCESSOR(Class)\
-virtual Class *  access_ ## Class (bool=true) const { error (#Class  + String ("_identifier")); return 0; }
+virtual Class *  access_ ## Class (bool=true) const { error (#Class  + String ("_identifier")); return 0; }\
+virtual Class ## _identifier * access_ ## Class ## _identifier () { return 0; }
 
 /**
    A declarable data structure in mudela. 
@@ -60,6 +79,10 @@ struct Class ## _identifier : Identifier {\
                             Class ## _identifier (Class ## _identifier const&);\
                             Class ## _identifier (Class*st, int code);\
                             VIRTUAL_COPY_CONS (Class ## _identifier, Identifier);\
+                            virtual Class ## _identifier * access_ ## Class ## _identifier ()\
+    {\
+      return this;\
+    }\
                             virtual Class* access_ ## Class (bool copy_b = true) const;\
                             ~Class ## _identifier();\
                             virtual void do_print () const; \
index e7aaedbea16dc7f847ba8baa83cfd89f825c1701..f80f11dece588dc0c81a9070ed5e07922267c4aa 100644 (file)
@@ -50,13 +50,12 @@ struct Break_req;
 struct Cadenza_req;
 struct Change_iterator;
 struct Change_translator;
-struct Chord;
+struct Simultaneous_music;
 struct Clef_change_req;
 struct Clef_item;
 struct Clef_engraver;
 struct Clef_performer;
 struct Column_x_positions;
-struct Chord;
 struct Column_info;
 struct Collision;
 struct Collision_engraver;
@@ -141,12 +140,11 @@ struct Molecule;
 struct Multi_measure_rest;
 struct Multi_measure_rest_req;
 struct Multi_measure_rest_engraver;
-struct Music_general_chord;
 struct Musical_script_req;
-struct Music_voice;
+struct Music_list;
 struct Musical_req;
 struct Music;
-struct Music_list;
+struct Music_sequence;
 struct My_lily_parser;
 struct Note_column;
 struct Note_column_engraver;
@@ -245,9 +243,8 @@ struct Vertical_group_spanner;
 struct Vertical_align_spanner;
 struct Vertical_align_engraver;
 struct Align_element;
-struct Voice;
+struct Sequential_music;
 struct Request_chord;
-struct Voice_group_performer;
-struct Voice_list;
+
 typedef Rational Moment;
 #endif // LILY_PROTO_HH
index c0648e8b26732320cee2ae416239d3d808af8c37..6ba38eaa5560829ac8d2f913368389b5d7cb1383 100644 (file)
@@ -1,5 +1,5 @@
 /*   
-  linear-programming.hh -- declare 
+  linear-programming.hh -- declare Linear_programming
   
   source file of the GNU LilyPond music typesetter
   
@@ -14,6 +14,8 @@
 
 /**
 
+   Solve the following problem:
+   
    min c* x
 
    constraints_[i] * x = constraint_rhss_ [i]
@@ -26,12 +28,15 @@ class Linear_programming
   Array<Vector> constraints_;
   Array<Real> constraint_rhss_;
   Vector cost_vec_;
-
+  int dim_;
 public:
-  Vector constraint_solve (Vector initial) const;
+  Vector constraint_solve (Vector initial_basic_solution) const;
+
   int dim () const;
   Vector solve (Vector) const;
   void add_constraint (Vector c, double r);
+
+  
   Linear_programming (int n);
   void set_cost (Vector);
   void print () const;
index 78a2ac1a6b5fc6b6fc9eec27dc186389198f7668..05822a649fceb897f8c33cc0251879077157d545 100644 (file)
@@ -1,5 +1,5 @@
 /*
-  music-list.hh -- declare Music_list, Chord and Voice
+  music-list.hh -- declare Music_sequence, Simultaneous_music and Sequential_music
 
   source file of the GNU LilyPond music typesetter
 
@@ -7,46 +7,53 @@
 */
 
 
-#ifndef MUSIC_LIST_HH
-#define MUSIC_LIST_HH
+#ifndef Music_sequence_HH
+#define Music_sequence_HH
 
 #include "music.hh"
 #include "plist.hh"
 
 
+class Music_list : public Pointer_list<Music*>
+{
+public:
+  Musical_pitch do_relative_octave (Musical_pitch, bool); 
+  void add_music (Music*);
+  Music_list (Music_list const&);
+  Music_list ();
+};
+
+
 /**
   Music can be a list of other "Music" elements
  */
-class Music_list : public Music
+class Music_sequence : public Music
 {
     
 public:
   int multi_level_i_;
-
-  Musical_pitch do_relative_octave (Musical_pitch, bool); 
-  Music_list (Music_list const&);
-  Music_list();
+  Music_list * music_p_list_p_;
+  
+  Music_sequence (Music_sequence const&);
+  Music_sequence (Music_list *l_p);
   DECLARE_MY_RUNTIME_TYPEINFO;
-  VIRTUAL_COPY_CONS(Music_list,Music);
-  virtual void add (Music*);
+  VIRTUAL_COPY_CONS(Music_sequence,Music);
+
   virtual void transpose (Musical_pitch );
-    
-  Pointer_list<Music*> music_p_list_;
+  void add_music (Music *music_p);
 protected:
   virtual void do_print() const;
 };
 
 /**
-  Chord is a list of music-elements which happen simultaneously
+  Simultaneous_music is a list of music-elements which happen simultaneously
  */
-
-class Chord : public Music_list
+class Simultaneous_music : public Music_sequence
 {
 public:
-  Chord();
+  Simultaneous_music(Music_list *);
   DECLARE_MY_RUNTIME_TYPEINFO;
-  VIRTUAL_COPY_CONS(Chord,Music);
+  VIRTUAL_COPY_CONS(Simultaneous_music,Music);
   
   virtual Musical_pitch to_relative_octave (Musical_pitch);
   virtual void translate (Moment dt);
@@ -57,7 +64,7 @@ public:
   The request is a collection of Requests. A note that you enter in mudela is 
   one Request_chord, one syllable of lyrics is one Request_chord
  */
-class Request_chord : public Chord
+class Request_chord : public Simultaneous_music
 {
 public:
   DECLARE_MY_RUNTIME_TYPEINFO;
@@ -66,18 +73,18 @@ public:
   VIRTUAL_COPY_CONS(Request_chord, Music);
 };
 /**
-  Voice is a list of music-elements which are placed behind each other.
+  Sequential_music is a list of music-elements which are placed behind each other.
  */
-class Voice : public Music_list
+class Sequential_music : public Music_sequence
 {
     
 public:
   Moment offset_mom_;
   virtual Musical_pitch to_relative_octave (Musical_pitch);
-  Voice();
+  Sequential_music(Music_list*);
   DECLARE_MY_RUNTIME_TYPEINFO;
-  VIRTUAL_COPY_CONS(Voice, Music);
+  VIRTUAL_COPY_CONS(Sequential_music, Music);
   virtual void translate (Moment dt);
   virtual MInterval time_int() const;
 };
-#endif // MUSIC_LIST_HH
+#endif // Music_sequence_HH
index 083e476f734a9c7c2747cf1f79569037ae411f77..9a7b6f2d97cff1e1e0fa0189e69dece543a7ad74 100644 (file)
 
   Music is hierarchical: 
 
-  @see Music_list
+  @see Music_sequence
 
   */
 class Music:public Input {
 public:
-  Music_list * parent_music_l_;
     
   /** The kind of iterator needed to walk this music.  This doesn't
     make sense for simple (ie non-list) music, but it does no harm
-    here. Yes, it did harm Music_list: you can forget to copy it.
+    here. Yes, it did harm Music_sequence: you can forget to copy it.
       
     */
   String translator_type_str_;
index ed3e8ed015bf89904c9723a602d5d93efb1c9e12..2c4f1a55de1f3390efb63c18d7f3d776cdff1162 100644 (file)
 #include "lily-proto.hh"
 #include "input.hh"
 
-/** The pitch as it figures in diatonal western music (12 semitones in
-   an octave).
+/** A "tonal" pitch. This is a pitch as it figures in diatonal western
+   music (12 semitones in an octave), as opposed to a frequence in Hz
+   or a integer number of semitones.
 
-   It is not Music because, it has to duration associated
+   It is not Music because, it has no duration associated.
 */
 struct Musical_pitch : public Input
 {
index f6bb89cec550bbb5959444a51fbd243aaface993..d7bce858fa661e0984ee2f96b69a89e2e5b09716 100644 (file)
@@ -194,7 +194,7 @@ public:
 };
 
 /**
-  Start a tie at this voice element, end it at the next
+  Start a tie at this note, end it at the next
  */
 class Tie_req : public Musical_req {
 public:
index 04e187130503187385a04f6b63e876ef997da694..d92762265a17c398faff3666025b95a1f5edcffa 100644 (file)
@@ -24,11 +24,11 @@ class My_lily_parser {
   Array<Input> define_spot_array_;
   String init_str_;
 
-  void add_requests (Chord*v);
+  void add_requests (Simultaneous_music*v);
 
-  Chord * get_note_element (Note_req * ,Duration *);
-  Chord* get_rest_element (String, Duration *);
-  Chord* get_word_element (String, Duration*);
+  Simultaneous_music * get_note_element (Note_req * ,Duration *);
+  Simultaneous_music* get_rest_element (String, Duration *);
+  Simultaneous_music* get_word_element (String, Duration*);
   Melodic_req* get_melodic_req (Melodic_req* melodic, int quotes);
   String notename_str (Melodic_req* melodic);
   void set_last_duration (Duration const *);
index d63a7cd7f18b7c404b255d1b14a03d631baf2de3..eab7b2d8b07de1fb3328bb37a477f3cc5ad0b7ec 100644 (file)
@@ -21,7 +21,7 @@
 
 
 /**
a voice element wants something printed.
  An atom of musical information .
  Hungarian postfix: req
  @see lilygut manpage
  */
index 10d55a798d83287b3c4355420e79db6f752ee7ab..6f0d7a6cdfffcf0543f2612024963032e7fd7eaf 100644 (file)
@@ -48,8 +48,6 @@ public:
   void preprocess();
   bool musical_b() { return musical_b_; }
   void do_print() const;
-
-
 };
 
 #endif // SCORE_COLUMN_HH
index 887999e91225a33e56dbc2d7ee7e10c99816f00b..d029496f417c6f265f943bf1d5b265142adf9a62 100644 (file)
@@ -1,5 +1,5 @@
 /*
-  voice-iter.hh -- declare Voice_iterator
+  Sequential_music-iter.hh -- declare Sequential_music_iterator
 
   source file of the GNU LilyPond music typesetter
 
@@ -7,32 +7,32 @@
 */
 
 
-#ifndef VOICE_ITER_HH
-#define VOICE_ITER_HH
+#ifndef Sequential_music_ITER_HH
+#define Sequential_music_ITER_HH
 
 
 #include "music-iterator.hh"
 #include "pcursor.hh"
 
-class Voice_iterator :  private PCursor<Music*>, public Music_iterator
+class Sequential_music_iterator :  private PCursor<Music*>, public Music_iterator
 {
   Moment here_mom_;
-  const Voice * voice_C_;
+  const Sequential_music * sequential_music_C_;
   Music_iterator * iter_p_;
   void start_next_element();
   void leave_element();
-  void set_voice_translator();
+  void set_Sequential_music_translator();
     
 public:
-  Voice_iterator (Voice const*);
+  Sequential_music_iterator (Sequential_music const*);
   DECLARE_MY_RUNTIME_TYPEINFO;
 protected:
   virtual void do_print() const;
   virtual void construct_children();
-  ~Voice_iterator();    
+  ~Sequential_music_iterator();    
   virtual void process_and_next (Moment);
   virtual Moment next_moment() const;
   virtual bool ok() const;
 };
 
-#endif // VOICE_ITER_HH
+#endif // Sequential_music_ITER_HH
index 610c6b5c080f90d5cc41cdef8529dda8e741fea5..78db9884e97fadeb4f5fb11877a222066c5cda81 100644 (file)
@@ -155,9 +155,10 @@ Item::do_junk_links()
 void
 Item::do_unlink()
 {
-  for (int i=0; i < attached_span_l_arr_.size (); i++)
+  Link_array<Spanner> attached=attached_span_l_arr_;
+  for (int i=0; i < attached.size (); i++)
     {
-      Spanner *&s= attached_span_l_arr_[i];
+      Spanner *s= attached[i];
 
       Direction d= LEFT;
       do {
@@ -168,7 +169,7 @@ Item::do_unlink()
          unbroken_original_l_->broken_to_drul_[d] = 0;
       } while (flip (&d) != LEFT);
     }
-  attached_span_l_arr_.set_size (0);
+  assert (!attached_span_l_arr_.size ());
   unbroken_original_l_ =0;
 }
 
index 6ccc0b31e40faf7a7074c583fd7a4c8cceefa0da..727d3fc46df37f61b071eca41b964a1fafbb232a 100644 (file)
 Linear_programming::Linear_programming (int n)
   : cost_vec_ (n)
 {
+  dim_ = n;  
 }
 int
 Linear_programming::dim () const
 {
-  return cost_vec_.dim ();
+  return dim_;
 }
 
+
 void
 Linear_programming::add_constraint (Vector c, double r)
 {
@@ -31,6 +33,7 @@ Linear_programming::add_constraint (Vector c, double r)
 void
 Linear_programming::set_cost (Vector c)
 {
+  assert (dim_ == c.dim ());
   cost_vec_ = c;
 }
 
@@ -57,6 +60,8 @@ bool
 Linear_programming::check_constraints (Vector v) const
 {
   bool is_cool = true;
+  assert (v.dim () == dim_);
+  
   for (int i=0; is_cool && i < v.dim (); i++)
     is_cool = is_cool && v[i] >= 0;
   for (int i=0; is_cool && i < constraints_.size (); i++)  
@@ -68,8 +73,28 @@ Linear_programming::check_constraints (Vector v) const
 }
 
 Vector
-Linear_programming::solve (Vector initial) const
+Linear_programming::solve (Vector initial_basic_solution) const
 {
+  assert (check_constraints (initial_basic_solution));
+  
+  Array<bool> basis; 
+  for (int i=0; i < dim_; i++)
+    basis.push (bool(initial_basic_solution[i]));
+
+  Vector x = initial_basic_solution;
+  Real current_cost = x * cost_vec_;
+  while (iter < MAXITER)
+    {
+      // select pivot
+      
+
+      iter ++;
+    }
+
+
+
+      
+  
   Array<int> binding, nonbinding;
   
   assert (check_constraints (initial));
index 97352020af20712f53b0566f4e7d7d0fe54ae7cd..81622368a49782bf5e63d041d8da7058f4dd266e 100644 (file)
@@ -131,10 +131,10 @@ Music_iterator::static_get_iterator_p (Music *m,
   Music_iterator * p =0;
   if (m->is_type_b (Request_chord::static_name()))
     p = new Request_chord_iterator ((Request_chord*) m);
-  else if (m->is_type_b (Chord::static_name())) 
-    p =  new Chord_iterator ((Chord*) m);
-  else if (m->is_type_b (Voice::static_name())) 
-    p =  new Voice_iterator ((Voice*) m);
+  else if (m->is_type_b (Simultaneous_music::static_name())) 
+    p =  new Simultaneous_music_iterator ((Simultaneous_music*) m);
+  else if (m->is_type_b (Sequential_music::static_name())) 
+    p =  new Sequential_music_iterator ((Sequential_music*) m);
   else if (m->is_type_b (Translation_property::static_name ()))
     p = new Property_iterator((Translation_property *) m);
   else if (m->is_type_b (Change_translator::static_name ()))
index 5642127ff3995773a2e5491878481154a27a0484..a14a6ce44c50b927982c8e83bf77dbd1d52ce42c 100644 (file)
@@ -1,5 +1,5 @@
 /*
-  music-list.cc -- implement Music_list, Chord, Voice
+  music-list.cc -- implement Music_sequence, Simultaneous_music, Sequential_music
 
   source file of the GNU LilyPond music typesetter
 
@@ -7,58 +7,50 @@
 */
 
 
-#include <limits.h>
-#include "music.hh"
-#include "debug.hh"
+
 #include "music-list.hh"
 #include "musical-pitch.hh"
 #include "request.hh"
 #include "musical-request.hh"
 
-Music_list::Music_list (Music_list const&s)
-  : Music (s)
-{
-  multi_level_i_ = s.multi_level_i_;   
-  for (iter (s.music_p_list_.top(), i); i.ok (); i++)
-    add (i->clone());
-}
 
-IMPLEMENT_IS_TYPE_B1(Music_list, Music);
-IMPLEMENT_IS_TYPE_B1(Voice,Music_list);
-IMPLEMENT_IS_TYPE_B1(Chord,Music_list);
+IMPLEMENT_IS_TYPE_B1(Sequential_music,Music_sequence);
+IMPLEMENT_IS_TYPE_B1(Simultaneous_music,Music_sequence);
 
 MInterval
-Chord::time_int() const
+Simultaneous_music::time_int() const
 {
   MInterval m;
-  for (iter (music_p_list_.top(), i); i.ok (); i++)
+  for (iter (music_p_list_p_->top(), i); i.ok (); i++)
     m.unite (i->time_int());
 
   return m;
 }
 
 void
-Chord::translate (Moment m)
+Simultaneous_music::translate (Moment m)
 {
-  for (iter (music_p_list_.top(), i); i.ok (); i++)
+  for (iter (music_p_list_p_->top(), i); i.ok (); i++)
     i->translate (m); 
 }
 
-Chord::Chord()
+Simultaneous_music::Simultaneous_music(Music_list *p)
+  : Music_sequence (p)
 {
 
 }
 
-Voice::Voice()
+Sequential_music::Sequential_music(Music_list *p)
+  : Music_sequence (p)
 {
   offset_mom_ =0;
 }
 
 MInterval
-Voice::time_int() const
+Sequential_music::time_int() const
 {
   Moment last=0;
-  for (iter (music_p_list_.top(), i); i.ok (); i++) 
+  for (iter (music_p_list_p_->top(), i); i.ok (); i++) 
     {
       MInterval interval = i->time_int();
        
@@ -72,85 +64,74 @@ Voice::time_int() const
 }
 
 Musical_pitch
-Voice::to_relative_octave (Musical_pitch p)
+Sequential_music::to_relative_octave (Musical_pitch p)
 {
-  return do_relative_octave (p, false);
+  return music_p_list_p_->do_relative_octave (p, false);
 }
 
 Musical_pitch
-Chord::to_relative_octave (Musical_pitch p)
+Simultaneous_music::to_relative_octave (Musical_pitch p)
 {
-  return do_relative_octave (p, true);
+  return music_p_list_p_->do_relative_octave (p, true);
 }
 
 void
-Voice::translate (Moment dt)
+Sequential_music::translate (Moment dt)
 {
   offset_mom_ += dt;
 }
 
 
-Music_list::Music_list()
-{
-  multi_level_i_ = 0;
-}
 
-void
-Music_list::add (Music*m_p)
-{
-  if (!m_p)
-    return;
 
-  m_p->parent_music_l_ = this;
-  music_p_list_.bottom().add (m_p);
+Musical_pitch 
+Music_list::do_relative_octave (Musical_pitch last, bool ret_first)
+{
+  Musical_pitch retval;
+  int count=0;
+  for (PCursor<Music*> i (top ()); i.ok (); i++)
+    {
+      last = i->to_relative_octave (last);
+      if (!count ++ )
+       retval = last;
+    }
+  if (!ret_first)
+    retval = last;
+  return retval;
 }
 
-void
-Music_list::transpose (Musical_pitch rq)
+
+Music_list::Music_list (Music_list const &s)
+  : Pointer_list<Music*> (s)
 {
-  for (iter (music_p_list_.top(),i); i.ok (); i++)
-    i->transpose (rq);    
+  for (PCursor<Music*> i(s.top()); i.ok (); i++)
+    add_music (i->clone());
 }
 
 void
-Music_list::do_print() const
+Music_list::add_music (Music*m_p)
 {
-#ifndef NPRINT
-  for (iter (music_p_list_.top(),i); i.ok (); i++)
-    i->print();
-#endif 
+  if (!m_p)
+    return;
+
+  bottom().add (m_p);
 }
 
-IMPLEMENT_IS_TYPE_B1(Request_chord, Chord);
+
+IMPLEMENT_IS_TYPE_B1(Request_chord, Simultaneous_music);
 
 
 Request_chord::Request_chord()
+  : Simultaneous_music (new Music_list)
 {
   multi_level_i_ =0;
 }
 
 
-Musical_pitch 
-Music_list::do_relative_octave (Musical_pitch last, bool ret_first)
-{
-
-  Musical_pitch retval;
-  int count=0;
-  for (iter (music_p_list_.top(),i); i.ok (); i++)
-    {
-      last = i->to_relative_octave (last);
-      if (!count ++ )
-       retval = last;
-    }
-  if (!ret_first)
-    retval = last;
-  return retval;
-}
-
 Musical_pitch
 Request_chord::to_relative_octave (Musical_pitch last)
 {
-  for (iter (music_p_list_.top(),i); i.ok (); i++)
+  for (iter (music_p_list_p_->top(),i); i.ok (); i++)
     {
       Musical_req *m =((Request*)i.ptr ())->access_Musical_req ();
       if (m && m->access_Melodic_req ())
@@ -164,3 +145,6 @@ Request_chord::to_relative_octave (Musical_pitch last)
 }
 
 
+Music_list::Music_list ()
+{
+}
diff --git a/lily/music-sequence.cc b/lily/music-sequence.cc
new file mode 100644 (file)
index 0000000..fd00a12
--- /dev/null
@@ -0,0 +1,49 @@
+/*   
+  music-sequence.cc --  implement Music_sequence
+  
+  source file of the GNU LilyPond music typesetter
+  
+  (c) 1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  
+ */
+#include "music-list.hh"
+#include "debug.hh"
+#include "musical-pitch.hh"
+
+Music_sequence::Music_sequence (Music_sequence const&s)
+  : Music (s)
+{
+  multi_level_i_ = s.multi_level_i_;
+  music_p_list_p_ = new Music_list (*s.music_p_list_p_);
+}
+
+IMPLEMENT_IS_TYPE_B1(Music_sequence, Music);
+
+Music_sequence::Music_sequence(Music_list *mlist_p)
+{
+  multi_level_i_ = 0;
+  music_p_list_p_ = mlist_p;
+}
+
+void
+Music_sequence::transpose (Musical_pitch rq)
+{
+  for (iter (music_p_list_p_->top(),i); i.ok (); i++)
+    i->transpose (rq);    
+}
+
+void
+Music_sequence::do_print() const
+{
+#ifndef NPRINT
+  for (iter (music_p_list_p_->top(),i); i.ok (); i++)
+    i->print();
+#endif 
+}
+
+
+void
+Music_sequence::add_music (Music *m_p)
+{
+  music_p_list_p_->add_music (m_p);
+}
index 4ba377fc9157c1c15a7a6a0d3541599ef1a9b863..10ee1a3b3f23e2659059305dfb0c870ef0227d80 100644 (file)
@@ -56,7 +56,6 @@ IMPLEMENT_IS_TYPE_B(Music);
   
 Music::Music()
 {
-  parent_music_l_ =0;
 }
 
 Musical_pitch
index bdb3846692003dac5a24ce6120e32048102db489..049455393000565035b8d089de9b6dbf98646d38 100644 (file)
@@ -117,27 +117,27 @@ My_lily_parser::set_last_duration (Duration const *d)
 }
 
 
-Chord*
+Simultaneous_music*
 My_lily_parser::get_word_element (String s, Duration * duration_p)
 {
-  Chord* velt_p = new Request_chord;
+  Simultaneous_music* velt_p = new Request_chord;
 
   Lyric_req* lreq_p = new Lyric_req;
   lreq_p ->text_str_ = s;
   lreq_p->duration_ = *duration_p;
   lreq_p->set_spot (here_input());
 
-  velt_p->add (lreq_p);
+  velt_p->add_music (lreq_p);
 
   delete  duration_p;
   return velt_p;
 }
 
 
-Chord *
+Simultaneous_music *
 My_lily_parser::get_rest_element (String s,  Duration * duration_p)
 {
-  Chord* velt_p = new Request_chord;
+  Simultaneous_music* velt_p = new Request_chord;
   velt_p->set_spot (here_input());
 
   if (s=="s")
@@ -146,7 +146,7 @@ My_lily_parser::get_rest_element (String s,  Duration * duration_p)
       skip_p->duration_ = *duration_p;
 
       skip_p->set_spot (here_input());
-      velt_p->add (skip_p);
+      velt_p->add_music (skip_p);
     }
   else
     {
@@ -154,20 +154,20 @@ My_lily_parser::get_rest_element (String s,  Duration * duration_p)
       rest_req_p->duration_ = *duration_p;
       rest_req_p->set_spot (here_input());
 
-      velt_p->add (rest_req_p);
+      velt_p->add_music (rest_req_p);
     }
 
   delete duration_p;
   return velt_p;
 }
 
-Chord *
+Simultaneous_music *
 My_lily_parser::get_note_element (Note_req *rq, Duration * duration_p)
 {
-  Chord*v = new Request_chord;
+  Simultaneous_music*v = new Request_chord;
   v->set_spot (here_input ());
 
-  v->add (rq);
+  v->add_music (rq);
 
   // too bad parser reads (default) duration via member access,
   // this hack will do for now..
@@ -280,25 +280,18 @@ My_lily_parser::get_parens_request (int t)
 }
 
 void
-My_lily_parser::add_requests (Chord*v)
+My_lily_parser::add_requests (Simultaneous_music*v)
 {
   for (int i = 0; i < pre_reqs.size(); i++)
     {
-      v->add (pre_reqs[i]);
+      v->add_music (pre_reqs[i]);
     }
   pre_reqs.clear();
   for (int i = 0; i <post_reqs.size(); i++)
     {
-      v->add (post_reqs[i]);
+      v->add_music (post_reqs[i]);
     }
-#if 0 //disabling...
-  if (default_abbrev_i_)
-    {
-      Abbreviation_req* a = new Abbreviation_req;
-      a->type_i_ = default_abbrev_i_;
-      v->add (a);
-    }
-#endif
+
   post_reqs.clear();
 }
 
index b39eae1ec197cf79541c299680fb3407c96f5458..ca673730c75d8297ed3af4bc5e2f7302da3cf571 100644 (file)
@@ -45,7 +45,7 @@
 
 // mmm
 Mudela_version oldest_version ("1.0.1");
-Mudela_version version ("1.0.1");
+Mudela_version version ("1.0.2");
 
 
 // needed for bison.simple's malloc() and free()
@@ -84,12 +84,12 @@ Paper_def* current_paper = 0;
     Array<String> * strvec;
     Array<int> *intvec;
     Box *box;
-    Chord * chord;
+    Simultaneous_music *chord;
     Duration *duration;
     Identifier *id;
     Translator* trans;
     Music *music;
-    Music_list *musiclist;
+    Music_list *music_list;
     Score *score;
     Header *header;
     Interval *interval;
@@ -204,7 +204,6 @@ yylex (YYSTYPE *s,  void * v_l)
 %token <id>    IDENTIFIER
 
 %token <id>    MUSIC_IDENTIFIER
-%token <id>    VOICE_IDENTIFIER
 %token <id>    POST_REQUEST_IDENTIFIER
 %token <id>    SCRIPT_IDENTIFIER
 %token <id>    COMMAND_IDENTIFIER
@@ -247,10 +246,9 @@ yylex (YYSTYPE *s,  void * v_l)
 %type <duration>       duration_length
 
 %type <scalar>  scalar
-%type <music>  Music transposed_music relative_music
+%type <music>  Music transposed_music relative_music Sequential_music Simultaneous_music
 %type <music>  property_def translator_change
-%type <musiclist> Voice Voice_body
-%type <chord>  Chord Chord_body
+%type <music_list> Music_list
 %type <paper>  paper_block paper_body
 %type <real>   dim real
 %type <real>   real_mult_expression real_primary
@@ -271,7 +269,6 @@ yylex (YYSTYPE *s,  void * v_l)
 %type <symtable>       symtable symtable_body
 %type <trans>  translator_spec translator_spec_body
 %type <tempo>  tempo_request
-%type <string> concat_strings
 
 %expect 1
 
@@ -326,7 +323,7 @@ mudela_header_body:
                {
                $$ = new Header;
        }
-       | mudela_header_body STRING '=' concat_strings ';' {
+       | mudela_header_body STRING '=' string ';' {
                (*$$)[*$2] = *$4;
                delete $2;
                delete $4;
@@ -340,15 +337,6 @@ mudela_header:
        ;
 
 
-concat_strings:
-               {
-               $$ = new String;
-       }
-       | concat_strings STRING {
-               *$$ += *$2;
-       }
-
-
 /*
        DECLARATIONS
 */
@@ -429,10 +417,21 @@ translator_spec_body:
                $$ = t;
                delete $2;
        }
-       | translator_spec_body STRING '=' scalar ';'    { 
-               $$-> set_property (*$2, *$4);
-               delete $2;
+       | translator_spec_body STRING '=' simple_identifier_init ';'    { 
+               Identifier* id = $4;
+               String_identifier *s = id->access_String_identifier ();
+               Real_identifier *r= id->access_Real_identifier ();
+               int_identifier *i = id->access_int_identifier ();
+       
+               String str;
+               if (s) str = *s->access_String (false); 
+               if (i) str = to_str (*i->access_int (false));
+               if (r) str = to_str (*r->access_Real (false));
+               if (!s && !i && !r)
+                       THIS->parser_error (_("Wrong type for property value"));
+
                delete $4;
+               $$->set_property (*$2, str);
        }
        | translator_spec_body CONSISTS STRING ';' {
                $$->group_l ()->consists_str_arr_.push (*$3);
@@ -641,25 +640,26 @@ tempo_request:
        }
        ;
 
-Voice:
-       '{' Voice_body '}'      {
-               $$ = $2;
+Music_list: /* empty */ {
+               $$ = new Music_list;
        }
-       ;
-
-Voice_body:
-       /**/            {
-               $$ = new Voice;
-               $$->set_spot (THIS->here_input ());
+       | Music_list Music {
+               $$->add_music ($2);
        }
-       | Voice_body Music      {
-               $$->add ($2);
+       | Music_list error {
        }
-       | Voice_body error                      {
-               $$ = new Music_list;
+       ;
+
+
+Sequential_music: '{' Music_list '}'           {
+               $$ = new Sequential_music ($2);
        }
        ;
 
+Simultaneous_music: '<' Music_list '>' {
+               $$ = new Simultaneous_music ($2);
+       }
+       ;
 Music:
        request_chord           { $$ = $1; }
        | TYPE STRING Music     {
@@ -674,8 +674,8 @@ Music:
                delete $2;
                delete $4;
        }
-       | Voice         { $$ = $1; }
-       | Chord                 { $$ = $1; }
+       | Simultaneous_music            { $$ = $1; }
+       | Sequential_music              { $$ = $1; }
        | transposed_music      { $$ = $1; }
        | MUSIC_IDENTIFIER { $$ = $1->access_Music (); }
        | MELODIC
@@ -737,24 +737,6 @@ scalar:
        ;
 
 
-Chord:
-       '<' Chord_body '>'      { $$  = $2; }
-       ;
-
-Chord_body:
-       /**/    {
-               $$ = new Chord;
-               $$-> multi_level_i_ = 0;
-               $$->set_spot (THIS->here_input ());
-       }
-       | Chord_body Music {
-               $$->add ($2);
-       }
-       | Chord_body error {
-               $$ = new Chord;
-       }
-       ;
-
 transposed_music:
        TRANSPOSE musical_pitch Music {
                $$ = $3;
@@ -764,12 +746,9 @@ transposed_music:
        ;
 
 
-/*
-       VOICE ELEMENTS
-*/
 request_chord:
        pre_requests simple_element post_requests       {
-               THIS->add_requests ((Chord*)$2);//ugh
+               THIS->add_requests ((Simultaneous_music*)$2);//ugh
                $$ = $2;
        }
        | command_element
@@ -783,7 +762,7 @@ command_element:
                $$ = new Request_chord;
                $$-> set_spot (THIS->here_input ());
                $1-> set_spot (THIS->here_input ());
-               ((Chord*)$$) ->add ($1);//ugh
+               ((Simultaneous_music*)$$) ->add_music ($1);//ugh
 
        }
        ;
@@ -900,13 +879,9 @@ post_request:
                $$ = $1;
        }
        | abbrev_type   {
-#if 1 // re-instating
                Abbreviation_req* a = new Abbreviation_req;
                a->type_i_ = $1;
                $$ = a;
-#else // and disabling just created ugly sticky abbrev_req
-               THIS->default_abbrev_i_ = $1;
-#endif
        }
        ;
 
@@ -930,17 +905,14 @@ sub_quotes:
 steno_musical_pitch:
        NOTENAME_PITCH  {
                $$ = $1;
-               // $$->octave_i_ += THIS->default_octave_i_;
        }
        | NOTENAME_PITCH sup_quotes     {
                $$ = $1;
-               // $$->octave_i_ += THIS->default_octave_i_ + $2;
                $$->octave_i_ +=  $2;
        }
        | NOTENAME_PITCH sub_quotes      {
                $$ = $1;
                $$->octave_i_ += - $2;
-               // $$->octave_i_ += THIS->default_octave_i_ - $2;
        }
        ;
 
@@ -1189,7 +1161,6 @@ pre_requests:
 absolute_musical_pitch:
        steno_musical_pitch     {
                $$ = $1;
-               // $$->octave_i_ -=  THIS->default_octave_i_;
        }
        ;
 
@@ -1280,9 +1251,9 @@ simple_element:
                m->duration_ = *$2;
                delete $2;
 
-               Chord*velt_p = new Request_chord;
+               Simultaneous_music*velt_p = new Request_chord;
                velt_p->set_spot (THIS->here_input ());
-               velt_p->add (m);
+               velt_p->add_music (m);
                $$ = velt_p;
 
        }
index 81b7fd26865d6cb25759dbd5e5604c8f69d40159..37a25ba848235c995f54116efbb487ae9d08697e 100644 (file)
@@ -59,7 +59,7 @@ Request_chord_iterator::process_and_next (Moment mom)
 {
   if (first_b_)
     {
-      for (PCursor<Music*> i (elt_l_->music_p_list_); i.ok(); i++)
+      for (PCursor<Music*> i (elt_l_->music_p_list_p_->top ()); i.ok(); i++)
        {
          assert (i->is_type_b (Request::static_name()));
          Request * req_l = (Request*)i.ptr();
index a640580afa5d26d0af28f64bc76c8f7a2b376946..c4478031e71d7a1160b601be70cdaaf0b2f10281 100644 (file)
@@ -1,5 +1,5 @@
 /*
-  voice-iter.cc -- implement Voice_iterator
+  Sequential_music-iter.cc -- implement Sequential_music_iterator
 
   source file of the GNU LilyPond music typesetter
 
 
 
 void
-Voice_iterator::do_print() const
+Sequential_music_iterator::do_print() const
 {
   if (iter_p_)
     iter_p_->print();
 }
 
-Voice_iterator::Voice_iterator (Voice const*v)
-  : PCursor<Music*> (v->music_p_list_)
+Sequential_music_iterator::Sequential_music_iterator (Sequential_music const*v)
+  : PCursor<Music*> (*v->music_p_list_p_)
 {
   here_mom_ = v->offset_mom_;
-  voice_C_ = v;
+  sequential_music_C_ = v;
   iter_p_ =0;
 }
 
 void
-Voice_iterator::construct_children()
+Sequential_music_iterator::construct_children()
 {
   while (PCursor<Music*>::ok()) 
     {
@@ -39,14 +39,14 @@ Voice_iterator::construct_children()
        }
       else 
        {
-         set_voice_translator();
+         set_Sequential_music_translator();
          break;
        }
     }
 }
 
 void 
-Voice_iterator::leave_element()
+Sequential_music_iterator::leave_element()
 {
   delete iter_p_;
   iter_p_ =0;
@@ -57,29 +57,29 @@ Voice_iterator::leave_element()
 }
 
 void
-Voice_iterator::start_next_element()
+Sequential_music_iterator::start_next_element()
 {
   assert (!iter_p_);
   iter_p_ = get_iterator_p (ptr());
 }
 
 void
-Voice_iterator::set_voice_translator()
+Sequential_music_iterator::set_Sequential_music_translator()
 {
   if (iter_p_->report_to_l()->depth_i () > report_to_l ()->depth_i ())
     set_translator (iter_p_->report_to_l());
 }
 
-Voice_iterator::~Voice_iterator()
+Sequential_music_iterator::~Sequential_music_iterator()
 {
   assert (! iter_p_);
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Voice_iterator,Music_iterator);
+IMPLEMENT_IS_TYPE_B1(Sequential_music_iterator,Music_iterator);
 
 void
-Voice_iterator::process_and_next (Moment until)
+Sequential_music_iterator::process_and_next (Moment until)
 {
   while (1) 
     {
@@ -100,7 +100,7 @@ Voice_iterator::process_and_next (Moment until)
          if (PCursor<Music*>::ok()) 
            {
              start_next_element();
-             set_voice_translator();
+             set_Sequential_music_translator();
            }
          else 
            {
@@ -115,13 +115,13 @@ loopexit:
 }
 
 Moment
-Voice_iterator::next_moment() const
+Sequential_music_iterator::next_moment() const
 {
   return iter_p_->next_moment() + here_mom_;
 }
 
 bool
-Voice_iterator::ok() const
+Sequential_music_iterator::ok() const
 {
   return iter_p_;
 }
index 1452731b2da4060b5e8b8a9e3c4f97bbd8ff5b5e..eb26aaaa23654ab4c5b24bc0e45c4b50f6445043 100644 (file)
@@ -1,6 +1,5 @@
-
 export PATH:=$(topdir)/lily/out:$(topdir)/buildscripts/out:$(PATH)
-export MFINPUTS:=$(topdir)/mf/:.:$(MFINPUTS)::
-export TEXINPUTS:=$(topdir)/tex/:.:$(TEXINPUTS)::
-export LILYINCLUDE=$(topdir)/init:$(topdir)/mf/out
+export MFINPUTS:=$(topdir)/mf/$(PATHSEP)$(MFINPUTS)$(PATHSEP)$(PATHSEP)
+export TEXINPUTS:=$(topdir)/tex/$(PATHSEP)$(TEXINPUTS)$(PATHSEP)$(PATHSEP)
+export LILYINCLUDE=$(topdir)/init$(PATHSEP)$(topdir)/mf/out
 
index 4aa51ff01735ab2f465b67d56481968ce590a801..541d10b0168d4a77607f181647193ecd542c3822 100644 (file)
@@ -7,3 +7,9 @@ local-WWW: $(ly_examples) $(fly_examples) $(ps_examples) $(gif_examples)
        (cd $(outdir); $(PYTHON) ../$(buildscripts)/mutopia-index.py --package=$(topdir) --prefix=../ --suffix=/$(outdir) $(html_subdirs) $(all_examples))
        $(PYTHON) $(step-bindir)/add-html-footer.py --package=$(topdir) --index=$(depth)/$(outdir)/index.html $(outdir)/index.html
        echo $^ > $(depth)/wwwlist
+
+convert-mudela: local-convert-mudela
+       $(LOOP)
+
+local-convert-mudela:
+       $(PYTHON) $(depth)/scripts/convert-mudela.py -e *ly
index 0f5ab11b8f44c55ccb4b1e47fca5ad2951770baf..cdaa6f7ae7481d870613eb70cb836ee5ea43f91f 100644 (file)
@@ -92,7 +92,7 @@ Mudela_stream::header()
   *os_p_ << filename_str_g;
   *os_p_ << "\n\n";
   // ugh
-  *os_p_ << "\\version \"1.0.0\";\n";
+  *os_p_ << "\\version \"1.0.2\";\n";
 }
 
 void
index 87a08060b133f6a0015065a39c021f503e87141e..bd66bb4d4f83c1567508bb0a15b56aa4fd76fe2c 100644 (file)
@@ -38,7 +38,7 @@
                     "musical_pitch" "meter" "midi" "mm" "multi" "header"
                     "notenames" "octave" "output" "partial" "paper" "plet"
                     "property" "pt" "shape" "relative" "include" "score"
-                    "script" "skip" "staff" "table" "spandynamic" "symboltables"
+                    "script" "skip"  "table" "spandynamic" "symboltables"
                     "tempo" "texid" "textstyle" "transpose" "version" "grouping"
                     ))
        (kwregex (mapconcat (lambda (x) (concat "\\\\" x))  keywords "\\|")))
index e66e414d6c361d76371cc6a7bddfa420443759ab..f8c6a0dc4404982923d06438d832852dc720622c 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "violoncello.ly"
index 026d38ebe5a860d8ffbeb8899d45111877c868ac..2698afa816ee30795f787a07ad73d653bab8f9ee 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "clarinetti.ly"
index d79ea0fdb9abb8e177664328a4227f2645c1bf94..be6fc080a9c358b51a34d63701164cba1f253654 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "clarinetto-1.ly"
 \include "clarinetto-2.ly"
index 44ff9ef9a4efc63a277537f1c09721f66fe3440d..ef713c0441260adacf1edda9a6bf49fe7aaeb9ff 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 clarinetto1 = \melodic \relative c {
        R1 *2 | d''4-.\ff r r2 | R1 *3 | e4-. r r2 | R1 *3 |
index 58564653ed391ec96229d2ae7ba6970e37f016e6..be27d99bb92f3968a97096a3670091515136c0b3 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 clarinetto2 = \melodic \relative c { 
        R1*2 bes''4-.\ff r r2 | R1*3 | cis4-. r r2 | R1 *3 | 
index 980ee0bf7222e8b448ebb4bcb29761ed6f508cc3..420d022a91e6dc6dab5f81346f0c832ea6c40f60 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "contrabasso.ly"
index 55d22b546e547a3a03453c0ec190caa726da4ee4..b0a5617c7168db6e92266d6072668ba4be96d2af 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 contrabasso = \melodic \relative c {
 %      \translator Staff=violoncello
index 896bf7fb42a5f91609aacd1e65941ba975719665..c044c050fa5ccc3ba5e626ae20cb2170c6da28a5 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 
index db65dc3c8e8c915499eb251bdd554ce153dbe780..2c7009e73b5fff573ac826fd8d301b6be5106b07 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "corni.ly"
index 32d1412a3a688af6a4309e7d3d530f76d63784c1..966b68376c21e1c1b10e71696ea909bfd8f7b3a9 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "corno-1.ly"
 \include "corno-2.ly"
index 1ce84c1c7f1d2d315c4b19a8a0c060546d28b34e..c2af389e4149531892ebdd8dffa859927d857d80 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 corno1 = \melodic \relative c {
        R1 *2 | f''4-.\ff r r2 | R1 *3 | f4-. r r2 | R1 *3 |
index ad8ba332614febfb2c899501a43e0467bf228d1a..b203ddaa6baa167374c5f32348678cd7afdb68ef 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 corno2 = \melodic \relative c {
        R1 *2 | d''4-.\ff r r2 | R1 *3 | d4-. r r2 | R1 *3 |
index f3cb5cf1948b2fd9e92316fe360a1bc7416cbb43..bb255eb527a0d2bbf86cd814f9cd33f5a4483bb0 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "fagotti.ly"
index a4bf8c26d295463959dcb46c60d3f9993f87ae5e..f98dbd3cc46ab2456e30ea7bfb2db4e1abe1ec2a 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "fagotto-1.ly"
 \include "fagotto-2.ly"
index fa029e894712509bf2b1630070276d952b3a3b92..34447df55fd38cf71304e06aeab358ad6e63b5df 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 fagotto1 = \melodic \relative c {
        R1 *2 | as'4-.\ff r r2 | R1 *3 | as4-. r r2 | R1 *3 |
index 07610f250773709df427b518b26967a6c3c0fcca..ab55c98ce15762679d098f45a15d4c85d83d950b 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 fagotto2 = \melodic \relative c {
        R1 *2 | f4-.\ff r r2 | R1 *3 | f4-. r r2 | R1 *3 |
index 65621ede257336c8e0da7ccb8bb0f65f49b2e9f8..9c45290df261d34d969eedddd789f93019e09a0d 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "flauti.ly"
index 2e14b35ba0f94ae5a87450a1d97ffee7d1213a38..ea4f964420e7ea781d5178a5594ebc72926ae658 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "flauto-1.ly"
 \include "flauto-2.ly"
index abdf417cce4d0aec9ffec7943c64d59d1cacec7f..51fcf1f1d10f5292391745d620c8d57c64b2b805 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 flauto1 = \melodic \relative c {
        R1 *2 | c'''4-.\ff r r2 | R1 *3 | d4-. r r2 | R1 *3 |
index ba9288f1263816485ef4627a29c90df01fcac92f..56a4f4c71897731a3ea368e0749a0561b81509e7 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 flauto2 = \melodic \relative c {
        R1 *2 | as'''4-.\ff r r2 | R1 *3 | b4-. r r2 | R1 *3 | 
index bbd1ea28db75f3f81a33ca05777785bc1bdcd8b0..1849424a1af8c4325ea81bbae30f99c77f1b66eb 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 global = \melodic {
        \time 4/4;
index 3458fa8638ee739adb36d08a30f07424d4e09207..d35301bc6587ecc2620c39742e6dee88c7c72f88 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 oboe1 = \melodic \relative c'' {
        R1 *2 | as'4-.\ff r r2 | R1 *3 | as4-. r r2 | R1 *3 |
index bf4b77a19d0b2cc699a833a57a237995d08c80af..c5506b5d805546c3b30319a5b55728881ff633f4 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 oboe2 = \melodic \relative c{
        R1 *2| f''4-.\ff r r2 | R1 *3 | f4-. r r2 | R1 *3 |
index 16aa625b44a445c82a1a153fc5fb212c10372494..b389779b57d23ca79d8e8b38b3a7dc53bb3e17e9 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "oboi.ly"
index 981973b0363512eb187e533f9b42e82a529ba3f2..1c90c9e922842682a30c07827d41c525271636ac 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "oboe-1.ly"
 \include "oboe-2.ly"
index a9d52b4efbec3100de07bc8b6a6db351b6e6c9f9..1c7f7642cfa6e8c1fa4c78363bab8c04e3127661 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 timpani = \melodic \relative c {
        R1 *2 | c4-.\ff r r2 | R1 *3 | c4-. r r2 | R1 *3 |
index c3f13d2c0645c340578110c16f67b64307327c86..5ee208541b0010ab843897d278ff49fa67903283 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "trombe.ly"
index 36583629d0f9308cffab2d05167987691719a186..50489f6d5c22bfe3cf96870bcbd924d1181c2ef9 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "trombo-1.ly"
 \include "trombo-2.ly"
index 74b717a03e629b91f75f9197d836f9c049e6d5eb..92d525704896a661a712bc7a721cf47b4d8a1985 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 trombo1 = \melodic \relative c {
        R1 *2 | c''4-.\ff r r2 | R1 *3 | c4-. r r2 | R1 *3 |
index be909a34309128c3996e8b7a028dcc97c19d155c..afdf2fd34f5f69fc65f8a0cc7497bc25aec5d63e 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 trombo2 = \melodic \relative c {
        R1 *2 | c'4-.\ff r r2 | R1 *3 | c4-. r r2 | R1 *3 |
index b6b000ee30fc41cfe3b9656664e91993a5120f91..4ea6f86b9c3a0aeb3359b168e99c57aeeee8d04a 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 viola1 = \melodic \relative c {
        \type Voice=one
index e3109c9ac07eb649609b2656ea90521ddca77bec..d1b7a2074f2e5569e0797bd151d99a4812f028ad 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 viola2 = \melodic \relative c {
        % starts on (actualy, most part is on) same staff as viola1
index ad8c60a6767d50969814c5bc0d31fc3d281f080c..cd17993ab9af4ebdcf392e2be607270b2130bb10 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "viola-1.ly"
index cdfa1a723efb2a6489bdcf3e81387717c8e44bc9..23482fc138efd61a5b9f1f5ddd92ccaeb075b0a2 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "violino-1.ly"
index d623a38d76bf9ca0ff57be596942d1ac845275d3..355ff61d77ae34fe7d16e2f14e612e7fff7d2082 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 violino1 = \melodic \relative c {
        c'1\ff ~ | c | <f4-. c'-. as'-.> r r2 | R1 |
index d8b426945b2137db9d0fb3036292a403f9b0a5b4..e31f101382ed387001d47c9a732d6b2489717979 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "violino-2.ly"
index f9693fdf0a1d9c85316b4b0ef49a02263fe58a65..8c5993484512fd25df15b5eb4bf970ca7f2c42d4 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 violino2 = \melodic \relative c {
        c'1\ff ~ | c | <f4-. c'-. as'-.> r r2 | R1 |
index 953d20a30463cff3bebf84199e5463a521903330..78bd4822ed340230333c7caf52d8e9682935f1b8 100644 (file)
@@ -7,7 +7,7 @@ enteredby =      "JCN";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "global.ly"
 \include "violoncello.ly"
index 622ea85ab93ab082eadf4e983a958ef06ebffaa3..3b86a7306cb42037ec6a8ca9527dc4bbb3af1737 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 violoncello = \melodic \relative c {
        c1\ff ~ | c | f,4-. r r2 | r1 | c'1\ff ~ | c | f,4-. r r2 |
diff --git a/mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Allemande.ly b/mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Allemande.ly
new file mode 100644 (file)
index 0000000..d8a9a7c
--- /dev/null
@@ -0,0 +1,148 @@
+\header{
+       enteredby = "Tom Cato Amundsen";
+       copyright = "Public Domain";
+       piece = "Allemande";
+}
+
+\version "1.0.2";
+
+global = \melodic{
+       \time 4/4;
+       \partial 8*3;
+       \key es;
+       \skip 1*15;
+       \skip 4*3;
+       \skip 16*4;
+       \bar ":|:";
+       \skip 16*3;
+       \skip 1*16;
+       \bar ":|";
+}
+
+hoyreEn = \melodic\relative c'''{
+%      \partial 4.; 
+       [as16 g f] |
+       [g16 d es b][c f es d][es b c g][as d c b] |
+       [c g as es][f es' d c][b8. a16][g8 b] |
+       [c16 d es8][f,16 es' d c][d es f8][g,16 f' es d] |
+       [es16 f g8][as,16 g' f es][f g as8][b,16  as' g f] |
+%5
+       \type Staff < { 
+               \stemup es4~ [es8. c16] d4~ [d8. b16] |
+               c4.~ [c16 b] c4~ [c16 c bes as] |
+               \stemboth [g c32 d es16 c][g8 as] \stemup bes4~ [bes8 g'~] |
+               \stemboth [g16 c,32 d es16 c][a f' c32 d es16] \stemup d4~ [d8 d] |
+               [d8 c] r16 [fis g a][es8 d] r16 [g a bes] |
+               [f8 e] r16 [a bes c][g8 fis] r16 [es d c] |
+       } {
+               \stemdown r16 [b c g][as es f8] r16 [g as f][g d es8~] |
+%TODO når du får tak i en til urtekst må denne og neste takt sammenliknes.
+               [es16 f32 g as16 f][d f8.~][f16 f es d][es8 f] |
+               s4 r4 r16 [f g d] es8 r |
+               s2 r16 [a bes8~][bes fis] |
+               g4 r a r |
+               bes r c r
+       } >
+%11
+       [d16 a bes fis][g c bes a][bes fis g d][es a g fis] |
+       [g d es b][c f es d][es c d fis][a es d c] |
+       [bes d g bes~][bes fis g bes,][c es g bes~][bes fis g c,] |
+       [d fis g bes~][bes fis g d][es fis g bes~][bes fis g bes] |
+       [e a, bes fis][g bes a g][fis d es bes][c es d c] |
+       \type Staff <
+               { \stemup [bes8 d'][bes a16 g] g4~ g16 }
+               { \stemup s2 s16 d8.~ d16 }
+               { \stemdown r8 <g d> <[g d><fis c]> r16 [d16 b8~] b16 }
+       >
+       [es'16 d c] |
+%17
+       [d a b g][as f es d][es( f32 )g c,8] r16 [as'' g f] |
+       [g d e c][des bes as g][as( bes32 )c f,8] r16 [c f g] |
+       [as e f c][des c' bes as][bes f g d][e des' c bes] |
+       [c g as e][f es' des c][des a bes g] g'4~ |
+       [g16( )c, f( )e][as( g f )e][f( )c es( )des][bes'( as g )f] |
+%22
+       [e16( f32 )g c,16 bes][as f' g, e'] f4~ [f32 g f e f16 g] |
+       [as16 e f c][as f es' c][d a bes d][f as g f] |
+       [g d es bes][g es d' b][c g as c][es g f es] |
+       [f c d as][f d c' a][b fis g b][d f es d] |
+       [es b c as][g f es' d][c b c d][g,8 d'] |
+       [es16 g c g][es d c b][c es g8~][g16 bes, as g] |
+%28
+       [as c f c][as g f e][f b d8~][d16 f, es d] |
+       [c8 es'( as, )g][d f'( as, )g] |
+       [es g'( as, )g][f as'16( g][as g fis )g] |
+       fis4.~ [fis16 e32 fis][g16 d f es][d c b a] |
+       \type Staff <
+               { \stemup [g8 g'][es d16 c] c4. }
+               { \stemdown r8 <g c es> <[g c> <f b]> <es4. g> } 
+       >       s8
+}
+
+venstreEn = \melodic\relative c{
+       \clef bass; 
+%      \partial 4.; 
+       r16 r8 |
+       [c8 c,] \clef treble; r16 [as''' g f][g d es b][c f es d] |
+       \clef bass; [es b c g][as8 f][g g,~][g16 f' es d] |
+       [es b c g][as g' f es][f c d a][bes as' g f] |
+       [g d es b][c bes' as g][as es f c][d8 b'] |
+%5
+       [c8 es][f, as][b, d][es, g] |
+       [as f][g g'][c, g']
+       \type Staff <
+               { \stemup [c8 d] | es4 }
+               { \stemdown c4 ~ | [c8. g32 f] }
+       >
+       \stemboth [es, f g16 c,32 d es16][g,8. bes32 as][g as bes16 es,32 f g16] |
+%8
+       [a,8 c][f a][bes. f''32 es][d es f16 bes,32 c d16] |
+       [es, g a bes][c d es c][fis, a bes c][d e fis d] |
+       [g, bes c d][e fis g es][a, c d es][d c bes a] |
+       [bes c d a][bes es d c][d a bes fis][g c bes a] |
+       [bes fis g d][es32 f g16 c,32 d es16] fis,4 r8 d8 |
+%13
+       [g8 bes'( es, )d][a c'( es, )d] |
+       [bes d'( es, )d][c es'( es, )d] |
+       <cis4 cis,> r8 cis8 [d a][fis d] |
+%16
+       [g16 a bes c][d8 d,]
+       \type Staff <
+               { \stemup r8 r16 d' g }
+               { \stemdown g,4~ g16 }
+       >
+       r16 r8 |
+%17
+       [g,8 g'] r16 [as g f][g d es b][c f, es d] |
+       [c8 c'] r16 [des' c bes][c g as e][f bes, as g] |
+       [f g as8][bes,16 as' g f][g as bes8][c,16 bes' as g] |
+       [as bes c8][des,16 c' bes as][bes c des8][e,16 des' c bes] |
+       [as8 c][f, as][des f g, bes~] |
+%22
+       [bes8 as16 bes][c8 c,][f16 c' f g][as f as c] |
+       [f8 as, c f,][bes f' d bes] |
+       [es g, bes es,][as es' c as] |
+       [d f, as d,][g d'][b g] |
+       [c es,][as f][g g,~][g16 as' g f] |
+       [g d es b][c f es d][es b c g][as des c bes] |
+%28
+       [c g as e][f bes as g][as f g b][d as g f] |
+       [es( g c )es~][es b c es,][f( as c )es~][es b c f,] |
+       [g( b c )es~][es b c g][as b c es~][es b c es] |
+       [a d, es b][c es d c][b g as es][f as g f] |
+       [es g c es][g8 g,] <c4. c,> s8
+}
+
+\score{
+       \type GrandStaff <
+               \type Staff = treble <
+                       \global
+                       \hoyreEn
+               >
+               \type Staff = bass <
+                       \global
+                       \venstreEn
+               >
+       >
+       \paper{}
+}
\ No newline at end of file
diff --git a/mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Sinfonia.ly b/mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Sinfonia.ly
new file mode 100644 (file)
index 0000000..ce91982
--- /dev/null
@@ -0,0 +1,341 @@
+\header {
+  filename =    "";
+  title =       "Partita II";
+  piece =       "Sinfonia";
+  description = "6 Partite per il clavicembalo, Partita II (c-minor)";
+  opus =        "BWV 826";
+  source =      "Editio Musica Budapest (Urtext)";
+  composer =    "Johann Sebastian Bach (1685-1750)";
+  enteredby =   "Tom Cato Amundsen";
+  copyright =   "Public Domain";
+}
+
+\version "1.0.2";
+
+global = \melodic {
+       \time 4/4;
+       \key es;
+       \skip 1*7;
+       \bar "||";
+       \skip 1*22;
+       \time 3/4;
+       \skip 2.*62;
+       \bar "|.";
+}
+  
+hoyreOpp = \melodic\relative c''  {
+       \stemup
+       es4^"Grave adagio" r16 [es d. es32] f4 r16 [f16 f. g32] |
+       [as8. as16] [as16 g32 f g16. d32] es4 r16 [g g. as32] |
+%3
+       bes4 r16 [bes,16 bes. c32] [des8. des16] 
+       \type Staff < 
+               { \stemup e4 }
+               { \stemup \property Voice.hshift = 1 [des16 c32 bes c16. g32] }
+       >
+%4
+       f4 \stemboth r16 [f g. as32] \stemup d,4 r16 [d g. es32] |
+       c4 ~ [c32 es des c des16. f32] [b,16. c32 b16. c32] d4 ~ |
+       d2 ~ [d16. g,32 a16. b32] [c16. <b32 g> <c16. a> <d32 b]> |
+       <[es8. c> <es16 c]>
+       \type Staff <
+               { \stemup fis4 }
+               { \stemup \property Voice.hshift = 1 [es16 d32 c d16. a32] }
+       > g2
+}
+
+hoyreNed = \melodic\relative c'' {
+       \clef violin;
+       \stemdown
+       <c4 g> r16 [c b. c32] d4 r16 [d d. es32] |
+       [f8. f16] f8 r <c4 g> r16 [es16 es. f32] |
+       <c4 g' > r16 [g16 g16. as32] [bes8. bes16] bes8 r |
+       <c4 as> r16 s16*3 r16 [f, f. g32] g4 |
+%5
+       r16 [es es. f32] f4 [g16. a32 g16. a32] b4 ~ |
+       [b8. d,16] [f8. as16] [g16. f32 es16. d32] [es16. d32 es16. f32] |
+       g4 <c8 a> r <d2 b>
+}
+
+venstreOpp = \melodic\relative c' {
+       \clef bass;
+       \stemup
+       <c4 g es> r <b as f d> r |
+       r <b f d> <c g es> r |
+       <c g e> r r <c g> |
+       <c as f> r r16 <[as d,><as. d,><g32 d]> <g4 d> |
+%5
+       r16 <[g c,><g. c,><f32 c]> 
+       \type Staff <
+               {\stemup f4~ f}
+               {\stemup c4 d}
+       > r16 [f f. g32] |
+%6
+       [as8. as16]~ [as g32 f g16 d] <es4 c> r |
+       r <a es c> <g2 d>
+}
+
+venstreNed = \melodic\relative c{
+       \stemdown
+       c4 r c r | r c c r | c r r c | c r r16 [c c. bes32] bes4 |
+       r16 [bes bes. as32] as4_"tr" g r16 [d' d. es32] |
+       \type Staff <
+               { \stemdown \property Voice.hshift = 1 [f8. f16] [b,8. b16] g4 r | }
+               { \stemdown s4 g}
+       >
+       r g g2  
+}
+
+andanteEn = \melodic\relative c''{
+       [g16^"andante" c32 d es8~] [es16 d32 c es d c b] [c16 g as f] [g c g f] |
+       [es16 c'32 d es d c16] [g' c, as' c,] [b c d b] g16 r16 r8 |
+%10
+       \stemup [g'32 f es d c16 bes~] [bes des8 c16] 
+       [as'32 g f e f8~] [f32 g as g f es d es] |
+       [f es d c bes16 as~] [as c8 bes16] 
+       [g'32 f es d es8~] [es32 f g f es d c b]
+%12
+       \stemboth
+       [c bes as g f16 es'~] [es d32 c es d c b]
+       [c d es f g16 c,~] [c b32 c d c b c] |
+       [as'32 g f e f16 des~] [des c32 des es des c des]
+       [g f es d es16 c~] [c b32 c d c b c]
+%14
+       [f c b a b16 d] [f32 bes, as g as16 c] 
+       [f32 as, g f g8~] [g32 f' g as g16 f] |
+       [g16 b,8 c16~] [c16 bes32 as g f es d] [es g f es f es d es] [d8 c] |
+%16
+       r8 g'~ [g32 as g f g16 as] [bes16 d es8~] [es32 bes es f g16 es] |
+       [des16 c f8~] [f32 c f g as16 f] [es c d8~] [d32 f g as bes as g as] |
+%18
+       [bes32 as g16~] [g32 f e16~] [e32 d c16~] [c32 g' as bes] 
+       [as g f16~] [f32 es des16~] [des32 c bes16] [bes32 f' g as] |
+%19
+       [g f e f bes f e f] [as f e f g f e f] f4~ [f32 es d es f d es f] |
+       [bes,32 d f g as8~] [as32 g f as g f es d] 
+       [es bes es f g8~] [g32 f es g f es d c] |
+%21
+       [c'32( a g )fis es16 d~] [d32 g a bes cis,16 d] ~
+       [d32 fis g a c, es d c] [fis d e fis g a bes c] |
+%22
+       [bes32 a g fis ~ fis16 g~] [g d8 es16~] 
+       [es16 b8 c16~] [c32 bes as g as16 c]
+%23
+       [fis,32 es' d c bes'16. a32] [g8( )fis16.-\prall g32] g4~ 
+       [g32 f g as g f es d ] |
+       [f32 es d c g'8~] [g32 es f g f es d c] [es d c bes g'8~] 
+       [g32 d es f es d c bes] |
+%25
+       [d c bes a g'8~] [g32 c, d es d c bes a] [c bes a g g'8~] 
+       [g32 bes, c d c bes a g] |
+       as4~ [as32 as g as bes as g as] es'4~ [es32 c b c d c b c] |
+       [fis16 es8 d16] [g16 d8 c16] [a'16 c,8 bes16~] [bes32 d c bes g' bes, a g]
+%28
+       [bes'8-\fermata~ bes32 a g fis] [g bes a g fis e d c] [bes d c es d g fis e]
+       [d c bes a bes d bes g] |
+       r16 [e'32 fis fis16.-\prall \[2/3 e64 fis g\]1/1 ] 
+       \type Staff <
+               {       \stemup  
+                       [bes,32 a g fis g32 bes16.~] [bes16 c32 bes a bes c a] [fis8. g16] }
+               {       \stemdown s8 g8 ~ g4 d}
+   >
+}
+
+andanteTo = \melodic\relative c{
+%8
+       [c8 c'] [f, g] [es c] [es g] |
+       [c as] [es f] [g g,]
+       \stemdown \translator Staff = treble r16 [f''16 es d] |
+%10
+       [es8 g] [e c] [f as] [f c] | 
+       [d f] [d bes] [es g] [es c] |
+       \stemboth \translator Staff = bass [as c] [f as,] [g c] [es g,] | 
+       [f as] [g f] [es g] [f es] |
+%14
+       [d f] [as c,] [b d] [g d] | 
+       [es as,] [f g] c,4~ [c16 d32 es f g a b] |
+       [c8 c'] [bes as] [g bes] [g es] |
+       [as c] [as f] [bes as] [g f] |
+       [e g] [c e,] [f as] [f des] |
+       [bes g] [c c,] [f16 g32 as bes c d e] [f8 es] |
+       [d f] [d bes] [g' bes] [es, g] |
+       [a, fis'] [g g,] [d' a'] [c d,] |
+%22
+       [g a] [bes b] [c d] [es c] |
+       [a g] [d' d,] [g a] [b g] |
+       [c es] [c a] [bes d] [bes g] |
+       [a c] [a fis] [g bes] [g es] |
+%26
+       [c16 d32 es f g as bes] [c16 c, c'8~] [c32 c, d es f g as bes][c16 c, c'8~]|
+       [c c,] [bes bes'] [fis d] [g es] |
+       \type Staff <
+               {       \stemup <g4 e> r <d'2 bes g> |
+                       cis4~ [cis8. cis16] [d8 c16 bes] 
+                       \type Staff <   
+                               { \stemup [a bes c8] }
+                               { \stemdown a4 } >
+               | }
+               {       \slurdown \stemdown cis,4 r d2( | )d1 \slurboth }
+       >
+}
+
+allegroEn = \melodic\relative c''{
+%30
+       [g8^"allegro" g16 a] [b8 c d es] |
+       [f16 es d es] [f8 g as d,] |
+       [f b, d g,] [g'16 f es d] |
+       es8 c'4 [bes16 as] [g f es d] |
+       c4~ [c16 d e f] [g as bes g] |
+       [e8 des'~] [des16 g, as bes] [as g f e] |
+       [f g as8~] [as16 g f es] [d c d f] |
+%37
+       [es f g8~] [g16 f es d] [c b c es] |
+       [d as' d, c] [d es f g] [ f es d c] |
+       [b g' f es] [d f d c] [b d b a] |
+       [g a b c] [d c b c] [d es f d] |
+       [b c d es] [f as g f] [es d c b] |
+       [c d es c] [a8 c] [f, es'] |
+%43
+       [bes16 c d bes] [g8 bes] [es, d'] |
+       [a16 bes c a] [fis8 a] [d, c'] |
+       [g16 a bes g] [es g d g] [cis, bes' a g] |
+       [fis e d e] [fis8 g a bes] |
+       [c16 bes a bes] [c8 d] [es a,] |
+       [c fis,] [a d,] [d'16 c bes a]
+%49
+       [bes a g a] [bes8 c d es] | 
+       [f16 es d c] [bes f' c bes] [as f' bes, as] |
+       [g16 f es f] [g8 a b c] | 
+       [d16 c b a] [g d' as g] [f d' g, f] |
+       [es c' g f] [es f g as] [g c g f] | 
+       [es c' g f] [es f g as] [g c g f]
+%55
+       [e bes' g f] [e f g as] [g bes g f] | 
+       [e bes' g f] [e g bes des] [c bes as g]|
+       [as f' c bes] \stemup [as bes c des] [ c f c bes] | 
+       [as f' c bes] \stemboth [as bes c des] [c f c bes] |
+       [a es' c bes] \stemup [a bes c des] [c es c bes] |
+       [a es' c bes] \stemboth [a c es ges] [f es des c] |
+%61
+       [des8 bes c des es des] | 
+       [c as bes c des c] [bes as bes g as bes] |
+       [e,16 d c d] [e8 f g as] | 
+       [bes16 as g as] [bes8 c] [des g,] |
+       [bes e,] [g c,] [c'16 bes as g]
+%67
+       [as g f8~] [f16 as g f] [es d c bes] | 
+       [g' f es8~] [es16 g f es] [d c b c] |
+       [f es d8~] [d16 f es d] [c b a g] | 
+       [es' f g8~] [g f16 es] [d a' b c] |
+       [d c b c] [d g f es] [d c b a] | 
+       g4~ [g16 a b c] [d es f d]
+%73
+       [b8 as'~] [as16 d, es f] [es d c b] | 
+       c4~ [c16 g' des c] [bes es bes as] |
+       [g as bes c] [des8 bes] g'4~ | 
+       [g8 c,16 bes] [as f' bes, as] [g des' g, f] |
+       [e f g as] [bes8 g] [e'.-\prallprall d32 e] |
+%78
+       [f8 f,16 g] [as8 bes c d] | 
+       [es16 d c d] [es8 f g as] |
+       [b,16 g' d c] \stemup [b c d es] [d g d c] | 
+       [b g' d c] [b c d es] [d g d c] |
+       [b f' d c] [b c d es] [d f d c] | 
+       [b f' d c] [b d f as] [g f es d] |
+%84
+       [es f g es] [c g' f es] [d c bes as] | 
+       \stemboth [g as bes8~] [bes16 c bes as] [g f e d] | 
+       [c g' c, bes] [c d e f] [es g c, bes] |
+       [c g' f e] [f c f g] [as bes c d] | [es d c d] [es8 f16 g] [as8 des,] |
+       [f b,] [d g,] [g'16 f es d] | 
+       \type Staff <
+               { \stemup [es8. c16] c4 ~ [b8.-\prall c16] | c2-\fermata }
+               { \stemdown r8 r16 <a16 es> <g2 d> | <g es> }
+       >
+}
+allegroTo = \melodic\relative c'{
+       \clef bass;
+%30
+       \type Staff <
+               { \stemup <b8 g> r r4 r }
+               { \stemdown g,8 r8 r4 r }
+       >
+       r2. | r2. |     
+       \clef treble; r8 [c16 d] [es8 f] [g as] |
+       [bes16 as g as][bes8 c] [des g,]  
+       [bes e,][g c,][c'16 bes as g] | [as8 f g as][bes as] | 
+       [g es f g as g] | [f es f d es f] | [g g,16 a] [b8 c] [d es] |
+       [f16 es d es][f8 g][as d,] |
+       [f b,][d g,][g'16 f es d] | \clef bass;
+       [es d c8~][c16 es d c][bes a g f] |
+%43
+       [d' c bes8~][bes16 d c bes][a g fis g] |
+       [c bes a8~][a16 c bes a][g fis e d] | [bes'8 d][g, bes][e, cis'] |
+       [d8 d,~][d c16 bes][a g fis e] | d4~ [d16 e fis g][a bes c a]
+%48
+       [fis8 es'~][es16 a, bes c][bes a g fis] |
+       g4 r16 [g' as bes][as g f es] | [d8 f][d bes][c d] |
+       [es es,] r16 [es' f g][f es d c] | [b8 d][b g][a b] |
+       [c c,] r16 [d''16 es f][es8 d] | [c c,] r16 [as' bes c][bes8 as] |
+       [g c,] r16 [d' e f][e8 d] | [c c,] r16 [d e f][e8 c]
+%57
+       [f f,] \stemdown \translator Staff = treble r16 [g'' as bes][as8 g] |
+       [f  \stemboth \translator Staff = bass f,] r16 [des'16 es f][es8 des] |
+       [c f,] \stemdown \translator Staff = treble r16 [g' a bes][a8 g] | 
+       [f \stemdown \translator Staff = bass f,] \stemboth r16 [g a bes][a8 f] |
+       [bes16 c des8~][des16 c bes as][g f g bes] |
+%62
+       [as bes c8~][c16 bes as g][f e f as] | 
+       [g des' g, f][g as bes c][bes as g f] | 
+       [c'8 bes16 as][g c bes as][g f e d] |
+       c4~ [c16 d e f][g as bes g] | 
+       [e8 des'~][des16 g, as bes][as g f e] |
+%67
+       [f g as f][d8 f][bes, as'] | 
+       [es16 f g es][c8 es][as, g'] |
+       [d16 es f d][b8 d][g, f'] | 
+       [c16 d es c][as c g c][fis, es' d c] |
+       [b a g a][b8 c d es] | 
+       [f16 es d es][f8 g as d,] |
+%73
+       [f b,][d g,][g'16 f es d] | 
+       [es d c d][es8 f g as] |
+       [bes16 as g f][es bes' f es][des bes' es, des] |
+       [c bes as bes][c8 d e f] | 
+       [g16 f e d][c g' des c][bes g' c, bes] |
+       [as f' as, g][f c' des g,][a es' f b,]
+%79
+       [c f es d][c g' as d,][es b' c f,] | 
+       [g8 g,] \stemdown \translator Staff = treble r16 [a'' b c][b8 a] |
+       [g \translator Staff = bass g,] \translator Staff = treble
+               r16 [es' f g][f8 es] | 
+       [d \stemboth \translator Staff = bass g,] r16 [a b c][b8 a] |
+       [g8 g,] \stemdown \translator Staff = treble r8 [g''16 f][es d c b] |
+       [c8 \stemboth \translator Staff = bass c,16 d][es8 f g as] | 
+       [bes16 as g as][bes8 c des g,] |
+%86
+       [bes e,][g c,][c'16 bes as g] | as4~ [as16 bes as g][f g as f] |
+       [g f es d][c bes as g][f f' e f] | [as f e f][b, f' es d][es g c, es] |
+       [fis,8. fis'16] g4 g, | c,2-\fermata
+}
+
+\score {
+     \type GrandStaff < 
+      \type Staff = treble < 
+        \global 
+        { \hoyreOpp \andanteEn \allegroEn }
+        \hoyreNed
+      >
+      \type Staff = bass <
+        \global
+        { \venstreOpp \andanteTo \allegroTo }
+       \venstreNed
+      >
+    >
+  \paper {}
+}
+
+% EOF
+
+
+
index b794f9367ecaf9680f69366d6cdbdf0424c431e1..cdfbc5c30e4aec295d45a263c4caa0db9e45f922 100644 (file)
@@ -14,7 +14,7 @@ enteredby =    "jcn";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 one = \melodic\relative c {
        \property Voice . textstyle =  "italic"
index 22dc7c74bf8ed9c1646e77f8aa9f613c35f8af2a..f2b5e97956e199716f5f9f21cdb2ce456cf6aa77 100644 (file)
@@ -14,7 +14,7 @@ enteredby =    "jcn";
 copyright =     "public domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 one = \melodic\relative c{
        \property Voice . textstyle =  "italic"
        r8\mf [c'-1( e-2 g-4] [e-2 c-1 bes'-5 g-3] |
index 754ee16d344097a596ec6f55f413742609200ea5..ac4eb265a605b0e7b0ea889be9a7e2db4e86a449 100644 (file)
@@ -12,7 +12,7 @@ composer =     "Johann Sebastian Bach (1685-1750)";
 enteredby =     "jcn";
 copyright =     "public domain";
 }
-\version "1.0.1";
+\version "1.0.2";
 
 one = \melodic\relative c{
        \property Voice . textstyle =  "italic"
index 9ba965c56093494057da7f3a0f441d17b4c2de82..a259ee6f19d184f8abc99ec9c38e4017aa5d1e6a 100644 (file)
@@ -12,7 +12,7 @@ composer =     "Johann Sebastian Bach (1685-1750)";
 enteredby =     "jcn";
 copyright =     "public domain";
 }
-\version "1.0.1";
+\version "1.0.2";
 
 
 one = \melodic\relative c{
index 0bdcd15b065424d1e6e1491f545308eceae63a43..708000efaf5a6775068642d75bb78d5f8cb49b54 100644 (file)
@@ -12,7 +12,7 @@ composer =     "Johann Sebastian Bach (1685-1750)";
 enteredby =     "jcn";
 copyright =     "public domain";
 }
-\version "1.0.1";
+\version "1.0.2";
 
 
 one = \melodic\relative c{
index 97e59feb9d0696a24871c590b90eb492ee5d5ac7..5b3564a9344f58b9bffb357054bb46c8ec0c3557 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "allemande-urtext.ly";
 
index 450639b7184edee0a3d0e3a30cd97f8e4cc2221e..3c072bb4b1a67c78db9158d70cfd4132df6de18f 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "allemande-urtext.ly";
 
index 1784fae420b29cb574923033d48bcd2865423547..a5125efd67a33083332085dbd49dd59c5cedb912 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "courante-urtext.ly";
 
index 2178cbf982e32afe96dc7f7270975e5ba161df5e..b0df15d92d249904008a9fde724ac5f34caa149a 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "courante-urtext.ly";
 
index 92836754750815b49fdf671af91828384e5238d6..4e848b5551c22c319aebbfb572268ec4e0c0b270 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "gigue-urtext.ly";
 
index d49bd990f82e3af2e0732ae95d67ebeb8208998c..043b1890007f254730906438c29805d65c6cd201 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "gigue-urtext.ly";
 
index f8b4a1796587a89a85a722dc7882a3a086b9b7ff..c3e8b8471dfb670947c2025058780f4295323d6c 100644 (file)
@@ -16,7 +16,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "menuetto-urtext.ly";
 
index 0cd664fb616fefcd55992ac2da224b9412d964ec..6250ba4690e81ad174a8541fc860135ab2c0f1f1 100644 (file)
@@ -17,7 +17,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "menuetto-urtext.ly";
 
index 994d74cad596e117e2b8ddd49cf8e1679bbf65d3..47a7da3e526408322982ad50db9eb3d164ef6fac 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "prelude-urtext.ly";
 
index b70782a1ae9fae81aefe6eee7dc150ef623b4d52..67e342d027058282c1fdbe701700c1420fffc747 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "prelude-urtext.ly";
 
index 32a1443ed858b2ee408801bfe4739f490e22932c..f4ba6eaa5fec33f1f1efe663116dc663acbdddc3 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "sarabande-urtext.ly";
 
index 051611fae9c70ed4bb0d23a54ee90e3afdb82b97..cfb4b8e5a88a5ade0624977822dae55a60ee9f16 100644 (file)
@@ -15,7 +15,7 @@ copyright =    "public domain";
  dotted slurs
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "sarabande-urtext.ly";
 
index 3ca2d85690c994d304be8e3551907c8236a73c1b..614311e8bc888205b46ac4b5a14f3db17674b896 100644 (file)
@@ -11,7 +11,7 @@ copyright =    "Public Domain";
 %{
        
 %}
-\version "1.0.1";
+\version "1.0.2";
 
 
 global = 
index 550835215bd57c984cbca42ae595ca18e79b5a5d..49b0dab5b722feba34133c11835cfc489e652e3a 100644 (file)
@@ -13,7 +13,7 @@
  Tested Features: stem direction, multivoice, forced accidentals.
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "nederlands.ly"                 % for correct parsing of note names
 
index 584dfd295b013126de0b4c57bfe2a4f4414a0915..de0bfa0fae542cabfd5180843d6c8e681275358b 100644 (file)
@@ -8,7 +8,7 @@ enteredby =      "Shay Rojansky";
 copyright =     "Public Domain";
 }
 
-\version "1.0.1";
+\version "1.0.2";
 
 global = 
     \melodic {
index e45f5fd9e785de2d0ebcbda97cf6711ce104c550..1aa9c48de24c4bd9fdd76a68f5fc70ece9f4b9a7 100644 (file)
@@ -13,7 +13,7 @@ Tested Features: cadenza mode
 Ugh.. Wish we had grace notes....  It adds another dimension to this
 piece of music.  %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 
 cad = \melodic  \relative c' {
index 82fd269cb2a4e6e478299dbbf706c3a88b3bb3e0..b8069a47d4d5f9c352f377298476edd568a395a3 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 }
 
 
-\version "1.0.1";
+\version "1.0.2";
 
 allegro =
        \melodic
index 63f1899b8177ac8c3c892e3f47b21b0ed60048d8..b3db2ae149884f79b4cc30b57e9c72e05508b85e 100644 (file)
@@ -2,12 +2,12 @@
 title =         "La Gallina à 2 violini";
 date =  "1637";
 source =        "the manuscript of Canzoni overo Sonate Concertate "
-        "libro terzo, opera duodecima ";
+       + "libro terzo, opera duodecima ";
 composer =      "Tarquinio Merula (1594/95-1665)";
 enteredby =     "Mats Bengtsson";
 copyright =     "Public Domain ";
 subtitle = "from Canzoni overo Sonate Concertate libro terzo, "
-       "opera duodecima 1637";
+       "opera duodecima 1637";
 }
 
 
@@ -45,7 +45,7 @@ Voice engraver by uncommenting the lines in the paper
 definition below. --MB
 %} 
 
-\version "1.0.1";
+\version "1.0.2";
 
 vi1=\melodic \relative c'' {
   \time 4/4;
@@ -232,25 +232,27 @@ bc=\melodic\transpose c'{
     \bc
   >
   \paper{
-    %linewidth=18.\cm;
-     %\output "gallina.out";
     gourlay_maxmeasures=7.;
-%%%% Uncomment to get the original layout without beams.
+
+%{
+%% Uncomment to get the original layout without beams.
 %%%% Compare to the definition in init/engraver.ly.
-%    Voice = \translator {
-%       \type "Engraver_group_engraver";
-%       \consists "Dynamic_engraver";
-%       \consists "Rest_engraver";
-%       \consists "Stem_engraver";
-%       \consists "Plet_engraver";
-% %     \consists "Beam_engraver";
-%       \consists "Beam_req_swallow_translator";
-%       \consists "Abbreviation_beam_engraver";
-%       \consists "Script_engraver";
-%       \consists "Rhythmic_column_engraver";
-%       \consists "Slur_engraver";
-%       \accepts "Thread";
-%    }
+    Voice = \translator {
+       \type "Engraver_group_engraver";
+       \consists "Dynamic_engraver";
+       \consists "Rest_engraver";
+       \consists "Stem_engraver";
+       \consists "Plet_engraver";
+ %     \consists "Beam_engraver";
+       \consists "Beam_req_swallow_translator";
+       \consists "Abbreviation_beam_engraver";
+       \consists "Script_engraver";
+       \consists "Rhythmic_column_engraver";
+       \consists "Slur_engraver";
+       \accepts "Thread";
+    }
+%}
+    
   }
   \midi{ 
         \tempo 4=80;
index bc9c0882f5fcfee3eddf5c0d8d258ebb0c8c8b18..2381e61ca28a86088a1a2280e201f0ec7aec57c2 100644 (file)
@@ -8,7 +8,7 @@ enteredby =      "jcn";
 copyright =     "public domain";
 latexheaders=    "headers";
 } 
-\version "1.0.1";
+\version "1.0.2";
 
 %{
 Silly latex file dropped; use ly2dvi
index 88671e093ba0a81d90d953048e166acd10c001f9..36799f37f342ddf0a095d91ec6f4ccbea5c6bfa4 100644 (file)
@@ -2,13 +2,13 @@
 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)";
+composer =      "Franz Schubert (1797-1828)";
+poet= "Text by Ludwig Rellstab (1799-1860)";
 enteredby =     "JCN";
 description = "A schubert song in 16 pt";
 copyright =     "public domain";
 } 
 
-\version "1.0.1";
+\version "1.0.2";
 
 \include "standchen.ly"
index 364b13c08a9dff89c157b6d4bba255b0b5ce68bf..fa1f7219b048e81dcf15fe07f52bc843b3b8e8d8 100644 (file)
@@ -9,7 +9,7 @@ copyright =      "public domain";
 description = "A schubert song in 20 pt";
 } 
 
-\version "1.0.1";
+\version "1.0.2";
 
 % fool make-website
 % \include "standchen.ly";
index 1a6f8f5b8c6b972dd05557a272a3a1c65b6fd40f..3ceec46169dc24ea980c2f16a811163c40c12793 100644 (file)
@@ -16,7 +16,7 @@ multiple \paper{}s in one \score
 Note: Original key F.
 %}
 
-\version "1.0.1";
+\version "1.0.2";
 
 $vocal_verse1 = \melodic\relative c{
        % ugh: treble/bass
index 0ce219103233e2905534b642bbcc2ccff6ffb9f0..f0792639b284ed79f9c58399f15af8155aee79f6 100644 (file)
@@ -168,6 +168,18 @@ if 1:                                      # need new a namespace
                ((1,0,1), conv, '\\accidentals -> \\keysignature, ' +
                 'specialaccidentals -> keyoctaviation\n'))
 
+if 1:
+       def conv(lines):
+               found = 0
+               for x in lines:
+                       if regex.search ('\\\\header', x) <> -1:
+                               found = 1
+                               break
+               if found:
+                       sys.stderr.write ('\nNot smart enough to convert to new \\header format\n')
+               return lines
+       
+       conversions.append ((1,0,2), conv, '\header { key = concat + with + operator }\n')
 
 ############################
 
index 6540542663db1564883ed07d3646ab73e67538b8..911539b71641e86c865f40d03df7e8afa21f18e2 100644 (file)
@@ -263,8 +263,12 @@ for opt in options:
                do_deps = 1
 
 def write_deps (fn, out,  deps):
-       f = open (outdir + fn, 'w')
-       f.write ('%s: %s\n'% (outdir + out + '.dvi', reduce (lambda x,y: x + ' '+ y, deps)))
+       out_fn = outdir + '/' + fn
+       print '\`writing \`%s\'\n\'' % out_fn
+       
+       f = open (out_fn, 'w')
+       f.write ('%s: %s\n'% (outdir + '/' + out + '.dvi',
+                             reduce (lambda x,y: x + ' '+ y, deps)))
        f.close ()
 
 
index b8d45e1ae852a94ccad4a752f448e614b3957621..8d4b9bf7be0f4d6d8ab07049f2e72ef122d0f6e9 100644 (file)
@@ -4,23 +4,19 @@ AUTHORS - who did what on StepMake?
 
 nsect(DESCRIPTION)
 
-This file lists authors of StepMake, and what they wrote.
+This file lists authors of StepMake, and what they did.
 
 nsect(AUTHORS)
 itemize(
-it()nemail(Jan Nieuwenhuizen)(janneke@gnu.org),
-    lurl(http://www.xs4all.nl/~jantien)
-    nl()
-    Main author.
 it()nemail(Han-Wen Nienhuys)(hanwen@cs.uu.nl), 
     lurl(http://www.cs.uu.nl/people/hanwen)
     nl()
     Main author.
-)
-
-nsect(CONTRIBUTORS)
 
-itemize(
+it()nemail(Jan Nieuwenhuizen)(janneke@gnu.org),
+    lurl(http://www.xs4all.nl/~jantien)
+    nl()
+    Main author.
 it()nemail(Jeffrey B. Reed)(daboys@bga.com),
     Windows-nt fixes.
 )
index d00e359195085509972b0d8bff00eb66350d3774..1f1f6d9b74ebd907988582da796188d3e5fab413 100644 (file)
@@ -52,7 +52,7 @@
   \font\bracefonteleven = feta-braces16
   \font\fingerfonteleven = feta-nummer3
   \font\markfonttwentysix = feta-nummer7
-\def\currentsize{eleven}
+  \def\currentsize{eleven}
 }
 
 \def\sixteenfonts{\fetsixteendefs\cmrsixteen}
@@ -61,7 +61,6 @@
 \def\elevenfonts{\fetelevendefs\cmreleven}
 \def\thirteenfonts{\fetthirteendefs\cmrthirteen}
 
-
 \def\bracefont{\csname bracefont\currentsize\endcsname}
 \def\fetanummer{\csname fetanummer\currentsize\endcsname}
 \def\dynfont{\csname dynfont\currentsize\endcsname}
diff --git a/tex/lily-debug.tex b/tex/lily-debug.tex
new file mode 100644 (file)
index 0000000..295e44f
--- /dev/null
@@ -0,0 +1,26 @@
+
+% debugging stuff
+\def\vruler#1{{%
+        \def\wid{\dimen0}%
+        \def\inc{\dimen1}%
+        \wid=#1pt
+        \inc=\wid
+        \divide\inc by #1
+        \divide\wid by 2
+        \here=-\wid
+        \loop\ifdim\here<\wid\advance\here by\inc
+                \hbox to0pt{\vbox to0pt{\vss\hrule width2pt height 0.05pt\kern\here}\hss}%
+        \repeat%
+}}
+\def\hruler#1#2{\hbox{%
+        \def\wid{\dimen0}%
+        \def\here{\dimen3}%
+        \wid=#1pt
+        \divide\wid by 2
+        \here=-\wid
+        \loop\ifdim\here<\wid\advance\here by #2
+                \hbox to0pt{\kern\here\vrule width0.05pt height 1pt depth 1pt\hss}%
+        \repeat%
+}}
+
+