-@lilypond[quote,line-width=13.0\cm]
-#(define ((compound-time one two three num) grob)
- (grob-interpret-markup grob
- (markup
- #:override '(baseline-skip . 0)
- #:number
- #:line (
- #:left-column (one num)
- #:vcenter "+"
- #:left-column (two num)
- #:vcenter "+"
- #:left-column (three num)))))
-