---

Step * 1 1 1 1 1 3 2 1 of Lemma lg-acyclic-well-founded


1. T : Type
2. n : ℤ@i
3. 0 < n@i
4. ∀g:LabeledGraph(T). (lg-size(g) < n - 1 ⇒ lg-acyclic(g) ⇒ SWellFounded(lg-edge(g;a;b)))@i
5. g : LabeledGraph(T)@i
6. lg-size(g) < n@i
7. lg-acyclic(g)@i
8. 0 < lg-size(g)
9. i : ℕlg-size(g)
10. ∀[j:ℕlg-size(g)]. (¬lg-edge(g;j;i))
11. f : ℕlg-size(lg-remove(g;i)) ⟶ ℕ
12. ∀a,b:ℕlg-size(lg-remove(g;i)).  (lg-edge(lg-remove(g;i);a;b) ⇒ f a < f b)
13. a : ℕlg-size(g)@i
14. b : ℕlg-size(g)@i
15. lg-edge(g;a;b)@i
16. a = i ∈ ℤ
⊢ if a <z i then (f a) + 1 else 0 fi  < if b <z i then (f b) + 1
if (b =z i) then 0
else (f (b - 1)) + 1
fi 
BY
{ (RepeatFor 2 (AutoSplit) THEN Auto' THEN Try ((Auto THEN RWO "lg-size-remove" 0⋅ THEN Auto))) }

1
1. T : Type
2. n : ℤ@i
3. 0 < n@i
4. ∀g:LabeledGraph(T). (lg-size(g) < n - 1 ⇒ lg-acyclic(g) ⇒ SWellFounded(lg-edge(g;a;b)))@i
5. g : LabeledGraph(T)@i
6. lg-size(g) < n@i
7. lg-acyclic(g)@i
8. 0 < lg-size(g)
9. i : ℕlg-size(g)
10. ∀[j:ℕlg-size(g)]. (¬lg-edge(g;j;i))
11. f : ℕlg-size(lg-remove(g;i)) ⟶ ℕ
12. ∀a,b:ℕlg-size(lg-remove(g;i)).  (lg-edge(lg-remove(g;i);a;b) ⇒ f a < f b)
13. a : ℕlg-size(g)@i
14. ¬a < i
15. b : ℕlg-size(g)@i
16. lg-edge(g;a;b)@i
17. a = i ∈ ℤ
18. b < i
⊢ 0 < (f b) + 1

2
1. T : Type
2. n : ℤ@i
3. 0 < n@i
4. ∀g:LabeledGraph(T). (lg-size(g) < n - 1 ⇒ lg-acyclic(g) ⇒ SWellFounded(lg-edge(g;a;b)))@i
5. g : LabeledGraph(T)@i
6. lg-size(g) < n@i
7. lg-acyclic(g)@i
8. 0 < lg-size(g)
9. i : ℕlg-size(g)
10. ∀[j:ℕlg-size(g)]. (¬lg-edge(g;j;i))
11. f : ℕlg-size(lg-remove(g;i)) ⟶ ℕ
12. ∀a,b:ℕlg-size(lg-remove(g;i)).  (lg-edge(lg-remove(g;i);a;b) ⇒ f a < f b)
13. a : ℕlg-size(g)@i
14. ¬a < i
15. b : ℕlg-size(g)@i
16. ¬b < i
17. lg-edge(g;a;b)@i
18. a = i ∈ ℤ
⊢ 0 < if (b =z i) then 0 else (f (b - 1)) + 1 fi 

---

Latex:

---

Latex:

1.  T  :  Type
2.  n  :  \mBbbZ{}@i
3.  0  <  n@i
4.  \mforall{}g:LabeledGraph(T).  (lg-size(g)  <  n  -  1  {}\mRightarrow{}  lg-acyclic(g)  {}\mRightarrow{}  SWellFounded(lg-edge(g;a;b)))@i
5.  g  :  LabeledGraph(T)@i
6.  lg-size(g)  <  n@i
7.  lg-acyclic(g)@i
8.  0  <  lg-size(g)
9.  i  :  \mBbbN{}lg-size(g)
10.  \mforall{}[j:\mBbbN{}lg-size(g)].  (\mneg{}lg-edge(g;j;i))
11.  f  :  \mBbbN{}lg-size(lg-remove(g;i))  {}\mrightarrow{}  \mBbbN{}
12.  \mforall{}a,b:\mBbbN{}lg-size(lg-remove(g;i)).    (lg-edge(lg-remove(g;i);a;b)  {}\mRightarrow{}  f  a  <  f  b)
13.  a  :  \mBbbN{}lg-size(g)@i
14.  b  :  \mBbbN{}lg-size(g)@i
15.  lg-edge(g;a;b)@i
16.  a  =  i
\mvdash{}  if  a  <z  i  then  (f  a)  +  1  else  0  fi    <  if  b  <z  i  then  (f  b)  +  1
if  (b  =\msubz{}  i)  then  0
else  (f  (b  -  1))  +  1
fi 


By

---

Latex:
(RepeatFor  2  (AutoSplit)  THEN  Auto'  THEN  Try  ((Auto  THEN  RWO  "lg-size-remove"  0\mcdot{}  THEN  Auto)))

---

Home Index