let merge_marks = MarkPair.merge_all