fact: Definition fsfun_comp g f : {fsfun _} := [fsfun[fsfun_comp_key] k in finsupp f `|` finsupp g => g (f k)].
imports: HB(structures) mathcomp(ssreflect ssrbool ssrnat eqtype ssrfun seq) mathcomp(choice path finset finfun fintype bigop)