(interval-widen xext (/ width 2)) (interval-widen yext (/ width 2))))) (define- public (make-filled-box-stencil xext yext) "Make a filled box.
lilypond.org/cygwin/release/lilypond/x/usr/…/stencil.scm