fact: Definition union_intpart (l : intpart) (k : intpart) := IntPart (union_intpart_subproof l k).
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(div ssralg ssrint ssrnum binomial) tools combclass sorted ordtype