---

Step * 1 1 of Lemma equipollent-distinct-representatives

.....assertion..... 
1. [A] : Type
2. [E] : A ⟶ A ⟶ ℙ
3. EquivRel(A;x,y.E[x;y])
4. L : A List
5. (∀a,b∈L.  ¬E[a;b])
6. ∀a:A. (∃b∈L. E[a;b])
⊢ ∃f:A ⟶ ℕ||L||. ((∀a,b:A.  ((f a) = (f b) ∈ ℕ||L|| ⇐⇒ E[a;b])) ∧ (∀i:ℕ||L||. ∃a:A. ((f a) = i ∈ ℕ||L||)))
BY
{ (Unfold `l_exists` -1 THEN (Skolemize (-1) `rep' THENA Auto')) }

1
1. [A] : Type
2. [E] : A ⟶ A ⟶ ℙ
3. EquivRel(A;x,y.E[x;y])
4. L : A List
5. (∀a,b∈L.  ¬E[a;b])
6. ∀a:A. ∃i:ℕ||L||. E[a;L[i]]
7. rep : a:A ⟶ ℕ||L||
8. ∀a:A. E[a;L[rep a]]
⊢ ∃f:A ⟶ ℕ||L||. ((∀a,b:A.  ((f a) = (f b) ∈ ℕ||L|| ⇐⇒ E[a;b])) ∧ (∀i:ℕ||L||. ∃a:A. ((f a) = i ∈ ℕ||L||)))

---

Latex:

---

Latex:
.....assertion..... 
1.  [A]  :  Type
2.  [E]  :  A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbP{}
3.  EquivRel(A;x,y.E[x;y])
4.  L  :  A  List
5.  (\mforall{}a,b\mmember{}L.    \mneg{}E[a;b])
6.  \mforall{}a:A.  (\mexists{}b\mmember{}L.  E[a;b])
\mvdash{}  \mexists{}f:A  {}\mrightarrow{}  \mBbbN{}||L||.  ((\mforall{}a,b:A.    ((f  a)  =  (f  b)  \mLeftarrow{}{}\mRightarrow{}  E[a;b]))  \mwedge{}  (\mforall{}i:\mBbbN{}||L||.  \mexists{}a:A.  ((f  a)  =  i)))


By

---

Latex:
(Unfold  `l\_exists`  -1  THEN  (Skolemize  (-1)  `rep'  THENA  Auto'))

---

Home Index