input/regression/beam-concave.ly

   1 \header{
   2   texidoc = "Concave beams should be horizontal.  However, what exactly
   3 it is that makes a beam concave is still unclear.
   4
   5 Beams 1 and 3 should be sloped, 2 and 4 should be horizontal.  Two
   6 sane attempts of calculating concaveness of a beam fail to distinguish
   7 beams this way."
   8
   9 }
  10
  11 \score{
  12   \notes\relative c'{
  13     \property Voice.Beam \set #'debug-concave = ##t
  14
  15 %%%  \property Voice.Beam \set #'concaveness = #0.8
  16 %%%  \property Voice.Beam \set #'concaveness-no-slope = ##f
  17 %%%  \property Voice.Beam \set #'concaveness-square = ##f
  18
  19
  20
  21     \property Voice.Beam \set #'concaveness-no-slope = ##t
  22     %%\property Voice.Beam \set #'concaveness = #0.25
  23
  24     %% this gives what baerenreiter does, but it's too kludgy
  25     %% to make much sense
  26     \property Voice.Beam \set #'concaveness-square = ##t
  27     \property Voice.Beam \set #'concaveness = #0.08
  28
  29 %% This case seems easy: second beam should be horizontal.
  30
  31     %% SCS-I Menuet I, m15
  32     %% sloped
  33     %% slope = -0.5ss
  34     %% concaveness: 0.50
  35     %% concaveness-no-slope: 0.25
  36     %% concaveness-no-slope^2: 0.06
  37     \clef bass
  38     \time 3/4
  39     \key g\major
  40     a8 g fis e b dis
  41
  42     %% SCS-I Menuet II, m20
  43     %% horizontal
  44     %% slope = 0
  45     %% concaveness: 1.12
  46     %% concaveness-no-slope: 0.38
  47     %% concaveness-no-slope^2: 0.09
  48     \key f\major
  49     fis,^"horiz." a c es d c
  50
  51 %%% Sarabande: the first beam, obviously more concave, is not horizontal,
  52 %%% but is matched with the next beam in the piece: context.
  53
  54     %% Sarabande: m24
  55     %% sloped
  56     %% concaveness: 0.75
  57     %% concaveness-no-slope: 0.00
  58     %% concaveness-no-slope^2: 0.00
  59     \stemUp
  60     [d,16 a' b cis]
  61
  62     %% Sarabande: m25
  63     %% horizontal
  64     %% concaveness: 0.50
  65     %% concaveness-no-slope: 0.25
  66     %% concaveness-no-slope^2: 0.12
  67     [a'16^"horiz." b c b]
  68
  69 % Hmm.  Concaveness of both: 1.75
  70 %     %% SCS-VI Prelude, m81
  71 %     %% slope = 0.0
  72 %     \stemBoth
  73 %     \key d\major
  74 %     [e,8 cis a']
  75
  76 %     %% SCS-VI Prelude, m82
  77 %     %% slope = 0.1ss (possibly b.o. context?)
  78 %     [g, e' cis]
  79
  80   }
  81   \paper{
  82     linewidth = -1.0
  83   }
  84 }
  85
  86 %% Local variables:
  87 %% LilyPond-indent-level:2
  88 %% End: