default stem directions

[Rick Kimpel]

I am trying to learn how to change the default stem directions.
I assume it has something to do with ly:stem::calc-default-direction,
but I have no idea where to go from there.
I would like an output that looks like this:

\version "2.19.83"
\score {
   \new Staff
    \with { \override StaffSymbol.line-count =  #1 } 
    {
      \clef percussion
      \numericTimeSignature
      \autoBeamOff
    \relative c' {
         \stemDown b8 \stemUp c4 c8 
         \stemDown b8[ b] b \stemUp c
      }
    }
}

...without having to do all the \stemUp \stemDown stuff.
I'm ok with the manual beaming.

Thanks,
Rick

stem-sample.PNG
Description: stem-sample.PNG