Proof
fun (A : Ens) (P : Ens -> Prop) (X : Ens) (h : IN X (Set_Of A P)) =>
remaining_property P A X (Set_Of_pr2 A P X h).

Theorem Set_Of_th3 :
forall (A : Ens) (P : Ens -> Prop) (X : Ens) (h : IN X (Set_Of A P)), IN X A.