---

Step * 1 3 1 2 of Lemma no_repeats-before-equality


1. T : Type
2. u : T
3. v : T List
4. ∀bs:T List
     (no_repeats(T;v)
     ⇒ no_repeats(T;bs)
     ⇒ (∀x:T. ((x ∈ v) ⇐⇒ (x ∈ bs)))
     ⇒ (∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ bs))
     ⇒ (v = bs ∈ (T List)))
5. u1 : T
6. v1 : T List
7. no_repeats(T;v)
8. ¬(u ∈ v)
9. no_repeats(T;v1)
10. ¬(u1 ∈ v1)
11. ∀x:T. ((x = u ∈ T) ∨ (x ∈ v) ⇐⇒ (x = u1 ∈ T) ∨ (x ∈ v1))
12. ∀x,y:T.  (((x = u ∈ T) ∧ (y ∈ v)) ∨ x before y ∈ v ⇐⇒ ((x = u1 ∈ T) ∧ (y ∈ v1)) ∨ x before y ∈ v1)
13. ∀x:T. ((x ∈ v) ⇐⇒ (x ∈ v1))
⊢ [u / v] = [u1 / v1] ∈ (T List)
BY
{ Assert ⌜∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ v1)⌝⋅ }

1
.....assertion..... 
1. T : Type
2. u : T
3. v : T List
4. ∀bs:T List
     (no_repeats(T;v)
     ⇒ no_repeats(T;bs)
     ⇒ (∀x:T. ((x ∈ v) ⇐⇒ (x ∈ bs)))
     ⇒ (∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ bs))
     ⇒ (v = bs ∈ (T List)))
5. u1 : T
6. v1 : T List
7. no_repeats(T;v)
8. ¬(u ∈ v)
9. no_repeats(T;v1)
10. ¬(u1 ∈ v1)
11. ∀x:T. ((x = u ∈ T) ∨ (x ∈ v) ⇐⇒ (x = u1 ∈ T) ∨ (x ∈ v1))
12. ∀x,y:T.  (((x = u ∈ T) ∧ (y ∈ v)) ∨ x before y ∈ v ⇐⇒ ((x = u1 ∈ T) ∧ (y ∈ v1)) ∨ x before y ∈ v1)
13. ∀x:T. ((x ∈ v) ⇐⇒ (x ∈ v1))
⊢ ∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ v1)

2
1. T : Type
2. u : T
3. v : T List
4. ∀bs:T List
     (no_repeats(T;v)
     ⇒ no_repeats(T;bs)
     ⇒ (∀x:T. ((x ∈ v) ⇐⇒ (x ∈ bs)))
     ⇒ (∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ bs))
     ⇒ (v = bs ∈ (T List)))
5. u1 : T
6. v1 : T List
7. no_repeats(T;v)
8. ¬(u ∈ v)
9. no_repeats(T;v1)
10. ¬(u1 ∈ v1)
11. ∀x:T. ((x = u ∈ T) ∨ (x ∈ v) ⇐⇒ (x = u1 ∈ T) ∨ (x ∈ v1))
12. ∀x,y:T.  (((x = u ∈ T) ∧ (y ∈ v)) ∨ x before y ∈ v ⇐⇒ ((x = u1 ∈ T) ∧ (y ∈ v1)) ∨ x before y ∈ v1)
13. ∀x:T. ((x ∈ v) ⇐⇒ (x ∈ v1))
14. ∀x,y:T.  (x before y ∈ v ⇐⇒ x before y ∈ v1)
⊢ [u / v] = [u1 / v1] ∈ (T List)

---

Latex:

---

Latex:

1.  T  :  Type
2.  u  :  T
3.  v  :  T  List
4.  \mforall{}bs:T  List
          (no\_repeats(T;v)
          {}\mRightarrow{}  no\_repeats(T;bs)
          {}\mRightarrow{}  (\mforall{}x:T.  ((x  \mmember{}  v)  \mLeftarrow{}{}\mRightarrow{}  (x  \mmember{}  bs)))
          {}\mRightarrow{}  (\mforall{}x,y:T.    (x  before  y  \mmember{}  v  \mLeftarrow{}{}\mRightarrow{}  x  before  y  \mmember{}  bs))
          {}\mRightarrow{}  (v  =  bs))
5.  u1  :  T
6.  v1  :  T  List
7.  no\_repeats(T;v)
8.  \mneg{}(u  \mmember{}  v)
9.  no\_repeats(T;v1)
10.  \mneg{}(u1  \mmember{}  v1)
11.  \mforall{}x:T.  ((x  =  u)  \mvee{}  (x  \mmember{}  v)  \mLeftarrow{}{}\mRightarrow{}  (x  =  u1)  \mvee{}  (x  \mmember{}  v1))
12.  \mforall{}x,y:T.    (((x  =  u)  \mwedge{}  (y  \mmember{}  v))  \mvee{}  x  before  y  \mmember{}  v  \mLeftarrow{}{}\mRightarrow{}  ((x  =  u1)  \mwedge{}  (y  \mmember{}  v1))  \mvee{}  x  before  y  \mmember{}  v1)
13.  \mforall{}x:T.  ((x  \mmember{}  v)  \mLeftarrow{}{}\mRightarrow{}  (x  \mmember{}  v1))
\mvdash{}  [u  /  v]  =  [u1  /  v1]


By

---

Latex:
Assert  \mkleeneopen{}\mforall{}x,y:T.    (x  before  y  \mmember{}  v  \mLeftarrow{}{}\mRightarrow{}  x  before  y  \mmember{}  v1)\mkleeneclose{}\mcdot{}

---

Home Index