Supprimer les proportions des espaces dans la notation

Bonjour à tout le groupe!

dans une messe en notation mensurelle, cet extrait:

\version "2.24.2"

\score {
  <<
    \new MensuralVoice = "discantus" \relative c'' {
      \hide Score.BarNumber {
        \key f \major
        \override NoteHead.style = #'petrucci
        g1. g2 \[ bes\longa*1/16 c\breve*1/8 \] \once \hide Stem d4 c d e f1 e4 d c2 f e d1 c2 d\breve r2 g,2 g1
      }
    }
    \new Lyrics \lyricsto "discantus" {
      Ky -- ri -- e \repeat unfold 9 _ e -- le -- y -- _ son
    }
  >>
}

je cherche à supprimer la proportionnalité des espaces entre les notes, ceci pour gagner de la place, l'idéal se situant entre les 4 notes à tête noire, juste après Kyrie. Toujours dans l'optique de la gravure vers 1500, pratiquement tous les espaces sont égaux, sauf évidemment celui de la ligature du «e» de Kyrie qui doit voir les deux notes «collées» l'une à l'autre.

Bonjour,
essayez différentes valeurs " de \override NoteHead.X-extent = #'(0 . 0)"
https://lilypond.org/doc/v2.24/Documentation/notation/spacing-between-adjacent-columns

\version "2.24.2"

\score {
  <<
    \new MensuralVoice = "discantus" \relative c'' {
      \hide Score.BarNumber {
        \key f \major
        \override NoteHead.style = #'petrucci
        g1. g2 \[ bes\longa*1/16 c\breve*1/8 \] \once \hide Stem 
        \override NoteHead.X-extent = #'(-0 . 0)
        d4 c d e 
        \revert  NoteHead.X-extent 
        
        f1 e4 d c2 f e d1 c2 d\breve r2 g,2 g1
      }
    }
    \new Lyrics \lyricsto "discantus" {
      Ky -- ri -- e \repeat unfold 9 _ e -- le -- y -- _ son
    }
  >>
}

Cordialement

ha désolé mais les stem ne suivent pas

donc tentons
\newSpacingSection
\override Score.SpacingSpanner.spacing-increment = #0.1

https://lilypond.org/doc/v2.24/Documentation/notation/new-spacing-section

\score {
  <<
    \new MensuralVoice = "discantus" \relative c'' {
      \hide Score.BarNumber {
        \key f \major
        \override NoteHead.style = #'petrucci
        g1. g2 \[ bes\longa*1/16 c\breve*1/8 \] \once \hide Stem 
      % \override NoteHead.X-extent = #'(-0.1 . 0.1)
        \newSpacingSection
       \override Score.SpacingSpanner.spacing-increment = #0.1
           d4 c d e    
        \newSpacingSection
        \revert Score.SpacingSpanner.spacing-increment
        
        f1 e4 d c2 f e d1 c2 d\breve r2 g,2 g1
      }
    }
    \new Lyrics \lyricsto "discantus" {
      Ky -- ri -- e \repeat unfold 9 _ e -- le -- y -- _ son
    }
  >>
}

Merci Martial! L'effet est bien rendu et parfait.