proposition: Lemma free_convType_mor_comp_fun (A B C : CC) (g : {hom B, C}) (h : {hom A, B}) : free_convType_mor [hom g \o h] = (free_convType_mor g) \o (free_convType_mor h) :> (_ -> _).
proof: Proof. by rewrite free_convType_mor_comp. Qed.
imports: Reals mathcomp(all_ssreflect) mathcomp(boolp classical_sets) mathcomp(finmap) infotheo(Reals_ext classical_sets_ext ssrR ssr_ext) infotheo(fdist fsdist convex necset) monae_lib HB(structures) category