Rapprocher deux portées comportant des markup (flèches)

[Gilles TIAR]

Salut à tous,

Je ne domine pas la question des espacements, bien que j’utilise Lilypond depuis plus de 12 ans. Je gère ce sujet essentiellement de manière empirique.

Pour l’heure, voici mon besoin : l’exemple ci-dessous contient deux flèches sur deux notes qui me donnent un espacement trop important à mon goût entre les deux portées – je ne suis pas parvenu à obtenir une hauteur inférieure à 7.4\mm.

Avec le même exemple sans les flèches, j’ai réussi à obtenir une hauteur de 6.7\mm qui me convient.

J’aimerais rapprocher les deux portées pour réduire la hauteur de l’exemple avec les flèches de quelques dixièmes de mm.

Merci

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\version "2.23.0"

\language français

    darga = \markup \concat { " " \char ##x05A7 }

tevir = \markup \concat { " " \char ##x059B }

galgal = \markup \concat { " " \char ##x05A2 }

sillouk = \markup \concat { " " \char ##x05BD }

merha = \markup \concat { " " \char ##x05A5 }

merha_kefoula = \markup \concat { " " \char ##x05A6 }

tipha = \markup \concat { " " \char ##x0596 }

atnah = \markup \concat { " " \char ##x0591 }

mounah = \markup \concat { " " \char ##x05A3 }

mahpakh = \markup \concat { " " \char ##x05A4 }

pashta = \markup \concat { " " \char ##x0599 }

kadma = \markup \concat { " " \char ##x05A8 }

geresh = \markup \concat { " " \char ##x059C }

gershayim = \markup \concat { " " \char ##x059E }

zakef_katon = \markup \concat { " " \char ##x0594 }

zakef_gadol = \markup \concat { " " \char ##x0595 }

revia = \markup \concat { " " \char ##x0597 }

tsinor = \markup \concat { " " \char ##x0598 }

segol = \markup \concat { " " \char ##x0592 }

pazer = \markup \concat { " " \char ##x05A1 }

telisha_ketana = \markup \concat { " " \char ##x05A9 }

telisha_gedola = \markup \concat { " " \char ##x05A0 }

olehveyored = \markup \concat { " " \char ##x05AB }

ilouz = \markup \concat { " " \char ##x05AC }

shalshelet = \markup \concat { " " \char ##x0593 }

clefAjout = { \break \set Staff.explicitClefVisibility = #end-of-line-invisible \set Staff.forceClef = ##t \clef treble }

melody = \relative do' {

mi8 [mi] fa^\markup {

\center-column {

\combine

\draw-line #'(0 . 3)

\arrow-head #Y #DOWN ##f

}

} mi [mi] sold mi mi16 [(re)] mi8\noBeam \breathe\clefAjout

mi mi [mi] mi16 [(fa^\markup {

\center-column {

\combine

\draw-line #'(0 . 3)

\arrow-head #Y #DOWN ##f

}

})] mi8 mi [mi] re

}

\paper {

indent = 6\mm

paper-height = 7.4\cm

paper-width = 13\cm

line-width = 13\cm

bottom-margin = -3.2\mm

top-margin = 0

ragged-last-bottom = ##f

tagline = ##f

}

traduc = \lyricmode {

16se leva8. / Abraham4 de8 bon matin, 8.il4 sangla son âne

}

paroles = \lyricmode {

va -- Yash -- kém av -- ra -- ham ba -- bo -- kér

va -- Ya -- \markup\concat{\underline "h""a"} -- vosch

ét \markup\concat{\underline "h""a"} -- mo -- ro

}

teamiminf = \lyricmode {

\hide \sillouk _ _ _ _ _ _ _ _ _

\sillouk

}

teamimsup = \lyricmode {

_ _ \pashta _ _ \geresh _ \revia _

_ _ _ \tweak X-offset #4 \pashta _ _ _ \zakef_katon

}

\layout {

\context {

\Staff

\remove Time_signature_engraver

\remove Bar_engraver

}

\context {

\Score

\remove Timing_translator

\remove Bar_number_engraver

\override SpacingSpanner.spacing-increment = 3

}

}

\score {

<<

\new Lyrics \with {

\override LyricText.font-shape = #'italic

fontSize = -2

}\traduc

\new Staff

<<

\new Voice = "chant" \melody

\new Lyrics \with {

fontSize = -0.75

\override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #3

\override VerticalAxisGroup.nonstaff-nonstaff-spacing

= #'((basic-distance . 0)

(minimum-distance . 0)

(padding . 0))

}

\lyricsto "chant" \paroles

\new Lyrics \with {

fontSize = 9.5

}

\lyricsto "chant" \teamiminf

\new Lyrics \with {

fontSize = 9.5

}

\lyricsto "chant" \teamimsup

>>

>>

}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%