+ 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));
+ if (!m)
+ programming_error ("Music sequence should have music elements");
+ else