Step
*
1
2
2
2
1
of Lemma
lg-label-remove
.....equality..... 
1. T : Type
2. g : LabeledGraph(T)
3. lg-size(g) ∈ ℕ
4. g ∈ Top List
5. g ∈ (T × ℕlg-size(g) List × (ℕlg-size(g) List)) List
6. k : ℕlg-size(g)
7. x : ℕlg-size(g) - 1
8. ¬x < k
⊢ nth_tl(k + 1;g)[x - k] ~ g[x + 1]
BY
{ (RWO "select-nth_tl" 0 THENA (Auto THEN Auto')) }
1
1. T : Type
2. g : LabeledGraph(T)
3. lg-size(g) ∈ ℕ
4. g ∈ Top List
5. g ∈ (T × ℕlg-size(g) List × (ℕlg-size(g) List)) List
6. k : ℕlg-size(g)
7. x : ℕlg-size(g) - 1
8. ¬x < k
⊢ g[(k + 1) + (x - k)] ~ g[x + 1]
Latex:
Latex:
.....equality..... 
1.  T  :  Type
2.  g  :  LabeledGraph(T)
3.  lg-size(g)  \mmember{}  \mBbbN{}
4.  g  \mmember{}  Top  List
5.  g  \mmember{}  (T  \mtimes{}  \mBbbN{}lg-size(g)  List  \mtimes{}  (\mBbbN{}lg-size(g)  List))  List
6.  k  :  \mBbbN{}lg-size(g)
7.  x  :  \mBbbN{}lg-size(g)  -  1
8.  \mneg{}x  <  k
\mvdash{}  nth\_tl(k  +  1;g)[x  -  k]  \msim{}  g[x  +  1]
By
Latex:
(RWO  "select-nth\_tl"  0  THENA  (Auto  THEN  Auto'))
Home
Index