---

Step * 1 2 of Lemma rel-exp-add-iff


1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. a : ℤ
4. [%1] : 0 < a
5. ∀b:ℕ. ∀x,z:T.  ((x R^(a - 1) + b z) ⇒ (∃y:T. ((x R^a - 1 y) ∧ (y R^b z))))
6. b : ℕ
7. x : T
8. z : T
9. x R^a + b z
⊢ ∃y:T. ((x R^a y) ∧ (y R^b z))
BY
{ (RecUnfold `rel_exp` (-1) THEN (SplitOnHypITE -1  THEN Auto') THEN Reduce (-2) THEN ExRepD) }

1
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. a : ℤ
4. [%1] : 0 < a
5. ∀b:ℕ. ∀x,z:T.  ((x R^(a - 1) + b z) ⇒ (∃y:T. ((x R^a - 1 y) ∧ (y R^b z))))
6. b : ℕ
7. x : T
8. z : T
9. z@0 : T
10. x R z@0
11. z@0 R^(a + b) - 1 z
12. ¬((a + b) = 0 ∈ ℤ)
⊢ ∃y:T. ((x R^a y) ∧ (y R^b z))

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  [R]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  a  :  \mBbbZ{}
4.  [\%1]  :  0  <  a
5.  \mforall{}b:\mBbbN{}.  \mforall{}x,z:T.
          ((x  R\^{}(a  -  1)  +  b  z)  {}\mRightarrow{}  (\mexists{}y:T.  ((x  R\^{}a  -  1  y)  \mwedge{}  (y  R\^{}b  z))))
6.  b  :  \mBbbN{}
7.  x  :  T
8.  z  :  T
9.  x  rel\_exp(T;  R;  a  +  b)  z
\mvdash{}  \mexists{}y:T.  ((x  rel\_exp(T;  R;  a)  y)  \mwedge{}  (y  rel\_exp(T;  R;  b)  z))


By

---

Latex:
(RecUnfold  `rel\_exp`  (-1)  THEN  (SplitOnHypITE  -1    THEN  Auto')  THEN  Reduce  (-2)  THEN  ExRepD)

---

Home Index