+ \new Staff {
+ \set Staff.instrument = "orig"
+ \original
+ }
+ \new Staff \relative c'' <<
+ \set Staff.instrument = "orig+quote"
+ \set Staff.quotedEventTypes = #'(note-event articulation-event)
+ \original
+ \new Voice {
+ s4
+ \set fontSize = #-4
+ \override Stem #'length-fraction = #(magstep -4)
+ \quoteDuring #"quoteMe" { \skip 2. }
+ }
+ >>
+>>