]> git.donarmstrong.com Git - lilypond.git/commitdiff
move from abe.ly
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 13 Jun 2003 21:38:39 +0000 (21:38 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 13 Jun 2003 21:38:39 +0000 (21:38 +0000)
30 files changed:
ChangeLog
input/regression/abe.ly [deleted file]
input/regression/accidental-octave.ly
input/regression/auto-beam.ly [new file with mode: 0644]
input/regression/beam-center-slope.ly
input/regression/beam-chord.ly
input/regression/beam-pos.ly [deleted file]
input/regression/beam-quanting-horizontal.ly [new file with mode: 0644]
input/regression/beam-second.ly
input/regression/custos.ly
input/regression/dynamics-broken-hairpin.ly
input/regression/easy-notation.ly
input/regression/figured-bass.ly
input/regression/grace-auto-beam.ly
input/regression/grace-bar-number.ly
input/regression/note-line.ly
input/regression/repeat-percent-skipbars.ly
input/test/ancient-font.ly
input/test/coriolan-margin.ly
input/test/equaliser.ly
input/test/fill-a4.ly
input/test/gregorian-scripts.ly
input/test/key-clefs.ly
input/test/part-combine-score.ly
input/test/partial-blank.ly
input/test/rest-dot-positions.ly
input/test/scales-greek.ly
input/test/trills.ly
input/test/vaticana.ly
lily/beam-quanting.cc

index 1c81dff0df8f3e6fb36b255b8c32537ffbb3084e..8551d50016701b05f47640f5c17f3e19a905bfa4 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,10 +1,23 @@
+2003-06-13  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+       * input/regression/(various).ly: add raggedright = #t.
+
+       * input/regression/auto-beam.ly: move from abe.ly
+
 2003-06-13  Graham Percival  <gperlist@shaw.ca>
 
        * input/test/f*.ly: added texinfo index.
+       
        * input/test/broken-thread-line.ly: renamed to follow-break.ly.
 
 2003-06-13  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+       * lily/beam-quanting.cc (score_forbidden_quants): also add inter
+       quant penalty for beam just outside staff.
+
+       * input/regression/beam-quanting-horizontal.ly (texidoc): move
+       from beam-pos.ly,  remove non-horizontal tests. 
+
        * input/test/(various): cleanup header info. 
 
        * input/test/tchaikovsky.ly: remove file.
diff --git a/input/regression/abe.ly b/input/regression/abe.ly
deleted file mode 100644 (file)
index 6c4ac0d..0000000
+++ /dev/null
@@ -1,22 +0,0 @@
-\header {
-texidoc="Automatic beamer behaves nicely."
-}
-\version "1.7.18"
-
-\include "paper16.ly"
-\paper  { linewidth = 390.000000 \pt } 
-
-\score {
-  \notes \relative c'' {
-    a\longa a\breve  
-    a1 a2 a4 a8 a16 a32 a64 a64 
-  }
-  \paper {
-    \translator {
-      \StaffContext
-       \remove "Clef_engraver"
-%%     \remove "Staff_symbol_engraver"
-    }
-  }
-}
-%% new-chords-done %%
\ No newline at end of file
index 90cff0bb17285b275a84764ef6aa9e6e729459a5..93d8449cc3f28f3aca43877074144142f09a09e0 100644 (file)
@@ -40,7 +40,6 @@ FIXME: Shorten and docu
     music))
 
 
-\include "paper16.ly"
 
 mel = \notes \transpose c c' {
   \time 4/4 \key d \major
