]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-concave.ly
* scripts/convert-ly.py (conv): remove \notes.
[lilypond.git] / input / regression / beam-concave.ly
index ca6d42c0c6ccab7f5338c5ba17cb43927d911c78..b7c607b40bcb1ad602d95d6385deb92a038dbd87 100644 (file)
@@ -1,10 +1,15 @@
+
+\version "2.3.4"
 \header{
 
-texidoc = "Concave beams should be horizontal. informally spoken,
+texidoc = "Concave beams should be horizontal. Informally spoken,
   concave refers to the shape of the notes that are opposite a
   beam. If an up-beam has high notes on its center stems, then we call
   it concave.  This example shows borderline cases. Only the beams
-  that are marked `horiz' should be printed horizontally.  " }
+  that are marked `horiz' should be printed horizontally.  "
+
+
+}
 
 
 %{
@@ -18,7 +23,7 @@ beams this way."
 
 
 \score{
-  \notes\relative c'{
+  \relative c'{
 
 %% This case seems easy: second beam should be horizontal.
     
@@ -45,35 +50,54 @@ beams this way."
     %% sloped
     %% concaveness: 0.00
     \stemUp
-    [d,16 a' b cis]
+     d,16[ a' b cis]
 
     %% Sarabande: m25
     %% horizontal
     %% concaveness:a: 0.12
-    [a'16^"horiz." b c b]
+     a'16[^"horiz." b c b]
     
 % Hmm.  Concaveness of both: 1.75
 %     %% SCS-VI Prelude, m81
 %     %% slope = 0.0
 %     \stemBoth
 %     \key d\major
-%     [e,8 cis a']
+%      e,8[ cis a']
     
 %     %% SCS-VI Prelude, m82
 %     %% slope = 0.1ss (possibly b.o. context?)
-%     [g, e' cis]
+%      g,[ e' cis]
 
     
 %%% Han-Wen: this should be concave
-    [a,16^"horiz." a' a a]
-
+       \break
+     a,16[^"horiz." a' a a]
     \clef treble
 
 %%%% This should not be concave (hwn)
-    [\stemUp bes8  \stemDown d'8 bes8]  
-  }
+    \stemUp bes8[  \stemDown d'8 bes8]  
+
+
+       \stemBoth
+%% morgenlied:
+       f16[^"horiz" b dis b f b]
+
+
+%% sarabande m 25
+%{
+       this beam is horiz. in baerenreiter, but it is not really concave IMO.
+
+
+       \clef bass
+       \key f \major
+       \stemUp
+       a,16[ b c b ]
+       \stemBoth
+%}
+
+}
   \paper{
-    linewidth = -1.0
+    raggedright = ##t
   }
 }