Re: rest position in a polyphonic staff

[Janek Warchoł]

On Sun, Jul 15, 2012 at 10:58 AM, David Kastrup <address@hidden> wrote:
> StemSplit =
> #(define-music-function (parser location p) (ly:pitch?)
>    #{ \override Stem #'direction =
>       #(lambda (grob) (if (ly:pitch<? (ly:event-property (event-cause grob)
>                                       'pitch) p) UP DOWN))
>    #})
>
> \new Voice {
>   \relative c' { \StemSplit e'' c d e f g a b c d e f g a b c }
> }

Looks cool, but breaks with beamed notes:

StemSplit =
#(define-music-function (parser location p) (ly:pitch?)
   #{ \override Stem #'direction =
      #(lambda (grob) (if (ly:pitch<? (ly:event-property (event-cause grob)
                                      'pitch) p) UP DOWN))
   #})

\relative f' {
  \time 2/4
  \StemSplit d''
  f8 a g b
  a c b d
  c e d f
}