Another page-break problem, particularly fiendish

[mclaren]

This score fragment follows up on Lilypond code originally posted by Hans
Åberg  and Malte Men back in June, 2014, on this forum. I've carried the
notation a little bit farther. 

The question I have is: how the devil to generate a proper page break in a
score like this?

If there's a make-moment value that will do it, I can't figure it out. Any
suggestions?


\version "2.18.2" 
 

\header{ 
  title = "Example of irrational meter"
% Based on code by Hans Aberg and Malte Meyn, posted to Lilypond Nabble
forum June 2014 
 
  tagline = ##f  % Removing "Music engraving by LilyPond (version)" 
} 


above = { \once \override Script #'script-priority = #-100 } 
below = { \once \override TextScript #'script-priority = #-100 } 


irrtuplet = \once \override TupletNumber.text = 
 \markup \concat { 
    
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "17"
   ":"
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "3"
 } 

irrtupletb = \once \override TupletNumber.text = 
 \markup \concat { 
    
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "23"
   ":"
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "5"
 } 
 
 irrtupletc = \once \override TupletNumber.text = 
 \markup \concat { 
    
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "3"
   
 } 

music = << \new Staff { \clef "treble"
  \tempo 4 = 73 
 \cadenzaOn

  \override Staff.TimeSignature.stencil = #ly:text-interface::print 
  \override Staff.TimeSignature.text = 
  \markup \override #'(baseline-skip . 0) \center-column \number { 
    \concat { 
        \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "337" \tiny "/" "17"
   
   % sqr(3) + 4*sqr(17):sqr(3) =
   % sqr(17)/[sqr(17)*sqr(3)] + sqr(16)*[sqr(3)/sqr(17)] =
   % = sqr(289)/sqr(3) + sqr(48)/sqr(17) = 
   % sqr(337)/sqr(17) = 4.45236 quarter notes.
  
    } 
    \concat { 
      
      \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "17"
   ":"
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "3" 
    } 
  } 


  \override TupletNumber.text = #tuplet-number::calc-fraction-text 

  \relative c' { 
   { 
      \once \override TextScript #'padding = #1.0 
      
      \irrtuplet \tuplet 219/92 {f8[ g] a[ d,]} \irrtuplet \tuplet 219/92
{e8[ g] b[ f]} \irrtupletc \tuplet 627/362 {r4}
      |
      \irrtuplet \tuplet 219/92 {a8[ g] a[ d,]} \irrtuplet \tuplet 219/92
{e8[ g] b[ f]} \irrtupletc \tuplet 627/362 {r4}
       
       | 
      } 
    } 
  } 
  
  \new Staff { \clef "bass"
  
 

  \override Staff.TimeSignature.stencil = #ly:text-interface::print 
  \override Staff.TimeSignature.text = 
  \markup \override #'(baseline-skip . 0) \center-column \number { 
    \concat { 
      "4" 
      
    } 
    \concat { 
      
      \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "23"
   ":"
   \tiny "√" 
   \hspace #-0.15 
   \override #'(offset . -16) 
   \override #'(thickness . 1.6) 
   \underline "5" 
    } 
  } 


  \override TupletNumber.text = #tuplet-number::calc-fraction-text 

  \relative c { 
   { 
      \once \override TextScript #'padding = #1.0 
       
      \irrtupletb \tuplet 716/395 {a'8[ e] c[ b']} \irrtupletb \tuplet
716/395 {e,8[ b] d[ a']} 
      |
      \irrtupletb \tuplet 716/395 {f8[ e] c[ b']} \irrtupletb \tuplet
716/395 {e,8[ b] d[ a']}   
       | 
      } 
    } 
  } 

>> 

\score { 
  \music 
        \layout {
        
        #(set-default-paper-size "a4" 'landscape)
        
        }
} 
 



--
View this message in context: 
http://lilypond.1069038.n5.nabble.com/Another-page-break-problem-particularly-fiendish-tp196126.html
Sent from the User mailing list archive at Nabble.com.