+ else
+ {
+ return church_rest (me, musfont, measures, space);
+ }
+}
+
+
+
+Molecule
+Multi_measure_rest::big_rest (Grob *me, Real width)
+{
+ Real tthick = gh_scm2double (me->get_grob_property ("thick-thickness"));
+ Real hair_thick = gh_scm2double (me->get_grob_property ("hair-thickness"));
+
+
+ Real ss = Staff_symbol_referencer::staff_space (me);
+
+ Real slt = me->get_paper ()->get_var ("linethickness");
+ Real y = slt * tthick/2 * ss;
+ Real ythick = hair_thick * slt * ss;
+ Box b(Interval (0, width - 2 * ythick), Interval (-y, y));
+
+ Molecule m = Lookup::filledbox (b);
+ Molecule yb = Lookup::filledbox (Box (Interval (-0.5, 0.5)* ythick, Interval (-ss, ss)));
+
+ m.add_at_edge (X_AXIS, RIGHT, yb, 0, 0);
+ m.add_at_edge (X_AXIS, LEFT, yb, 0, 0);
+
+ m.align_to (X_AXIS, LEFT);
+
+ return m;
+}
+
+/*
+ Kirchenpause (?)
+ */
+Molecule
+Multi_measure_rest::church_rest (Grob*me, Font_metric *musfont, int measures,
+ Real space)
+{
+ SCM mols = SCM_EOL;
+
+ /*
+ see Wanske pp. 125
+ */
+ int l = measures;
+ int count = 0;
+ Real symbols_width = 0.0;
+
+ SCM sml = me->get_grob_property ("use-breve-rest");
+
+ while (l)