(*****  StrictSUB *****)


Record StrictSUB (A B : Ens) : Prop := 
  {StrictSUB_sub : SUB A B; StrictSUB_neq : ~ EQ A B}.(*****  StrictSUB *****)


Record StrictSUB (A B : Ens) : Prop := 
  {StrictSUB_sub : SUB A B; StrictSUB_neq : ~ EQ A B}.(*****  StrictSUB *****)


Record StrictSUB (A B : Ens) : Prop := 
  {StrictSUB_sub : SUB A B; StrictSUB_neq : ~ EQ A B}.

Theorem EmptySet_th2 : forall A : Ens, SUB EmptySet A.