26 Jul 2007 21:00:59 +0200, Arvid Grøtting <[EMAIL PROTECTED]>:

\version "2.11.28" % should work on versions all the way back to 2.8

looksFaster = #(define-music-function (parser location music)
                                    (ly:music?)
            (let ((new-music (ly:music-deep-copy music)))
             (shift-duration-log new-music 1 0)
             new-music))

\score { \looksFaster { a4. b4 c b8 a g a4 b8 a }}

Looks great!
I added it to the LSR.
http://lsr.dsi.unimi.it/LSR/Item?u=1&id=305

Regards,
Valentin


_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to