fact: Definition fsinjectiveb : pred {fsfun K -> K} := [pred f | (injectiveb [ffun a : finsupp f => f (val a)]) && [forall a : finsupp f, f (val a) \in finsupp f]].
imports: HB(structures) mathcomp(ssreflect ssrbool ssrnat eqtype ssrfun seq) mathcomp(choice path finset finfun fintype bigop)