+ last_len.grace_part_ = Rational (0);
+ cumulative += last_len;
+
+ return cumulative;
+}
+
+Moment
+Music_sequence::maximum_length (SCM l)
+{
+ Moment dur = 0;
+ for (SCM s = l; scm_is_pair (s); s = scm_cdr (s))
+ {
+ Music *m = unsmob_music (scm_car (s));
+ Moment l = m->get_length ();
+ dur = max (dur, l);