---

Step * 1 of Lemma es-cut-add-at


1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ c+e(loc(e)) = (c(loc(e)) @ [e]) ∈ ({e':E(X)| loc(e') = loc(e) ∈ Id}  List)
BY
{ (Using [`R',⌈λx,y. x ≤loc y ⌉] (BLemma `sorted-by-unique` )⋅ THEN Auto) }

1
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ Trans({e':E(X)| loc(e') = loc(e) ∈ Id} ;a,b.(λx,y. x ≤loc y ) a b)

2
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ AntiSym({e':E(X)| loc(e') = loc(e) ∈ Id} ;a,b.(λx,y. x ≤loc y ) a b)

3
.....wf..... 
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ c+e(loc(e)) ∈ {e':E(X)| loc(e') = loc(e) ∈ Id}  List

4
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ set-equal({e':E(X)| loc(e') = loc(e) ∈ Id} ;c+e(loc(e));c(loc(e)) @ [e])

5
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ sorted-by(λx,y. x ≤loc y ;c(loc(e)) @ [e])

6
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ no_repeats({e':E(X)| loc(e') = loc(e) ∈ Id} ;c(loc(e)) @ [e])

7
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ sorted-by(λx,y. x ≤loc y ;c+e(loc(e)))

8
1. Info : Type
2. es : EO+(Info)
3. X : EClass(Top)
4. f : sys-antecedent(es;X)
5. c : Cut(X;f)
6. e : E(X)
7. (¬((f e) = e ∈ E(X))) ⇒ f e ∈ c
8. (↑e ∈b prior(X)) ⇒ prior(X)(e) ∈ c
9. ¬e ∈ c
10. c+e ∈ Cut(X;f)
11. c+e ∈ fset(E)
⊢ no_repeats({e':E(X)| loc(e') = loc(e) ∈ Id} ;c+e(loc(e)))

---

Latex:

---

Latex:

1.  Info  :  Type
2.  es  :  EO+(Info)
3.  X  :  EClass(Top)
4.  f  :  sys-antecedent(es;X)
5.  c  :  Cut(X;f)
6.  e  :  E(X)
7.  (\mneg{}((f  e)  =  e))  {}\mRightarrow{}  f  e  \mmember{}  c
8.  (\muparrow{}e  \mmember{}\msubb{}  prior(X))  {}\mRightarrow{}  prior(X)(e)  \mmember{}  c
9.  \mneg{}e  \mmember{}  c
10.  c+e  \mmember{}  Cut(X;f)
11.  c+e  \mmember{}  fset(E)
\mvdash{}  c+e(loc(e))  =  (c(loc(e))  @  [e])


By

---

Latex:
(Using  [`R',\mkleeneopen{}\mlambda{}x,y.  x  \mleq{}loc  y  \mkleeneclose{}]  (BLemma  `sorted-by-unique`  )\mcdot{}  THEN  Auto)

---

Home Index