let inter_marks = MarkPair.inter_all