small staff massacre

[Werner LEMBERG]

I've seldom seen so many bugs in a single example :-)


    Werner

======================================================================

%
% This file shows problems with staves having different sizes in lilypond
% CVS 2004-01-21 07:19 MET.
%
% . There should be a mechanism to give the staff size in a \with {...}
%   block with a single command, covering all parameters.  Perhaps a
%   new `set-staff-size' scheme function?
%
% . Current documentation says that changing the `fontSize' and
%   `StaffSymbol' properties is sufficient.  Unfortunately, it is not:
%
%   1. Note positions in chords are not computed correctly.  There seems
%      to be a problem to decide which is `up' and which is `down'.
%
%   2. ledger lines are not reduced in size.
%
%   3. The parameters to `extra-offset' aren't scaled properly.
%
%   4. Rests under beams have incorrect offsets; this may be a consequence
%      of bug 3.  [The vertical position of the rest in the normally sized
%      staff is incorrect also -- it is too high and should be put as near
%      to the original position as possible.]
%
%   5. Stems under beams are too short.  Another consequence of 3.?
%
%   6. Positioning of slurs is different.
%
%   7. Dynamics are too big.
%
%   8. The crescendo gap is too big.
%
%   9. Tuplet brackets are too big.
%
%  10. I'm not sure whether the thickness of staff lines really should be
%      the same in both the bigger and the smaller staff.  Thicker than
%      normal is correct, but that thick?  The problem is that the
%      thickness of beams must be smaller; this reduces the contrast
%      between beams and staff lines.
%
%  11. A similar problem for stems.  The stem thickness is too big IMHO
%      compared to note heads.

\version "2.1.13"

\score {
  <<
    \new Staff \with {
%     #(set-staff-size 5)
      fontSize = #-4
      StaffSymbol \set #'staff-space = #(magstep -4)
    }
    \notes \relative c' {
\property Voice.DynamicText \set #'extra-offset = #'(0 . 3)
      s1-\f c''8[(\< r a g]) e[ r d( <f a>])\! \times 2/3 { d4 d d }
    }
    \new Staff
    \notes \relative c' {
\property Voice.DynamicText \set #'extra-offset = #'(0 . 3)
      s1-\f c''8[(\< r a g]) e[ r d( <f a>])\! \times 2/3 { d4 d d }
    }
  >>

  \paper {
    #(paper-set-staff-size 6)
    linewidth = -1
  }
}

% EOF