fact: Definition Ex1_2_hD' r r' f := forall x y, inc x (source f) -> inc y (source f) -> gle r' (Vf f x) (Vf f y) -> exists x' y', [/\ Vf f x = Vf f x', Vf f y = Vf f y' & gle r x' y'].
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)