\version "2.19.82"
\include "divisi_engraver.ly"

\paper {
  short-indent = 0.5\cm
}

\layout {
  \context {
    \StaffGroup
    \consists \Condense_staves_engraver
  }
  \context {
    \Staff
    \override VerticalAxisGroup.remove-empty = ##t
    \override VerticalAxisGroup.remove-first = ##t
    keepAliveInterfaces = #'()
  }
}


% TWO PARTS

global = {
  s1
  \break
  s1
}

I = {
  \context Staff = "1" { \set Staff.combineWithNext = ##f }
  c'4 4 4 4
  \context Staff = "1" { \set Staff.combineWithNext = ##t }
  c'4 4 4 4
}

II = {
  e2 2
  2 2
}

\new StaffGroup <<
  \new Staff = "1+2" \with {
    sharingParts = #'(1 2)
    instrumentName = "1 2"
    shortInstrumentName = "1 2"
  } << \global \I \II >>
  \new Staff = "1" \with {
    sharingParts = #'(1)
    instrumentName = "1"
    shortInstrumentName = "1"
  } << \global \I >>
  \new Staff = "2" \with {
    sharingParts = #'(2)
    instrumentName = "2"
    shortInstrumentName = "2"
  } << \global \II >>
>>

% FOUR PARTS

global = {
  s1
  \break
  s1
  \break
  s1
  \break
  s1
  \break
  s1
  \break
  s1
  \break
  s1
  \break
  s1
}

I = {
  \context Staff = "1" { \set Staff.combineWithNext = ##t }
  c'4 4 4 4
  c'4 4 4 4
  c'4 4 4 4
  c'4 4 4 4
  \context Staff = "1" { \set Staff.combineWithNext = ##f }
  c'4 4 4 4
  c'4 4 4 4
  c'4 4 4 4
  c'4 4 4 4
}

II = {
  \context Staff = "2" { \set Staff.combineWithNext = ##t }
  a4 4 4 4
  a4 4 4 4
  \context Staff = "2" { \set Staff.combineWithNext = ##f }
  a4 4 4 4
  a4 4 4 4
  \context Staff = "2" { \set Staff.combineWithNext = ##t }
  a4 4 4 4
  a4 4 4 4
  \context Staff = "2" { \set Staff.combineWithNext = ##f }
  a4 4 4 4
  a4 4 4 4
}

III = {
  \context Staff = "3" { \set Staff.combineWithNext = ##t }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##f }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##t }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##f }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##t }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##f }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##t }
  f4 4 4 4
  \context Staff = "3" { \set Staff.combineWithNext = ##f }
  f4 4 4 4
}

IV = {
  \repeat unfold 8 { d4 4 4 4 }
}

\new StaffGroup <<
  \new Staff = "1+2+3+4" \with {
    sharingParts = #'(1 2 3 4)
    instrumentName = "1 2 3 4"
    shortInstrumentName = "1 2 3 4"
  } << \global \I \II \III \IV >>
  \new Staff = "1+2+3" \with {
    sharingParts = #'(1 2 3)
    instrumentName = "1 2 3"
    shortInstrumentName = "1 2 3"
  } << \global \I \II \III >>
  \new Staff = "1+2" \with {
    sharingParts = #'(1 2)
    instrumentName = "1 2"
    shortInstrumentName = "1 2"
  } << \global \I \II >>
  \new Staff = "1" \with {
    sharingParts = #'(1)
    instrumentName = "1"
    shortInstrumentName = "1"
  } << \global \I >>
  \new Staff = "2+3+4" \with {
    sharingParts = #'(2 3 4)
    instrumentName = "2 3 4"
    shortInstrumentName = "2 3 4"
  } << \global \II \III \IV >>
  \new Staff = "2+3" \with {
    sharingParts = #'(2 3)
    instrumentName = "2 3"
    shortInstrumentName = "2 3"
  } << \global \II \III >>
  \new Staff = "2" \with {
    sharingParts = #'(2)
    instrumentName = "2"
    shortInstrumentName = "2"
  } << \global \II >>
  \new Staff = "3+4" \with {
    sharingParts = #'(3 4)
    instrumentName = "3 4"
    shortInstrumentName = "3 4"
  } << \global \III \IV >>
  \new Staff = "3" \with {
    sharingParts = #'(3)
    instrumentName = "3"
    shortInstrumentName = "3"
  } << \global \III >>
  \new Staff = "4" \with {
    sharingParts = #'(4)
    instrumentName = "4"
    shortInstrumentName = "4"
  } << \global \IV >>
>>