Spaziatura verticale prima e dopo verse

`
% !TEX encoding = UTF-8 Unicode
\documentclass[10pt,openany]{book}
\usepackage[paperwidth=120mm, paperheight=205mm, textwidth=85mm, top=45pt, outer=21mm]{geometry}

\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[italian]{babel}
\usepackage[oldstylenums]{kpfonts}

\usepackage{verse}
\setlength{\vindent}{0pt}
\setlength{\stanzaskip}{\baselineskip}
\setlength{\leftmargini}{0pt}

\usepackage{tikz}
\usepackage{eso-pic}
\usepackage{ifthen}
\newcommand{\rete}{\AddToShipoutPicture{%
{\begin{tikzpicture}
\draw[thick](0pt,188mm)–(210mm,188mm);
\draw[thick](0pt,23.5mm)–(210mm,23.5mm);
\foreach \y in {0,84.4,96.4,…,556}
\draw(0mm,\y pt)–(210mm,\y pt);
\ifthenelse{\isodd{\thepage}}%
{\draw(14mm,0mm)–(14mm,200mm);
\draw(99mm,0mm)–(99mm,200mm);}
{\draw(21mm,0mm)–(21mm,200mm);
\draw(107mm,0mm)–(107mm,200mm);}
\end{tikzpicture}}%
}}
\rete %inserisce la griglia sullo sfondo

\makeatletter
\renewenvironment{verse}
{\let\\\@centercr
\list{}{\itemsep \z@
\itemindent -1.5em%
\listparindent\itemindent
\rightmargin \leftmargin
\advance\leftmargin 1.5em
\advance\topsep .5mm
\advance\parsep 3mm
}%
\item\relax}
{\endlist}

\lineskip=0pt
\parskip=0pt
\begin{document}
Solo che non bisogna avere fretta. Ma io sono convinta che qui è la vita e la salvezza del mondo: quando questa sarà zona di incontro.

\advance\topsep 1mm
\begin{verse}\advance\parsep 2mm
Temporale\\
In alto sotto le rocce\\
nuvole nere di piombo\\
il [\dots]

Altra stanza:\\
In alto sotto le rocce\\
nuvole nere di piombo\\
il [\dots]
\end{verse}

Usciamo dalle case per camminare in mezzo ai campi, per vedere le striature di neve, e i rami degli alberi contro il cielo. Per scoprire il silenzio: è un buon amico.
\end{document}
`

Prova così

\parsep e \partopsep li avevo messi prima nel documento ma non sortivano nessuna effetto, poi li ho spostati nella definizione di verse ma mi sono dimenticato di cancellarli da sotto.

\advance è un comando “primitivo” di TeX; serve per eseguire una somma; vuol dire in sostanza “aggiungi”, non “avanza” o, se vuoi, vuol dire anche questo nel senso traslato di “andare avanti”.

I valori li ho provati, tanto per vedere se facevano qualcosa e che cosa, poi in due o tre colpetti li ho messi a posto. Però per rendere più generale il codice bisognerebbe parametrizzare quei due “avanzamenti” al valore di \baselineskip, in modo che il tutto si aggiusti da solo quando si cambia corpo. A me il tuo esempio minimo viene bene mettendo:
`
\advance\topsep 0.09\baselineskip
\advance\parsep 0.75\baselineskip
`
ma puoi farci sopra delle variazioni sul tema.

\parsep e \partopsep li avevo messi prima nel documento ma non sortivano nessuna effetto, poi li ho spostati nella definizione di verse ma mi sono dimenticato di cancellarli da sotto.

\advance è un comando “primitivo” di TeX; serve per eseguire una somma; vuol dire in sostanza “aggiungi”, non “avanza” o, se vuoi, vuol dire anche questo nel senso traslato di “andare avanti”.

I valori li ho provati, tanto per vedere se facevano qualcosa e che cosa, poi in due tre colpetti li ho messi a posto. Però per rendere più generale il codice bisognerebbe parametrizzare quei due “avanzamenti” al valore di \baselineskip, in modo che il tutto si aggiusti da solo quando si cambia corpo. A me il tuo esempio minimo viene bene mettendo:
`
\advance\topsep 0.09\baselineskip
\advance\parsep 0.75\baselineskip
`
ma puoi farci sopra delle variazioni sul tema.

