Step
*
of Lemma
rel_exp_iff
∀n:ℕ
  ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
    ∀x,y:T.  (x R^n y 
⇐⇒ (∃z:T. (0 < n c∧ ((x R^n - 1 z) ∧ (z R y)))) ∨ ((n = 0 ∈ ℤ) ∧ (x = y ∈ T)))
BY
{ InductionOnNat }
1
.....basecase..... 
∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
  ∀x,y:T.  (x R^0 y 
⇐⇒ (∃z:T. (0 < 0 c∧ ((x R^0 - 1 z) ∧ (z R y)))) ∨ ((0 = 0 ∈ ℤ) ∧ (x = y ∈ T)))
2
.....upcase..... 
1. n : ℤ
2. [%1] : 0 < n
3. ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
     ∀x,y:T.  (x R^n - 1 y 
⇐⇒ (∃z:T. (0 < n - 1 c∧ ((x R^n - 1 - 1 z) ∧ (z R y)))) ∨ (((n - 1) = 0 ∈ ℤ) ∧ (x = y ∈ T)))
⊢ ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
    ∀x,y:T.  (x R^n y 
⇐⇒ (∃z:T. (0 < n c∧ ((x R^n - 1 z) ∧ (z R y)))) ∨ ((n = 0 ∈ ℤ) ∧ (x = y ∈ T)))
Latex:
Latex:
\mforall{}n:\mBbbN{}
    \mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
        \mforall{}x,y:T.
            (x  R\^{}n  y  \mLeftarrow{}{}\mRightarrow{}  (\mexists{}z:T.  (0  <  n  c\mwedge{}  ((x  R\^{}n  -  1  z)  \mwedge{}  (z  R  y))))  \mvee{}  ((n  =  0)  \mwedge{}  (x  =  y)))
By
Latex:
InductionOnNat
Home
Index