\version "2.25.1"

\include "score_glb.ily"

%%%%%%%%%%

\include "bwv004.instr_ily"

%pitchTranspose = bes,
%clef = { \clef  }
% "french" "treble" "soprano" "mezzosoprano" "alto" "baritone" "varbaritone" "tenor" "treble_8" "bass"

\include "bwv004_02.ily"
\include "bwv004.staff_ily"

\score {
  \header { piece = \hdrac }
  <<
    \scorePre
    \scoreTimeSig
    \new GrandStaff <<
      \staffVia
      \staffVib
    >>
    \new GrandStaff <<
      \staffVaa
      \staffVab
    >>
    \new ChoirStaff <<
      \staffSop
      \lyricsto voiceSop \lyrSop
      \staffAlt
      \lyricsto voiceAlt \lyrAlt
      \staffTen
      \lyricsto voiceTen \lyrTen
      \staffBas
      \lyricsto voiceBas \lyrBas
    >>
      \staffBC
  >>
  \layout {
    \context {
      \Score
      %\override SpacingSpanner.base-shortest-duration = #(ly:make-moment 2/1)
    }
    \context {
      \Staff
      \RemoveEmptyStaves
      %\override VerticalAxisGroup.remove-first = ##t % this does not work with Ambitus_engraver
      \consists "Ambitus_engraver"
    }
    \context {
      \Voice
      %\consists "Ambitus_engraver"
    }
  }
}

\score {
  \unfoldRepeats
  <<
      \mstaffVia
      \mstaffVib
      \mstaffVaa
      \mstaffVab
      \mstaffSop
      \mstaffAlt
      \mstaffTen
      \mstaffBas
      \mstaffBC
  >>
  \midi { }
}