\version "2.25.1"

\include "score_glb.ily"

%%%%%%%%%%

\include "bwv128.instr_ily"

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

clefAlt = { \clef "treble" }
clefTen = { \clef "treble_8" }
initObd = {
  \override AccidentalSuggestion.avoid-slur = #'outside
  \override AccidentalSuggestion.font-size = #-3
}
initAlt = \initObd
initTen = \initObd
initBc  = \initObd
initGb  = {
  \set figuredBassAlterationDirection = #RIGHT
  \set figuredBassPlusDirection = #RIGHT
  %\bassFigureExtendersOn
}

\include "bwv128_04.ily"
\include "bwv128.staff_ily"

\score {
  \header { piece = \hdrae }
  \new ChoirStaff <<
    \scorePre

    \staffObd

    \kstaffAlt
    \lyricsto voiceAlt \lyrAlt

    \staffTen
    \lyricsto voiceTen \lyrTen

    \staffBc
    \new FiguredBass { \initGb \musGb }
  >>
  \layout {
    \context {
      \Voice
      \consists "Ambitus_engraver"
    }
  }
}

%\include "../include/articulate.ly"
\score {
  \unfoldRepeats %\articulate
  <<
    \mstaffObd
    \mstaffAlt
    \mstaffTen
    \mstaffBc
  >>
  \midi {
  }
}