amincir les lignes verticales ente les portées

[Marc Lanoiselée]

Bonjour,
J'aimerai amincir les lignes verticales ente les portées de 
l'exemple suivant, tout en conservant l'épaisseur du début 
et de la fin.
Quelqu'un sait-il comment s'y prendre ?

\version "2.13.36"

%************PartieUn****
    PartieUn = {
 \clef "petrucci-c3"
  \override Staff.TimeSignature #'style = #'single-digit
  \time 2/2
   \override Staff.BarLine #'transparent = ##t
 a'4. g'8 f'4 e'8 [  d'8 ]   |
 e'8 [  d'8 c'8 b8 ]  a4 a'4.
  g'8   f'4 g'4 a'4  |
  \bar "|."
  \revert Staff.BarLine #'transparent
     }
%************PartieDeux***
    PartieDeux = {
 \clef "bass"%"mensural-f"%
 \override Staff.TimeSignature #'style = #'single-digit
  \time 2/2
 \override Staff.BarLine #'transparent = ##t
 r4  a4. b8 c'4  |
 a4. g8 f8 [  e8 d8 c8 ]   |
 d4 d'8 [  c'8 ]  bes4 c'4
 \bar "|."
\revert Staff.BarLine #'transparent
    }
%---------------
\score {
    \new StaffGroup <<
        \new Staff { \PartieUn }
        \new Staff { \PartieDeux}
>>
}


Marc Lanoiselée