---

Step * 1 of Lemma permr_hd_cancel


1. T : Type
2. a : T
3. bs : T List
4. bs' : T List
5. [a / bs] ≡(T) [a / bs']
⊢ bs ≡(T) bs'
BY
{ ((D 5 THEN D 6) THEN D 0) }

1
1. T : Type
2. a : T
3. bs : T List
4. bs' : T List
5. ||[a / bs]|| = ||[a / bs']|| ∈ ℤ
6. p : Sym(||[a / bs]||)
7. ∀i:ℕ||[a / bs]||. ([a / bs][p.f i] = [a / bs'][i] ∈ T)
⊢ ||bs|| = ||bs'|| ∈ ℤ

2
1. T : Type
2. a : T
3. bs : T List
4. bs' : T List
5. ||[a / bs]|| = ||[a / bs']|| ∈ ℤ
6. p : Sym(||[a / bs]||)
7. ∀i:ℕ||[a / bs]||. ([a / bs][p.f i] = [a / bs'][i] ∈ T)
8. ||bs|| = ||bs'|| ∈ ℤ
⊢ ∃p:Sym(||bs||). ∀i:ℕ||bs||. (bs[p.f i] = bs'[i] ∈ T)

---

Latex:

---

Latex:

1.  T  :  Type
2.  a  :  T
3.  bs  :  T  List
4.  bs'  :  T  List
5.  [a  /  bs]  \mequiv{}(T)  [a  /  bs']
\mvdash{}  bs  \mequiv{}(T)  bs'


By

---

Latex:
((D  5  THEN  D  6)  THEN  D  0)

---

Home Index