Step
*
1
2
1
of Lemma
f-subset-singleton
1. A : Type
2. eq : EqDecider(A)
3. a : A
4. x : fset(A)
5. ∀a@0:A. a@0 = a ∈ A supposing a@0 ∈ x
6. ¬↑fset-null(x)
7. a1 : A
8. a1 ∈ {a}
⊢ a1 ∈ x
BY
{ ((RWO "member-fset-singleton" (-1) THENA Auto) THEN (HypSubst' (-1) 0 THEN Auto) THEN ThinVar `a1') }
1
1. A : Type
2. eq : EqDecider(A)
3. a : A
4. x : fset(A)
5. ∀a@0:A. a@0 = a ∈ A supposing a@0 ∈ x
6. ¬↑fset-null(x)
⊢ a ∈ x
Latex:
Latex:
1.  A  :  Type
2.  eq  :  EqDecider(A)
3.  a  :  A
4.  x  :  fset(A)
5.  \mforall{}a@0:A.  a@0  =  a  supposing  a@0  \mmember{}  x
6.  \mneg{}\muparrow{}fset-null(x)
7.  a1  :  A
8.  a1  \mmember{}  \{a\}
\mvdash{}  a1  \mmember{}  x
By
Latex:
((RWO  "member-fset-singleton"  (-1)  THENA  Auto)  THEN  (HypSubst'  (-1)  0  THEN  Auto)  THEN  ThinVar  `a1')
Home
Index