two problems: vertical brackets and simultaneous voices

[Arvid Grøtting]

Hi!

I've been too busy to read this list for a while, but now I've got a
question.

I'm copying Johan Halvorsen's Veslemøy (for male choir, with lyrics by
Arne Garborg), and in the original I have the following bar:

The divided basses here aren't easy.

Now, I've managed to get the music printed in a way where the first
chord doesn't completely overlap, using three voices:

But two questions remain:

- Is there a (reliable) way of stacking the notes in the first chord
  exactly as in the original?  (I've played around with \voiceThree
  etc and \shiftOnn, not quite getting it.  Is extra-offset my only
  hope here?)

- Is there a way to print the vertical brackets exactly as in the
  original?  (I've tried \arpeggioBracket and \arpeggio, but as it
  seems I need extra voices here, and as I'm in one staff only, I
  don't get a good result when I get one at all.  This may have to do
  with using an arpeggio command to express something quite different
  from an arpeggio.  I may be doing something wrong, though.  Is there
  a good way, or do I need to turn to \postscript?)

Alternatively, can any of you think of a better way to convey the same
musical meaning (including which basses should sing which part when
the bass voices are subdivided)?

Here's the source so far:

\version "2.12.1"

\new Staff \with {
  \remove Time_signature_engraver
  \remove Clef_engraver
} <<
  \clef bass
  \set Score.autoBeaming = ##f

  \new Voice \relative c
  { \dynamicUp
    \phrasingSlurUp
    \slurUp
    \override TextScript #'direction = #1
    \override RepeatTie #'direction = #1
    \voiceOne
    << { e8[(-\markup\right-align "div." d'!]) d c b4 } 
       { s4 e,8 e e4 }
       \new Voice { \voiceFour <e>4 }
     >> g8[( bes]) |
  }
  
  \new Voice \relative c
  { \dynamicDown
    \phrasingSlurDown
    \override TextScript #'direction = #-1
    \override RepeatTie #'direction = #-1
    \voiceTwo
    \override BreathingSign #'text = \markup {
      \line {
        \musicglyph #"scripts.caesura.curved"
        \translate #'(-1.75 . 1.6)
        \musicglyph #"scripts.ufermata"
      }
    }
    << \new Voice { \voiceThree <b>8 [ \voiceOne d!] } 
       { \voiceTwo <e,>4\< } 
     >> \voiceTwo <e d'>8\! <e c'>\> <e b'>4\! \breathe e'8[(\p\< d])\! |
  }
>>


-- 
Sangerhilsen,

Arvid