---

Step * 1 1 1 1 1 3 2 2 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. a ≠ i
15. b : ℕlg-size(g)@i
16. lg-edge(g;a;b)@i
⊢ if a <z i then (f a) + 1 else (f (a - 1)) + 1 fi  < if b <z i then (f b) + 1
if (b =z i) then 0
else (f (b - 1)) + 1
fi 
BY
{ AutoBoolCase ⌜(b =z i)⌝⋅ }

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. b = i ∈ ℤ
⊢ if a <z i then (f a) + 1 else (f (a - 1)) + 1 fi  < if b <z i then (f b) + 1 else 0 fi 

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
⊢ if a <z i then (f a) + 1 else (f (a - 1)) + 1 fi  < if b <z i then (f b) + 1 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.  a  \mneq{}  i
15.  b  :  \mBbbN{}lg-size(g)@i
16.  lg-edge(g;a;b)@i
\mvdash{}  if  a  <z  i  then  (f  a)  +  1  else  (f  (a  -  1))  +  1  fi    <  if  b  <z  i  then  (f  b)  +  1
if  (b  =\msubz{}  i)  then  0
else  (f  (b  -  1))  +  1
fi 


By

---

Latex:
AutoBoolCase  \mkleeneopen{}(b  =\msubz{}  i)\mkleeneclose{}\mcdot{}

---

Home Index