-#(define plus (markup #:vcenter "+"))
-#(define ((custom-time-signature one two three four five six
- seven eight nine ten eleven num) grob)
- (grob-interpret-markup grob
- (markup #:override '(baseline-skip . 0) #:number
- (#:line ((#:column (one num)) plus
- (#:column (two num)) plus
- (#:column (three num)) plus
- (#:column (four num)) plus
- (#:column (five num)) plus
- (#:column (six num)) plus
- (#:column (seven num)) plus
- (#:column (eight num)) plus
- (#:column (nine num)) plus
- (#:column (ten num)) plus
- (#:column (eleven num)))))))