+
+\version "2.19.21"
+
\header {
- texidoc="Manual hack for nested tuplets"
+ texidoc=" Tuplets may be nested."
+}
+
+\paper {
+ ragged-right = ##t
+ indent = 0.0
}
-#(define (make-text-checker-once text)
- (lambda (grob) (and text-checker-once
- (if (equal? text (ly-get-grob-property grob 'text))
- (begin
- (set! text-checker-once #f) #t)
- #f))))
-
-#(define text-checker-once #t)
-
-\score {
- \notes\relative c'' {
-
- \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter
-
- \outputproperty #(make-text-checker-once "2:3")
- #'extra-offset = #'(0 . 1)
- \times 2/3 {
- \times 2/3 {
- a a a
- }
- \times 3/5 {
- a a a a a
- }
+\relative {
+ \tuplet 3/4 {
+ \tuplet 3/2 { c''8[ c c] }
+ \tuplet 3/2 { c8[ c c] }
+ \tuplet 3/2 { c8[ c c] }
+ }
+
+ \tuplet 3/4 {
+ \tuplet 3/2 { a8[ a a] }
+ \tuplet 3/2 { a8[ a a] }
+ \tuplet 3/2 { a8[ a a] }
+ }
+
+ \override TupletNumber.text = #tuplet-number::calc-fraction-text
+ \tuplet 6/4 {
+ \tuplet 3/2 {
+ a4 a a
+ }
+ \tuplet 5/3 {
+ a4 a a a a
}
}
- \paper { linewidth = -1. }
+
+ s1*1/6
+
+ \stemUp
+ \tuplet 6/4 {
+ \tuplet 3/2 {
+ a1*1/6 a f'
+ }
+ \tuplet 5/3 {
+ c f g a b
+ }
+ }
+
}
+