If you replace the function by
#(define (compound-time-2m one two three four)
(markup #:override '(baseline-skip . 0) #:number
(#:line ((#:column (one two)) #:vcenter "+" (#:column (three four))))))
it seems to work well for both staff sizes.
/Mats
Gilles Sadowski wrote:
Hi.
Regarding Gilles' problems with compound time signatures, I would recommend
to use the example in Sect. "8.4.1 Polymetric notation" as a starting
point.
Then, you could end up with something like:
\version "2.8.7"
#(define (compound-time-2 one two three four)
(markup #:override '(baseline-skip . 2) #:number
(#:line ((#:column (one two)) #:lower 1 "+" (#:column (three four))))))
Thanks, this is much simpler now.
But if you compile the attached sample file, you'll notice that there is
still a problem: In the sized-down staff, there is a gap between numerator
and denominator of the time signature fraction.
How to get rid of it?
Best,
Gilles
------------------------------------------------------------------------
\version "2.8.7"
#(define (compound-time-2m one two three four)
(markup #:override '(baseline-skip . 2) #:number
(#:line ((#:column (one two)) #:lower 1 "+" (#:column (three four))))))
staffOne = \context Staff = "1" {
\time 3/4
\override Staff.TimeSignature #'stencil = #ly:text-interface::print
\override Staff.TimeSignature #'text = #(compound-time-2m "1" "2" "3" "4")
a4 b g | f4 g2 |
}
staffTwo = \context Staff = "2" {
\time 3/4
\override Staff.TimeSignature #'stencil = #ly:text-interface::print
\override Staff.TimeSignature #'text = #(compound-time-2m "1" "2" "3" "4")
a2. | g2. |
}
theMusic = \relative c'' {
\context StaffGroup <<
\context Staff = "1" {
\set Staff.fontSize = #-4
\override Staff.StaffSymbol #'staff-space = #(magstep -4)
\override Staff.VerticalAxisGroup #'minimum-Y-extent = #'(-2 . 3)
}
\staffOne
\context Staff = "2" {
\override Staff.VerticalAxisGroup #'minimum-Y-extent = #'(-2 . 3)
}
\staffTwo
>>
}
\score {
\theMusic
\layout {}
}
------------------------------------------------------------------------
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
--
=============================================
Mats Bengtsson
Signal Processing
Signals, Sensors and Systems
Royal Institute of Technology
SE-100 44 STOCKHOLM
Sweden
Phone: (+46) 8 790 8463
Fax: (+46) 8 790 7260
Email: [EMAIL PROTECTED]
WWW: http://www.s3.kth.se/~mabe
=============================================
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
