[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: RhythmicStaff issues in a snippet
From: |
David Kastrup |
Subject: |
Re: RhythmicStaff issues in a snippet |
Date: |
Fri, 20 Jul 2012 17:39:04 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.1.50 (gnu/linux) |
Dominique Faure <address@hidden> writes:
> Hi,
> I released the following snippet in the LSR:
> http://lsr.dsi.unimi.it/LSR/Item?id=848
>
> Sadly, it lacks some features I'd really like to have but couldn't
> manage to provide (I hope some of you could help me to).
>
> Having to give both the melodic and the rhythmic definitions is quite
> cumbersome. Despite the RhythmicStaff is simplifying the process, how
> could I make it display chord of dotted notes as single dotted notes?
> Dots are kept unmerged. Is it a bug?
Calling it a bug seems like a reasonable interpretation of the
behavior. You might want to pass your music through the following music
function. It goes to a bit of effort to make sure that accents survive.
thinout =
#(define-music-function (parser location music) (ly:music?)
(for-some-music
(lambda (m)
(and (music-is-of-type? m 'event-chord)
(let ((elts (ly:music-property m 'elements)))
(if (pair? elts)
(set-cdr!
elts
(filter!
(lambda (m) (not (ly:music-property m 'duration #f)))
(cdr elts))))
#t)))
music)
music)
\new RhythmicStaff
\thinout
\relative c { <d, g d'>4 e f8 g a4 <d b g>2. c4 d4. e8 f4 g }
--
David Kastrup