proposition: Fact union_intpart_subproof (l : intpart) (k : intpart) : is_part (merge geq l k).
proof: Proof. exact: merge_is_part. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(div ssralg ssrint ssrnum binomial) tools combclass sorted ordtype