> I was thinking about this just yesterday. Here's a reasonable solution:
Fantastic! I refactored the code to make it easier to change the parameters: #(define (variable-slur-thickness min-l max-l min-t max-t) (lambda (grob) (let* ((cpt (ly:grob-property grob 'control-points)) (cp0 (car cpt)) (cp3 (cadddr cpt)) (x0 (car cp0)) (y0 (cdr cp0)) (x1 (car cp3)) (y1 (cdr cp3)) (len (sqrt (+ (expt (- x1 x0) 2) (expt (- y1 y0) 2)))) (thickness (if (<= len max-l) (if (< len min-l) min-t (+ min-t (* (- len min-l) (/ (- max-t min-t) (- max-l min-l))))) max-t))) (ly:grob-set-property! grob 'thickness thickness) ) )) \layout { \override Slur.after-line-breaking = #(variable-slur-thickness 3 10 1.4 2.7) } > P.S. Some of the power users on this list filter inline images, so if you > wouldn't mind making the image an attachment next time, I know they'll > appreciate it. :-) Thanks, will do! Thanks, Sharon -- View this message in context: http://lilypond.1069038.n5.nabble.com/Variable-slur-thickness-tp188374p188378.html Sent from the User mailing list archive at Nabble.com. _______________________________________________ lilypond-user mailing list lilypond-user@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-user