Step * of Lemma setmem_functionality_1

s,x1,x2:coSet{i:l}.  (seteq(x1;x2)  ((x1 ∈ s) ⇐⇒ (x2 ∈ s)))
BY
(UseWitness ⌜λs,x1,x2,eq. (setmemfunc(x1; s; x2; s) eq (seteqweaken(s) Ax))⌝⋅
   THEN Auto
   THEN InstLemma `seteqweaken_wf` [⌜s⌝;⌜s⌝]⋅
   THEN Auto) }


Latex:


Latex:
\mforall{}s,x1,x2:coSet\{i:l\}.    (seteq(x1;x2)  {}\mRightarrow{}  ((x1  \mmember{}  s)  \mLeftarrow{}{}\mRightarrow{}  (x2  \mmember{}  s)))


By


Latex:
(UseWitness  \mkleeneopen{}\mlambda{}s,x1,x2,eq.  (setmemfunc(x1;  s;  x2;  s)  eq  (seteqweaken(s)  Ax))\mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  InstLemma  `seteqweaken\_wf`  [\mkleeneopen{}s\mkleeneclose{};\mkleeneopen{}s\mkleeneclose{}]\mcdot{}
  THEN  Auto)




Home Index