Re: Typo in Snippets 2.11.39: compound-time example

[Mats Bengtsson]

Are you sure that you understand how the compound-time Scheme function
works? The last parameter should be the denominator, i.e. "8".
When you included Hans' proposed change, the denominators end up
being 2 instead of 8. If I understand Hans correctly, there should be 11 
terms
in the time signature, whereas the current definition of the Scheme 
function
only gives 10 terms. So the example should rather be changed into

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


melody =
{         \relative c'' {
       \set Staff.instrumentName = "Bb Sop."
       \key g \major \time 25/8
     \override Staff.TimeSignature #'stencil = #ly:text-interface::print
 \override Staff.TimeSignature #'text = #(compound-time "3" "2" "2" "3" 
"2" "2" "2" "2 " "3" "2" "2" "8" )
       \set Staff.beatGrouping = #'(3 2 2 3 2 2 2 2 3 2 2)
       #(override-auto-beam-setting '(end * * 25 8) 3 8)
       #(override-auto-beam-setting '(end * * 25 8) 5 8)
       #(override-auto-beam-setting '(end * * 25 8) 7 8)
       #(override-auto-beam-setting '(end * * 25 8) 10 8)
       #(override-auto-beam-setting '(end * * 25 8) 12 8)
       #(override-auto-beam-setting '(end * * 25 8) 14 8)
       #(override-auto-beam-setting '(end * * 25 8) 16 8)
       #(override-auto-beam-setting '(end * * 25 8) 18 8)
       #(override-auto-beam-setting '(end * * 25 8) 21 8)
       #(override-auto-beam-setting '(end * * 25 8) 23 8)

       c8 c c d4 c8 c b c b a4 g fis8 e d c b' c d e4-^ fis8 g | \break
       c,4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
       c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break
       c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
       c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break }
}
drum = {
       \new DrumStaff \drummode
       {
               \bar "|:" bd4. ^\markup { "Drums" } sn4 bd \bar ":" sn4. 
bd4 sn \bar ":"
               bd sn bd4. sn4 bd \bar ":|"
       }
}

{
\melody
\drum
}


Note that I also defined automatic beaming patterns and remove the 
manual beams.

   /Mats

Valentin Villenave wrote:
> 2008/2/28 Hans Aberg <address@hidden>:
>   
> > There seems to be a typo in Snippets 2.11.39, pp. 21-22: There should
> >  be an extra "2" between the two last "3"s to get the 25/8 Sedi Donka
> >  rhythm used there. (One way to remember it, is as a compound of 7 = 3
> >  +2+2+ and 11=2+2+3+2+2.)
> >     
>
> Oh yes! Thanks for teaching me how to count :)
>
>   
> >  So on p. 21, it should be:
> >  \override Staff.TimeSignature #'text = #(compound-time "3" "2" "2"
> >  "3" "2" "2" "2" "2" "3" "2" "2")
> >     
>
> It's corrected.
>
> Cheers,
> Valentin
>
>
> _______________________________________________
> bug-lilypond mailing list
> address@hidden
> http://lists.gnu.org/mailman/listinfo/bug-lilypond
>   

--
=============================================
        Mats Bengtsson
        Signal Processing
        School of Electrical Engineering
        Royal Institute of Technology (KTH)
        SE-100 44  STOCKHOLM
        Sweden
        Phone: (+46) 8 790 8463                         
       Fax:   (+46) 8 790 7260
        Email: address@hidden
        WWW: http://www.s3.kth.se/~mabe
=============================================