# this heuristic seems to be faulty
        my $min_mm = scalar( uniq(@colbp) ) - 1;