---

Step * 1 3 1 2 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))
14. x : T
15. y : T
16. x before y ∈ v1
17. x = u ∈ T
18. (y ∈ v)
⊢ x before y ∈ v
BY
{ xxx(((InstHyp [⌜u⌝] (-6))⋅ THENA Auto)
      THEN (D (-1))
      THEN (D (-1))
      THEN Auto
      THEN (RevHypSubst (-3) 0)
      THEN Auto
      THEN (FLemma `l_before_member2` [(-4)])
      THEN Auto)xxx }

---

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))
14.  x  :  T
15.  y  :  T
16.  x  before  y  \mmember{}  v1
17.  x  =  u
18.  (y  \mmember{}  v)
\mvdash{}  x  before  y  \mmember{}  v


By

---

Latex:
xxx(((InstHyp  [\mkleeneopen{}u\mkleeneclose{}]  (-6))\mcdot{}  THENA  Auto)
        THEN  (D  (-1))
        THEN  (D  (-1))
        THEN  Auto
        THEN  (RevHypSubst  (-3)  0)
        THEN  Auto
        THEN  (FLemma  `l\_before\_member2`  [(-4)])
        THEN  Auto)xxx

---

Home Index