Step
*
2
1
1
2
1
1
of Lemma
rel_plus_implies
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. n : ℤ
4. 0 < n
5. ∀x,y:T.  ((x R^n y) 
⇒ ((x R y) ∨ (∃z:T. ((∃n:ℕ+. (x R^n z)) ∧ (z R y)))))
6. x : T
7. y : T
8. ¬((n + 1) = 0 ∈ ℤ)
9. z : T
10. x R z
11. z R^n y
12. z1 : T
13. n1 : ℕ+
14. z R^n1 z1
15. z1 R y
⊢ x R^n1 + 1 z1
BY
{ (RecUnfold `rel_exp` 0 THEN SplitOnConclITE THEN Reduce 0 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  y)  {}\mRightarrow{}  ((x  R  y)  \mvee{}  (\mexists{}z:T.  ((\mexists{}n:\mBbbN{}\msupplus{}.  (x  R\^{}n  z))  \mwedge{}  (z  R  y)))))
6.  x  :  T
7.  y  :  T
8.  \mneg{}((n  +  1)  =  0)
9.  z  :  T
10.  x  R  z
11.  z  rel\_exp(T;  R;  n)  y
12.  z1  :  T
13.  n1  :  \mBbbN{}\msupplus{}
14.  z  rel\_exp(T;  R;  n1)  z1
15.  z1  R  y
\mvdash{}  x  rel\_exp(T;  R;  n1  +  1)  z1
By
Latex:
(RecUnfold  `rel\_exp`  0  THEN  SplitOnConclITE  THEN  Reduce  0  THEN  Auto)\mcdot{}
Home
Index