diff --git a/input/regression/auto-beam.ly b/input/regression/auto-beam.ly
new file mode 100644 (file)
index 0000000..38ba933
--- /dev/null
@@ -0,0 +1,26 @@
+\header {
+
+texidoc="Test automatic beamer: the last measure should have a single beam."
+
+}
+
+\version "1.7.18"
+
+
+
+\paper  { raggedright = ##t } 
+
+\score {
+  \notes \relative c'' {
+    a\longa a\breve  
+    a1 a2 a4 a8 a16 a32 a64 a64 
+  }
+  \paper {
+    \translator {
+      \StaffContext
+       \remove "Clef_engraver"
+%%     \remove "Staff_symbol_engraver"
+    }
+  }
+}
+%% new-chords-done %%
index f350e5abc8bee2cb43c9372a3000a8c04f00bef5..fb419b80c94ad8dd5dc56cca3716fbec61c85ab4 100644 (file)
@@ -2,9 +2,9 @@
 \version "1.7.18"
 \header{
 
-    texidoc="Simple beams on middle staffline be allowed to be
-    slightly sloped.  Beams reaching beyond middle line can have
-    bigger slope."
+    texidoc="Simple beams on middle staffline are allowed to be
+    slightly sloped, even if the notes have ledgers.  Beams reaching
+    beyond middle line can have bigger slope."
 
 }
 
index 1de05e94d173cd90a657bbfc197e4505df54f787..f37883393e4e3084b2c3d47f34489f51973d44ad 100644 (file)
@@ -1,9 +1,9 @@
 \version "1.7.18"
 \header {
-texidoc = "MOVE TO REGTEST.
-If the first and last outer notes of a beam are the same, the beam should be
-be horizontal.
-"
+    
+texidoc = "If the first and last outer notes of a beam are the same,
+the beam should be be horizontal.  "
+
 }
 \score{
        \notes  \transpose c' c'{
diff --git a/input/regression/beam-pos.ly b/input/regression/beam-pos.ly
deleted file mode 100644 (file)
index af2e645..0000000
+++ /dev/null
@@ -1,31 +0,0 @@
-\version "1.7.18"
-%  does this belong in regression?  delete it?  it doens't look
-%  like a special trick or a great learning tool, but it might
-%  be useful in testing length os beam stems, or something like
-%  that.
-
-\header{
-texidoc =       "test beam quant positions"
-}
-
-\score{
-       \notes\relative c' { 
-                c8-[ c]  a''-[ a]
-                a,-[ a]  c-[ c]
-                d,8-[ d]  g'-[ g]
-                g,-[ g]  d'-[ d]
-                c,16-[ c c c]  a''-[ a a a]
-                a,-[ a a a]  c-[ c c c]
-               \break
-                c,32-[ c c c c c c c]  a''-[ a a a a a a a]
-                f,-[ f f f f f f f]  e'-[ e e e e e e e]
-               \break
-                c,8-[ d]  a''-[ g]
-                g,-[ f]  d'-[ e]
-               \break
-       }
-       \paper{
-       }
-}
-
-%% new-chords-done %%
diff --git a/input/regression/beam-quanting-horizontal.ly b/input/regression/beam-quanting-horizontal.ly
new file mode 100644 (file)
index 0000000..4959a50
--- /dev/null
@@ -0,0 +1,22 @@
+\version "1.7.18"
+
+\header{
+texidoc =       "Test beam quant positions for horizontal beams."
+}
+
+\score{
+       \notes\relative c' { 
+                c8-[ c]  a''-[ a]
+                a,-[ a]  c-[ c]
+                d,8-[ d]  g'-[ g]
+                g,-[ g]  d'-[ d]
+                c,16-[ c c c]  a''-[ a a a]
+                a,-[ a a a]  c-[ c c c]
+               \break
+                c,32-[ c c c c c c c]  a''-[ a a a a a a a]
+                f,-[ f f f f f f f]  e'-[ e e e e e e e]
+               \break
+       }
+}
+
+%% new-chords-done %%
index 819437037aa69bd91974f3c83d4777a618e56461..99b9145b37a87e973ed7cf0a7d6c494c4b730be7 100644 (file)
@@ -4,7 +4,11 @@
 %  showing \stemUp?
 % all of those things are covered in refman and/or other files
 \header{
-  texidoc="DELETE ME
+  texidoc="
+Seconds are tricky.  We used to have problems with seconds being too
+steep, or getting too long stems.  In a file like this, showing
+seconds, you'll spot something fishy very quickly.
 " }
 \score{
     \notes\relative c''{
index 2e5bbe5eb3f137c8eecdc57b986cdcf238e14c53..f83f23dd8d4a5671ad5cd1e96fff63d29798e2f0 100644 (file)
@@ -30,7 +30,7 @@
            \StaffContext
            \consists Custos_engraver
        }
-       
+       raggedright = ##t
     }
 }
 %% new-chords-done %%
index 0dccafe716d1b8fede1e37c6fe750a3ab3df612b..db6cf5c5a151d6b258e5f9b68e60d5b7b68129de 100644 (file)
@@ -1,13 +1,13 @@
 \version "1.7.18"
 \header{
-texidoc = "Broken crescendi should look be open on one side."
+texidoc = "Broken crescendi should be open on one side."
 }
 
 \score { \notes \relative c'' { 
     c1 \< \break \! c1  \> \break \! c1 
   }
   \paper {
-    linewidth = 10.\cm
+    linewidth = 4.\cm
   }
 }
   
index 95e93272958d6ce32173f433e71e71a26835a312..d4275f8dca13c6828260591ec282bb1ec2c26dd9 100644 (file)
@@ -5,9 +5,6 @@ texidoc  = " Ez-notation prints names in note heads.
 You also get ledger lines, of course."
 }
 
