fact: Definition rel_codomain := forall a b, In DA a -> Rf a b -> In DB b.
imports: Coq(ClassicalDescription Ensembles Image ProofIrrelevance) ZornsLemma(EnsemblesImplicit FunctionProperties ImageImplicit) hydras(MoreEpsilonIota)