---

Step * 1 1 1 1 1 of Lemma bag-member-single


1. T : Type
2. x : T
3. y : T
4. L : T List
5. L = [y] ∈ pertype(λas,bs. ((as ∈ T List) ∧ (bs ∈ T List) ∧ permutation(T;as;bs)))
6. L ∈ T List
7. [y] ∈ T List
8. f : ℕ1 ⟶ ℕ1
9. Inj(ℕ1;ℕ1;f) ∧ ([y] = (L o f) ∈ (T List))
10. (x ∈ L)
11. ||L|| = 1 ∈ ℤ
⊢ x = y ∈ T
BY
{ (RepeatFor 2 (D (-2)) THEN HypSubst' (-1) (-3) THEN Auto) }

1
1. T : Type
2. x : T
3. y : T
4. L : T List
5. L = [y] ∈ pertype(λas,bs. ((as ∈ T List) ∧ (bs ∈ T List) ∧ permutation(T;as;bs)))
6. L ∈ T List
7. [y] ∈ T List
8. f : ℕ1 ⟶ ℕ1
9. Inj(ℕ1;ℕ1;f)
10. [y] = (L o f) ∈ (T List)
11. i : ℕ
12. i < 1
13. x = L[i] ∈ T
14. ||L|| = 1 ∈ ℤ
⊢ x = y ∈ T

---

Latex:

---

Latex:

1.  T  :  Type
2.  x  :  T
3.  y  :  T
4.  L  :  T  List
5.  L  =  [y]
6.  L  \mmember{}  T  List
7.  [y]  \mmember{}  T  List
8.  f  :  \mBbbN{}1  {}\mrightarrow{}  \mBbbN{}1
9.  Inj(\mBbbN{}1;\mBbbN{}1;f)  \mwedge{}  ([y]  =  (L  o  f))
10.  (x  \mmember{}  L)
11.  ||L||  =  1
\mvdash{}  x  =  y


By

---

Latex:
(RepeatFor  2  (D  (-2))  THEN  HypSubst'  (-1)  (-3)  THEN  Auto)

---

Home Index