-\include "paper26.ly"
-\paper { \paperTwentysix }
-
 \score {
         \notes { c'2 e'4 f' | g'1 b8 }
         \paper { \translator { \EasyNotation }
index a319a83b1a58b6b30a586fc4798a66c22b2234f3..529695353ab65818de36169a75ef59f8e7a9c104 100644 (file)
@@ -1,7 +1,6 @@
 \version "1.7.18"
 \header {
-texidoc = "Test figured bass.
-
+texidoc = "
 Figured bass is created by the FiguredBass context which eats
 figured bass requests and  rest-requests.  You must enter these using
 the special @code{\figures @{ @}} mode, which allows you to type
@@ -29,5 +28,7 @@ numbers, like @code{<4 6+>}.
   }
  
 >
+       \paper  { raggedright = ##t }  
  }
+
 %% new-chords-done %%
index 3e5ca5c1f07170ecebcdc591f725970011fc76c7..f7d5d16da6602b9237832f4f28fae13e06689213 100644 (file)
@@ -10,5 +10,6 @@
     \grace a8 g16 f e f \grace a8 g16 f e f \grace a8 g16 f e f 
         \grace a8 g16 f e f |
   }
+  \paper { raggedright = ##t }
 }
 %% new-chords-done %%
index 6e4e547515a236aad6a97de19a52406b627ea198..9f8b64d26ce37cbdffdb14727d9c707da198ad29 100644 (file)
@@ -11,5 +11,8 @@ printed correctly.
 
 \score { \notes\relative c''' { c1 \break
 \grace c8
-c1  }}
+c1  }
+
+\paper { raggedright = ##t }
+}
 %% new-chords-done %%
index c452027d9d26df1f77ecc68dd743bd7dfe6e5eb0..2b91de2be7b06ea156f01432e8683d7d822c7210 100644 (file)
@@ -5,9 +5,6 @@ texidoc = "Note head lines (eg glissando)
 run between centers of the note heads."
 }
 
-\include "paper20.ly"
-\include "norsk.ly"
-
 su = \notes{ \translator Staff = up}
 sd = \notes{ \translator Staff = down}
 
@@ -18,7 +15,7 @@ sd = \notes{ \translator Staff = down}
             \property PianoStaff.connectArpeggios = ##t
            \showStaffSwitch
            \clef F
-           c4 d \sd h a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
+           c4 d \sd b a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
        }
        \context Staff = down {
            \clef F s1*4
index 0ecf39697c85eae431ce3b9d14fe185653db570c..f87bddda52c6cbdfa71e72c2a1422a043472536a 100644 (file)
@@ -3,8 +3,6 @@ texidoc = "Percent repeats are not skipped, even when skipBars is set.  "
 }
 
 
-\include "paper20.ly"
-
 \score {
      \context Staff <
        \property Score.skipBars = ##t
index b652256df85794e2c33adfc4a0fb974013abba3d..e23156e7d8313afc62ddf4ffa98a8ea5f82b5795 100644 (file)
@@ -8,7 +8,6 @@ included in Lilypond's support of ancient notation.
 "
 }
 
-\include "paper26.ly"
 
 upperStaff =  \context GregorianStaff = upperStaff <
   \context GregorianVoice <
index 61cfa3730b7913ae74bee7f6cd130cfc0d2fc913..d2a376e4cf3a3b4d34b6d346aba9d66d03d58197 100644 (file)
@@ -97,7 +97,6 @@ violoncello = \notes \relative c' {
   c1 c
 }
 
-\include "paper16.ly"
 
 \score {
   < 
index 7757f495bddec6c90301544d9e9241a4b22b8a7d..bc7023e6167c42a843274503b11ad0d1ac6b2a7e 100644 (file)
@@ -96,7 +96,6 @@ violoncello = \notes \relative c' {
   R1*10 c1
 }
 
-\include "paper16.ly"
 
 \score {
   < 
index fd1aa89ca91d2aa64255178153f40df3a7466fd2..919a8645b3f90decbd6b6edc3268c679bbd73d11 100644 (file)
@@ -13,7 +13,6 @@
 %
 \header{ texidoc="@cindex Paper a4 Fill
 This should fill a4 paper. "
-%tagline="Ligly"
 }
 \include "paper13.ly"
 \score{
index 70326fad44600bb07a43b0129c2cb84e6917f977..c1424b7f655dd416d753109cfa162659e794c124 100644 (file)
@@ -20,7 +20,6 @@ FIXME: padding/minimum-distance is fragile.
 
 "}
 
-\include "paper26.ly"
 \include "gregorian-init.ly"
 
 cantus = \notes \relative c' {
index 13e668870d6f316a05ffc4e0b80d0f88e2fba26d..998b37fb62bd6a4e958909b19811b8f4b52d9ed7 100644 (file)
@@ -1,7 +1,5 @@
 \version "1.7.18"
 
-\include "paper16.ly"
-
 \score { \notes
   \relative cis' {
 
index 7d7f33c8c2b4a09cea75ab8e89a9548d85bf9e29..d69aae3060e089181722232cd6097ef70a4bcf69 100644 (file)
@@ -4,8 +4,6 @@
 texidoc="Template for part-combining orchestral scores"
 }
   
-\include "paper16.ly" 
-
                                
 raisedFlat = \markup { \raise #0.4 \smaller \smaller \musicglyph #"accidentals--1"  }
 
index c9fbe38dc2e71ca288bce0373d96c30aba20dcdc..4b1c7a145a0cdc581df33d7b2eba252b50d3ee80 100644 (file)
@@ -5,8 +5,6 @@
     This thing implements it by adding invisible staff with lots of fast notes.
 %}
 
-\include "paper16.ly"
-
 
 quickmeasure = \notes {[\repeat unfold 16 c''16]}
 mel = \notes \relative c' {c16 d16 e8 a4 g2 e8 d c2. g'1 e4 d c2}
index 51576f3137e803c7627a947d2e48a4a29c806beb..2ce48b361aef070ad0215798403e5ccfeaae856c 100644 (file)
@@ -1,7 +1,4 @@
 \version "1.7.18"
-\include "paper16.ly"
-\paper  {
-}
 
 muz = \notes \relative c'' {
     \time 6/1
index d27cb44f61b7cb905df3cfb72e41f66ae97616fc..9525ab11ef74cda6f95407967bda0bcf29bf3eaa 100644 (file)
@@ -1,37 +1,51 @@
 \version "1.7.18"
 
 \header {
-       crossRefNumber = "1"
-       tagline = "Automatically converted from ABC"
-texidoc = "Show different scales."
-       
+  texidoc = "Show different scales."
 }
 
 voicedefault = \notes {
 \property Score.defaultBarType="empty"
 
-\key c \major     c'8 -"major"   d'8    e'8    f'8    g'8    a'8    b'8    
-c''8    \key c \ionian     c'8 -"ionian"   d'8    e'8    f'8    g'8    a'8    
-b'8    c''8    \key d \dorian     c'8 -"dorian"   d'8    e'8    f'8    g'8    
-a'8    b'8    c''8    \key e \phrygian     c'8 -"phrygian"   d'8    e'8    f'8 
-   g'8    a'8    b'8    c''8    \key f \lydian     c'8 -"lydian"   d'8    e'8  
-  f'8    g'8    a'8    b'8    c''8    \key g \mixolydian     c'8 -"mixolydian" 
-  d'8    e'8    f'8    g'8    a'8    b'8    c''8    \key a \minor     c'8 
--"minor"   d'8    e'8    f'8    g'8    a'8    b'8    c''8    \key a \aeolian   
-  c'8 -"aeolian"   d'8    e'8    f'8    g'8    a'8    b'8    c''8    
-\key b \locrian     c'8 -"locrian"   d'8    e'8    f'8    g'8    a'8    b'8    
-c''8    \key f \major     c'8 -"major"   d'8    e'8    f'8    g'8    a'8    
-bes'8    c''8    \key f \ionian     c'8 -"ionian"   d'8    e'8    f'8    g'8   
- a'8    bes'8    c''8    \key g \dorian     c'8 -"dorian"   d'8    e'8    f'8  
-  g'8    a'8    bes'8    c''8    \key a \phrygian     c'8 -"phrygian"   d'8    
-e'8    f'8    g'8    a'8    bes'8    c''8    \key bes \lydian     c'8 
--"lydian"   d'8    e'8    f'8    g'8    a'8    bes'8    c''8    
-\key c \mixolydian     c'8 -"mixolydian"   d'8    e'8    f'8    g'8    a'8    
-bes'8    c''8    \key d \aeolian     c'8 -"aeolian"   d'8    e'8    f'8    g'8 
-   a'8    bes'8    c''8    \key d \minor     c'8 -"minor"   d'8    e'8    f'8  
-  g'8    a'8    bes'8    c''8    \key e \locrian     c'8 -"locrian"   d'8    
-e'8    f'8    g'8    a'8    bes'8    c''8    
-}\score{
+\key c \major c'8 -"major" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key c \ionian c'8 -"ionian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key d \dorian c'8 -"dorian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key e \phrygian c'8 -"phrygian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key f \lydian c'8 -"lydian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key g \mixolydian c'8 -"mixolydian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key a \minor c'8 -"minor" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key a \aeolian c'8 -"aeolian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key b \locrian c'8 -"locrian" d'8 e'8 f'8 g'8 a'8 b'8 c''8
+
+\key f \major c'8 -"major" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key f \ionian c'8 -"ionian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key g \dorian c'8 -"dorian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key a \phrygian c'8 -"phrygian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key bes \lydian c'8 -"lydian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key c \mixolydian c'8 -"mixolydian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key d \aeolian c'8 -"aeolian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key d \minor c'8 -"minor" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+\key e \locrian c'8 -"locrian" d'8 e'8 f'8 g'8 a'8 bes'8 c''8
+
+}
+
+\score{
         \notes <
 
        \context Staff="default"
index 3d25a14ea1b6ab75c8646d9aafc5df158d5bd641..e12b5eaffcb70e86cdbf24023cec3bb1ff612fd1 100644 (file)
@@ -1,7 +1,7 @@
 
 % Generated automatically by: lilypond-book.py
 % options are filename=/var/fred/cvs/savannah/lilypond/input/test/trills.ly printfilename  
-\include "paper16.ly"
+
 \paper  {
   linewidth = 433.619940\pt
   
index 9130f38a62d1cb6ec10047c3aec3537132469174..41bc93a5457dfab87a8bdf24227205dccc25ae73 100644 (file)
@@ -3,7 +3,6 @@
     texidoc    = "vaticana ligature test"
 }
 
-\include "paper26.ly"
 \include "gregorian-init.ly"
 
 %
index 29a42034b37aa686686505e7f2f624e2641394c2..45fb5e5c9343d29f61ef5f693983d58fefe81ceb 100644 (file)
@@ -349,15 +349,16 @@ Beam::score_forbidden_quants (Real yl, Real yr,
   Real dy = yr - yl;
 
   Real dem = 0.0;
-  if (fabs (yl) < rad && fabs ( my_modf (yl) - 0.5) < 1e-3)
-    dem += INTER_QUANT_PENALTY;
-  if (fabs (yr) < rad && fabs ( my_modf (yr) - 0.5) < 1e-3)
-    dem += INTER_QUANT_PENALTY;
+  for (int i = 0; i < 2; i++)
+    {
+      Real y = i? yl : yr;
+      if (fabs (y) <= (rad + 0.5) && fabs ( my_modf (y) - 0.5) < 1e-3)
+       dem += INTER_QUANT_PENALTY;
+    }
 
   // todo: use beam_count of outer stems.
   if (beam_count >= 2)
     {
-     
       Real straddle = 0.0;
       Real sit = (thickness - slt) / 2;
       Real inter = 0.5;
@@ -417,7 +418,7 @@ Beam::score_forbidden_quants (Real yl, Real yr,
              if (ldir == DOWN && dy >= eps
                  && fabs (my_modf (yl) - straddle) < eps)
                dem += SECONDARY_BEAM_DEMERIT;
-       }
+           }
          
          if (fabs (yr - 2 * rdir * beam_translation) < rad + inter)
            {