---

Step * 2 2 of Lemma fset-add-as-cons


1. T : Type
2. eq : EqDecider(T)
3. s : fset(T)
4. x : T
5. [x / s] ∈ fset(T)
6. a : T
7. a ∈ [x / s]
⊢ (a = x ∈ T) ∨ a ∈ s
BY
{ (MoveToConcl (-1)
   THEN RepUR ``fset-member`` 0
   THEN (BoolCase ⌜eq x a⌝⋅ THENA Auto)
   THEN Fold `fset-member` 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  s  :  fset(T)
4.  x  :  T
5.  [x  /  s]  \mmember{}  fset(T)
6.  a  :  T
7.  a  \mmember{}  [x  /  s]
\mvdash{}  (a  =  x)  \mvee{}  a  \mmember{}  s


By

---

Latex:
(MoveToConcl  (-1)
  THEN  RepUR  ``fset-member``  0
  THEN  (BoolCase  \mkleeneopen{}eq  x  a\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  Fold  `fset-member`  0
  THEN  Auto)

---

Home Index