embellish = #(define-music-function (mus) (ly:music?) #{ \once\override Accidental.stencil = #(lambda (grob) (grob-interpret-markup grob (markup #:score #{ \score { \grace { #mus } \layout { \context { \Staff \remove Clef_engraver \remove Time_signature_engraver } } } #}))) \once\override Accidental.Y-offset = #(lambda (grob) (let* ((par (ly:grob-parent grob Y)) (par-Y (ly:grob-property par 'Y-offset))) (- par-Y))) #}) << \new Staff { c'8 d' \embellish { c'16 d' e' } f'!4 \embellish { d'16 e' f' } g'!4 } \new Staff { c'16 d' e' d' e' d' c' d' f' e' d' c' } >>