proposition: Lemma card_intpartn sm : #|{:'P_sm}| = intpartn_nb sm.
proof: Proof. by rewrite [#|_|]cardT -(size_map val) /= enum_intpartnE -size_enum_partn. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(div ssralg ssrint ssrnum binomial) tools combclass sorted ordtype