Re: scheme code for aksak-meters, problem with 2.14.1

[Stefan Thomas]

Dear community, dear Xavier,
I've tried it now with the following snippet, wich is a copy of the code I found in my /usr/share/lilypond folder.
It works fine, but sometimes it doesn't show the timesignature I want to see.
In te below quoted snippet the time timesignature is 5/8 but I would like to
get 10/16.
\version "2.14.1"

aksak =
#(define-music-function (parser location args) (pair?)
  (let* ((mlen (calculate-compound-measure-length args)) 
         (beat (calculate-compound-base-beat args))
         (beatGrouping (calculate-compound-beat-grouping args))
         (timesig (cons (ly:moment-main-numerator mlen)
                        (ly:moment-main-denominator mlen))))
  #{
    \set Timing.timeSignatureFraction = $timesig
    \set Timing.baseMoment = $beat
    \set Timing.beatStructure = $beatGrouping
    \set Timing.beamExceptions = #'()
    \set Timing.measureLength = $mlen
  #} ))
\new Staff \with{\consists Measure_grouping_engraver}
\relative { 
\aksak #'(3 2 3 2 16) % beat and measure grouping are perfect
% but how can I achieve to show 10/16 and not 5/8 as timesignature?
c8 d16 e8 f e16 d8 }

2011/6/21 Stefan Thomas <address@hidden>

Dear Xavier,
Yes, I think the second snippet isn't far awy from what I would like to do.
But I would like to get a code, that alows me to use the same syntax like before \aksak #'(timesignature ) #'(beatgroup ) ) and this I can't do with the code in this link.

2011/6/21 Xavier Scheuer <address@hidden>

On 21 June 2011 12:46, Stefan Thomas <address@hidden> wrote:
>
> Dear community,
> in version 2.12.3 I used this code (I think written by Graham) for so called
> aksak-meters like 7/8 (2+2+3) etc.:
>
> %%% example for aksak:
> \version "2.12.0"
> aksak = #(define-music-function
>   (parser layout timesig compound) (list? list?)
>   #{
>     % measure length + beaming
>     \set Timing.timeSignatureFraction = #(cons (car $timesig) (cadr
> $timesig))
>     \set Timing.beatLength = #(ly:make-moment 1 (cadr $timesig) 0 1)
>     \set Timing.beatGrouping = $compound
>     \set Timing.measureLength = #(ly:make-moment (car $timesig) (cadr
> $timesig) 0 1)
>   #})
>
> \new Staff \relative { \aksak #'(5 16 ) #'(3 2 ) c16 d e f d }
> % end of example
> Unfortunately this code doesn't work in version 2.14.1.
> I tried to update it, with convert.ly and by hand, but without sucess.
> Could someone give me a hint?

There is a snippet called "Compound time signatures" in
NR 1.2.3 Displaying rhythms > Time signature
http://lilypond.org/doc/v2.14/Documentation/notation/displaying-rhythms#time-signature

or "Complex compound time signatures" in the LSR:
http://lsr.dsi.unimi.it/LSR/Item?id=743

Does one of them correspond to your "aksak-meter"?

Cheers,
Xavier

--
Xavier Scheuer <address@hidden>