+}
+
+Grob *
+Note_column::first_head (Grob *me)
+{
+ Grob *st = get_stem (me);
+ return st ? Stem::first_head (st) : 0;
+}
+
+/*
+ Return the first Accidentals grob that we find in a note-head.
+*/
+Grob *
+Note_column::accidentals (Grob *me)
+{
+ extract_grob_set (me, "note-heads", heads);
+ Grob *acc = 0;
+ for (vsize i = 0; i < heads.size (); i++)