fact: Definition free_choiceType_mor (T U : CT) (f : {hom T, U}) : {hom m T, m U} := hom_choiceType (f : m T -> m U).
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