Re: truly elegant compound time signatures

[Joseph Wakeling]

Graham Percival wrote:
> I am pleased to re-announce that I am an idiot.  Please ignore the
> previous message about "elegant" compound time signatures; the
> attached file is *much* better.

I'm afraid I get horrible horrible errors with the files you attached
:-(  The resulting output has no time signatures engraved at all.

----------------------------------------------------------------------
GNU LilyPond 2.11.62
Processing `compound-test.ly'
Parsing...
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
<string>:5:57: error: GUILE signaled an error for the expression
beginning here
    \once \override Staff.TimeSignature #(quote text) = #
                                                         (markup %%
parenthetical display of compound-ness #:column (#:small #:line
(#:concat ("(" %% list the additive portions of the time signature, %%
adding "+" between items. (make-line-markup (list-insert-separator (map
(lambda (n) (markup (number->string n))) lilyvartmpb) (markup "+")))
")")) #:override (quote (baseline-skip . 0)) %% main time signature
display (#:number #:line (#:column ((number->string (car lilyvartmpc))
(number->string (cadr lilyvartmpd)))))))
Unbound variable: %%
Interpreting music...
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
warning: type check for `text' failed; value `#<unspecified>' must be of
type `markup'
[8][8]
Preprocessing graphical objects...
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
programming error: Object is not a markup.
continuing, cross fingers
This object should be a markup: ()
Finding the ideal number of pages...
Fitting music on 1 page...
Drawing systems...
Layout output to `compound-test.ps'...
Converting to `./compound-test.pdf'...