Step
*
of Lemma
setmem-singleset
∀a,x:coSet{i:l}.  ((x ∈ {a}) 
⇐⇒ seteq(x;a))
BY
{ ((Intros THEN Unfold `singleset` 0)
   THEN Fold `mk-coset` 0
   THEN (RWO "setmem-mk-coset" 0 THENA Auto)
   THEN Reduce 0
   THEN Auto
   THEN ExRepD
   THEN Auto
   THEN D 0 With ⌜⋅⌝ 
   THEN Auto) }
Latex:
Latex:
\mforall{}a,x:coSet\{i:l\}.    ((x  \mmember{}  \{a\})  \mLeftarrow{}{}\mRightarrow{}  seteq(x;a))
By
Latex:
((Intros  THEN  Unfold  `singleset`  0)
  THEN  Fold  `mk-coset`  0
  THEN  (RWO  "setmem-mk-coset"  0  THENA  Auto)
  THEN  Reduce  0
  THEN  Auto
  THEN  ExRepD
  THEN  Auto
  THEN  D  0  With  \mkleeneopen{}\mcdot{}\mkleeneclose{} 
  THEN  Auto)
Home
Index