Step
*
2
2
1
1
1
1
of Lemma
rel_exp-iff-path
1. T : Type
2. R : T ⟶ T ⟶ ℙ
3. n : ℤ
4. 0 < n
5. ∀x,y:T.  (x R^n - 1 y 
⇐⇒ ∃L:T List. ((||L|| = ((n - 1) + 1) ∈ ℤ) ∧ rel-path-between(T;R;x;y;L)))
6. ¬(n = 0 ∈ ℤ)
7. x : T
8. y@0 : T
9. z : T
10. x R z
11. z R^n - 1 y@0
12. (z R^n - 1 y@0) 
⇐ ∃L:T List. ((||L|| = ((n - 1) + 1) ∈ ℤ) ∧ rel-path-between(T;R;z;y@0;L))
13. L : T List
14. ||L|| = ((n - 1) + 1) ∈ ℤ
15. rel-path-between(T;R;z;y@0;L)
16. ||[x / L]|| = (n + 1) ∈ ℤ
17. z = hd(L) ∈ T
18. x = x ∈ T
19. ↑null(L)
⊢ y@0 = x ∈ T
BY
{ TACTIC:(DVar `L' THEN All Reduce THEN Auto') }
Latex:
Latex:
1.  T  :  Type
2.  R  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  n  :  \mBbbZ{}
4.  0  <  n
5.  \mforall{}x,y:T.
          (x  R\^{}n  -  1  y  \mLeftarrow{}{}\mRightarrow{}  \mexists{}L:T  List.  ((||L||  =  ((n  -  1)  +  1))  \mwedge{}  rel-path-between(T;R;x;y;L)))
6.  \mneg{}(n  =  0)
7.  x  :  T
8.  y@0  :  T
9.  z  :  T
10.  x  R  z
11.  z  rel\_exp(T;  R;  n  -  1)  y@0
12.  (z  rel\_exp(T;  R;  n  -  1)  y@0)  \mLeftarrow{}{}  \mexists{}L:T  List
                                                                          ((||L||  =  ((n  -  1)  +  1))  \mwedge{}  rel-path-between(T;R;z;y@0;L))
13.  L  :  T  List
14.  ||L||  =  ((n  -  1)  +  1)
15.  rel-path-between(T;R;z;y@0;L)
16.  ||[x  /  L]||  =  (n  +  1)
17.  z  =  hd(L)
18.  x  =  x
19.  \muparrow{}null(L)
\mvdash{}  y@0  =  x
By
Latex:
TACTIC:(DVar  `L'  THEN  All  Reduce  THEN  Auto')
Home
Index