-Moment
-Music_wrapper::get_length () const
-{
- return element ()->get_length ();
-}
-
-Pitch
-Music_wrapper::to_relative_octave (Pitch p)
-{
- return element ()->to_relative_octave (p);
-}
-
-
-Music*
-Music_wrapper::element () const
-{
- return unsmob_music (get_mus_property ("element"));
-}
-
-void
-Music_wrapper::compress (Moment m)
-{
- element ()->compress (m);
-}
-
-ADD_MUSIC (Music_wrapper);
-
-
-Moment
-Music_wrapper::start_mom () const
-{
- return element ()->start_mom ();
-}