proposition: Lemma parttuplePK sh : part_fromtuple (parttupleP sh) = sh.
proof: Proof. by apply val_inj; rewrite /= parttupleK. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(div ssralg ssrint ssrnum binomial) tools combclass sorted ordtype