Definition has_geq_2_elements (A : Ens) := ~ has_leq_1_elements A.Definition when_given_two_distinct_elements_Out : False := m (h X Y k l).

Theorem has_geq_2_elements_th1 : forall (A X Y : Ens) (k : IN X A) (l : IN Y A) (m : ~ EQ X Y), has_geq_2_elements A.