[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
augmentation dot Y position on merged note heads
From: |
Wendl, Arnold |
Subject: |
augmentation dot Y position on merged note heads |
Date: |
Mon, 17 Sep 2012 08:51:33 +0200 |
>Old bug, no existing issue found.
>Output is not the standard (e.g. compared with Beethoven score 'Musik zu einem
>Ritterballett', WoO 1, Henle Verlag)
Error description:
The augmentation dot for merged note heads on a staff line
should be above the staff line by default,
but in all tested version 2.12.3, 2.14.2, 2.16.0 it is below.
Example:
{ << { d''2. } \\ { d''2. } >> }
As workaround I could define the following override - but I may run into
problems with ties (old issue 590 ?):
#(define (dots-staff-std-pos grob)
(let*
((head (ly:grob-parent grob Y))
; (log (ly:grob-property head 'duration-log))
(ypos (+ 0.75 (ly:grob-property head 'Y-offset)))
(erg (* 2 (- ypos 0.25 (floor ypos))))
)
; (for-each display (list "\n Y-offset = " ypos " --> erg = " erg " "))
erg))
D = \once \override Dots #'staff-position = #dots-staff-std-pos
{
<< d''2. \\ \D d''2. >> r4 % good
<< { d''4. ~ d'' } \\ { \D d''4. ~ \D d'' } >> % collision of
% augmentation dot and upper tie
}
ArnoldTheresius
- augmentation dot Y position on merged note heads,
Wendl, Arnold <=