In LaTeX è
`\addtolength{\topsep}{0.09\baselineskip}`
🙂

Ciao
Enrico

No, non sbagli niente;

TeX (verse) inserisce uno spazio fisso che non tiene conto del fatto che la riga con cui finisce il capoverso precedente abbia o non abbia discendenti.

I primi due capoversi di lipsum, con al tua giustezza, finiscono entrambi con una riga senza discendenti, mentre nel tuo primo esempio l’ultim riga prima dei versi terinava con un discendente;

Per aggiustare le cose prova a terminare il capoverso (non di lipsum, perché non puoi metterci le mani dentro) con un comando \strut:
`
… Ave Caesar, morituri te salutant\strut.
`

In questo caso metti un discendente invisibile che ti rende sempre il capoverso precedente terminante con la giusta profondità.

\@topsep e \@topsepadd non li ho mai incontrati, ma suppongo che siano parametri interni del più genrale environment list su cui si basa verse.

Le modifiche sono corrette? se funzionano lo sono. Chissà se Enrico è in grado di spiegarci perché così funziona.

Ancora non capisco. Mi dici che TeX non tiene conto di eventuali discendenti nell’ultima riga, ma mi consigli di aggiungerne a mano?
In realtà ho fatto alcune prove, e il risultato non dipendeva solo dai discendenti.
Poi non mi piace l’idea di dover modificare il testo per inserire caratteri fittizi per ottenere quel che voglio.
Mi son ricordato del pacchetto grid di Kaveh Bazargan che mi avevi suggerito tempo fa riguardo alla questione del rispetto dell’interlinea. Ho guardato come Kaveh ha ridefinito verse:
`\renewenvironment{verse}
{\let\\\@centercr
\list{}{\itemsep \z@
\itemindent -1.5em%
\listparindent\itemindent
\rightmargin \leftmargin
\advance\leftmargin 1.5em}%
\topsep\z@\partopsep\z@\parskip\z@%
\itemsep\z@\@outerparskip\z@\parsep\z@%
\@topsep\z@\@topsepadd\z@%
\item\relax}
{\endlist}`
Io l’ho modifica così:`\renewenvironment{verse}
{\let\\\@centercr
\list{}{\itemsep \z@
\itemindent -1.5em%
\listparindent\itemindent
\rightmargin \leftmargin
\advance\leftmargin 1.5em \addvspace{\baselineskip}}%
\topsep\z@\partopsep\z@\parskip \baselineskip%
\itemsep\z@\@outerparskip\z@\parsep\z@%
\@topsep\z@\@topsepadd\baselineskip%
\item\relax}
{\endlist}`
La prima modifica lascia una riga prima della poesia, la seconda gestisce lo spazio fra le stanze e l’ultima aggiunge una riga alla fine.
Così pare funzionare correttamente. Anche se non mi piace l’idea di aver introdotto così la spaziatura verticale.
Come mai la modifica di topsep non produce variazioni nell’output? Come mai definisce \topsep e @topsep? Molte domande, scusate.
L’ultima: sono accettabili le modifiche che ho fatto?

Grazie ancora della vostra disponibilità.

Francesco

Non vedo perché tutte queste complicazioni. 🙂 La tua modifica di \topsep non ha influenza perché è data fuori dall’argomento di \list, dove invece vanno tutti i parametri per comporre la lista. O, meglio, influenza solo la fine della lista, quando il parametro \topsep è usato di nuovo.
`\renewenvironment{verse}
{\let\\\@centercr
\list{}{\itemsep \z@
\itemindent -1.5em%
\listparindent\itemindent
\rightmargin \leftmargin
\advance\leftmargin 1.5em
\topsep\baselineskip
\partopsep\z@
% \@outerparskip\z@
\parsep\z@}
\parskip\baselineskip
\item\relax}
{\endlist}`
Qui metto fuori l’impostazione di \parskip, perché serve solo fra le strofe. Non credo che \@outerparskip serva.

Ciao
Enrico