input/bugs/stem-through-beam.ly

   1
   2 % strange bug with stems through beams in second beam
   3
   4 End = { \skip 1*8; }
   5
   6 violaii = \notes\relative c' {
   7         [\!f8\sf(\>as f as][f g d)\!g]|
   8 }
   9
  10 violai=\notes\relative c' {
  11         [\!f8\sf(\>as f as][f g d)\!g]|
  12 }
  13
  14 violeStaff =  \notes \context Staff = viole <
  15  \context Voice=oneViola <
  16                 \property Staff.instrument = #"Viola"
  17                 \property Staff.instr = #"Vla."
  18
  19  \End
  20  >
  21  \context Voice=twoViola <
  22                 \property Staff.instrument = #"Viola II"
  23                 \property Staff.instr = #"Vla. II"
  24  \End
  25  >
  26   \context Voice=oneViola \partcombine Voice
  27     \context Thread=oneViola \violai
  28     \context Thread=twoViola \violaii
  29 >
  30
  31 \score {
  32   \violeStaff
  33   \paper {
  34     % \paperSixteen
  35     linewidth = 80 * \staffspace;
  36     textheight = 200 * \staffspace;
  37     \translator{
  38       \ThreadContext
  39       \consists "Rest_engraver";
  40       % Set value for engraver at thread level,
  41       % to override the default that is set in ScoreContext
  42       % for added engraver at Voice level
  43       devNullThread = #'()
  44     }
  45     \translator{
  46       \VoiceContext
  47       \remove "Rest_engraver";
  48
  49       % The staff combine (bassi part) needs a
  50       % thread_devnull_engraver here.
  51       % Instead of maintaining two separate hierarchies,
  52       % we switch add it, but switch it off immideately.
  53       % The staff combine parts switch it on.
  54       % devNullThread = #'never
  55       \consists "Thread_devnull_engraver";
  56     }
  57     \translator{
  58       \HaraKiriStaffContext
  59       \consists "Mark_engraver";
  60     }
  61     \translator {
  62       \OrchestralScoreContext
  63       skipBars = ##t
  64
  65       % By default, turn off the Thread_devnull_engraver
  66       % at Voice level
  67       devNullThread = #'never
  68       soloText = #"I."
  69       soloIIText = #"II."
  70
  71       % Hmm
  72       currentBarNumber = #218
  73       BarNumber \override #'padding = #3
  74       RestCollision \override #'maximum-rest-count = #1
  75       marginScriptHorizontalAlignment = #1
  76       TimeSignature \override #'style = #'C
  77     }
  78   }
  79 }
  80