padding problem

[Werner LEMBERG]

Folks,


please have a look at the attached (non-MWE) example.  If the
`padding' value in `system-system-spacing' is -2, both systems are
displayed on one page – and there is plenty of vertical space still
available at the bottom.

If I change `padding' to -1, I suddenly get two pages.  Why?  What
parameters am I missing to get the two systems on one page without
overlapping?  In case there is no bug in lilypond this should be
easily possible, right?


    Werner

#(set! paper-alist (cons '("local" .
                            (cons (* 404 pt)
                                  (* 223 pt))) paper-alist))

#(set-global-staff-size 16)
#(ly:set-option 'debug-skylines #t)


\header {
  copyright = ""
  tagline = ##f
}


\paper {
  system-count = 2
  #(set-paper-size "local")
  print-page-number = ##f
  print-first-page-number = ##t
  top-margin = 0\pt
  bottom-margin = 0\pt
  line-width = 384\pt
}


\language "deutsch"

\new PianoStaff
<<
  \new Staff = "rechts" \relative c' {
    \clef "treble"
    \key g \minor

    << { \omit TupletNumber
         \tuplet 3/2 { a'8[( -\markup { \italic "ben legato" }
                         a a] }
           \tuplet 3/2 { a a a] }
           \tuplet 3/2 { d[ fis a] }
           \tuplet 3/2 { d[ cis d] } } \\
       { s4 s2.\< } >> |
    << { \tuplet 3/2 { es8[)( b g] } \tuplet 3/2 { es[ b g]) }
           \tuplet 3/2 { a[( g es] } \tuplet 3/2 { b'[ g es]) } } \\
       { es'2\> a,4\! b } >> |
    << { \tuplet 3/2 { c,8[( es g] } \tuplet 3/2 { c[ es g] }
           \tuplet 3/2 { c[ fis, es] } \tuplet 3/2 { c[ g es]) } } \\
       { c'2 s } >> |
    << { \tuplet 3/2 { d,8[( fis a] } \tuplet 3/2 { d[ fis a] }
           \tuplet 3/2 { d[ a fis] } \tuplet 3/2 { d[ a fis]) } } \\
       { d'2\< gis,4\! a } >>
    << { \tuplet 3/2 { b,8[( d g] } \tuplet 3/2 { b[ d g] }
           \tuplet 3/2 { b[ g d] } \tuplet 3/2 { b[ g d]) } } \\
       { b'2 fis4 g } >> |
  }

  \new Dynamics {
    s1\p |
    s1 |
    \crescTextCresc s2. \tuplet 3/2 { s4 s8\< } |
    s1 |
    s2.. s8\!
  }

  \new Staff = "links" \relative c' {
    \clef "bass"
    \key g \minor

    << { c2\rest <fis, a d>4 q } \\
       { <d, d'>1 } >> |
    << { \voiceOne c''2\rest a4 b } \\
       { \voiceThree s2 g } \\
       { \voiceTwo <d, d'>1 } >>
    << { \voiceOne c''2\rest  <a c es fis>4  <g c es g> } \\
       { \voiceTwo <d, d'>1 } >> |
    << { c''2\rest <fis, c' d> } \\
       { <d, d'>1 } >> |
    << { c''2\rest <b d> } \\
       { <d,, d'>1 } >> |
  }
>>


\paper {
  annotate-spacing = ##t
  indent = 0\cm
  system-system-spacing = #'((basic-distance . 0)
                             (minimum-distance . 0)
                             (padding . -1)
                             (stretchability . 0))
  last-bottom-spacing = #'((basic-distance . 0)
                           (minimum-distance . 0)
                           (padding . 0)
                           (stretchability . 0))
}