+ return ext;
+}
+
+MAKE_SCHEME_CALLBACK (Axis_group_interface, adjacent_pure_heights, 1)
+SCM
+Axis_group_interface::adjacent_pure_heights (SCM smob)
+{
+ Grob *me = unsmob_grob (smob);
+
+ Grob *common = calc_pure_elts_and_common (me);
+ extract_grob_set (me, "pure-relevant-items", items);
+ extract_grob_set (me, "pure-relevant-spanners", spanners);
+
+ Paper_score *ps = get_root_system (me)->paper_score ();
+ vector<vsize> breaks = ps->get_break_indices ();
+ vector<Grob*> cols = ps->get_columns ();
+
+ SCM ret = scm_c_make_vector (breaks.size () - 1, SCM_EOL);
+ vsize it_index = 0;
+ for (vsize i = 0; i + 1 < breaks.size (); i++)