Text *in* score - Stopped staves - Horizontal spacing

[Pierre-Luc Gauthier]

Hi there,

I have this text that I hope to fit in between stopped staves.
Obviously, this can only work by stopping staves from the top of the score.

Bellow is my wished-to-be-more-minimal working example.
I've also joined a raster image of the expected result.

If you comment line 46 and un-comment 48, the R1 rest does not have a
sufficient horizontal spacing to allow for the text to dodge the
skylines.

Also, could the horizontal spacing be a function of the 'line-width
parameter 40?

Thanks for your input.
'Good day
-- 
Pierre-Luc Gauthier

http://lilybin.com/5kxtf7/1

%%%%%%%%%%%%%%%%%%%%%%  \begin{lily}

\version "2.19.54"

someText = \tempo \markup {
  \override #(cons 'line-width 40)
  \justify {
    \fontsize #-4 {
      \underline \larger \smallCaps {
        "Narrator :"
      }
      Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do
eiusmod tempor incididunt ut labore et dolore magna aliqua.
      Ut enim ad minim veniam, quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
      Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur.
      Excepteur sint occaecat cupidatat non proident, sunt in culpa
qui officia deserunt mollit anim id est laborum.
    }
  }
}

songStructure = {
  s1 |
  \bar "||"
  \someText
  s |
  \bar "||"
  \key bes \major
  s |
  \bar "|."
}

someMusic = {
  f'8 r r4 r2 |
  s1 |
  f'8 r r4 r2 |
}

staffStopper = {
  s1 |
  \stopStaff
  s |
  \startStaff
  s |
}

staffRester = {
  s1 |

  \tuplet 21/32 \repeat unfold 21 c'32 | % Ain't that gracious‽
  % Replace the ^line above^ with this _line bellow_
  % R1\fermataMarkup

  s1 |
}

staffI = \new Staff \with {
} \new Voice <<
  \songStructure
  \someMusic
  \staffStopper
>>

staffII = \new Staff \with {
} \new Voice <<
  \songStructure
  \someMusic
  \staffStopper
>>

staffIII = \new Staff \with {
} \new Voice <<
  \songStructure
  \someMusic
  \staffStopper
>>

piano = \new PianoStaff <<
  \new Staff \with {
  } \new Voice << \songStructure \someMusic \staffRester >>
  \new Staff \with {
  } \new Voice << \songStructure \someMusic \staffRester >>
>>

scoreContent = <<
  \staffI
  \staffII
  \staffIII
  \piano
>>

\score {
  \scoreContent
  \layout {}
}

%%%%%%%%%%%%%%%%%%%%%%  \end{pond}

Text in score.ly
Description: Text Data

Text in score(GimpSkillsActivate).png
Description: PNG image