]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/tuplet-nest.ly
* lily/beam-engraver.cc: move new-beam-event to beam-event
[lilypond.git] / input / regression / tuplet-nest.ly
1
2 \version "1.9.1"
3 \header {
4   texidoc="Manual hack for nested tuplets, move outer tuplet up."
5 }
6
7 #(define (make-text-checker-once text)
8   (lambda (grob) (and text-checker-once
9                       (if (equal? text (ly:get-grob-property grob 'text))
10                           (begin
11                             (set! text-checker-once #f) #t)
12                           #f))))
13
14 #(define text-checker-once #t)
15
16 \score {
17   \notes\relative c'' {
18
19     \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter
20
21     \outputproperty #(make-text-checker-once "2:3")
22       #'extra-offset = #'(0 . 1.5)
23     \times 2/3 {
24       \times 2/3 {
25         a a a
26       }
27       \times 3/5 {
28         a a a a a
29       }
30     }
31   }
32   \paper { raggedright = ##t}
33 }
34