- return mol;
-}
-
-MAKE_SCHEME_CALLBACK (Stem_tremolo, print, 1);
-SCM
-Stem_tremolo::print (SCM grob)
-{
- Grob *me = unsmob_grob (grob);
-
- Stencil s = translated_stencil (me, robust_scm2double (me->get_property ("slope"), 0.25));
- return s.smobbed_copy ();