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.
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
