---

Step * 1 1 1 1 of Lemma closure-well-founded-total

.....assertion..... 
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. WellFnd{i}(T;x,y.R x y)
4. ∀x,y:T.  Dec(R x y)
5. ∀y:T. ∃L:T List. ∀x:T. ((R x y) ⇒ (x ∈ L))
6. one-one(T;T;R)
7. ∀y,z:T.  ((∀x:T. ((¬(R x y)) ∧ (¬(R x z)))) ⇒ (y = z ∈ T))
8. a : T@i
9. b : T@i
10. m : T
11. n1 : ℕ
12. m R^n1 a
13. ∀z:T. (¬(R z m))
14. n : ℕ
15. m R^n b
16. n1 ≤ n
⊢ ∃c:T. ((m R^n1 c) ∧ (c R^n - n1 b))
BY
{ ((BLemma `rel-exp-add-iff` THEN Auto') THEN NthHypSq (-2) THEN ProveSqEq THEN Auto) }

---

Latex:

---

Latex:
.....assertion..... 
1.  [T]  :  Type
2.  [R]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  WellFnd\{i\}(T;x,y.R  x  y)
4.  \mforall{}x,y:T.    Dec(R  x  y)
5.  \mforall{}y:T.  \mexists{}L:T  List.  \mforall{}x:T.  ((R  x  y)  {}\mRightarrow{}  (x  \mmember{}  L))
6.  one-one(T;T;R)
7.  \mforall{}y,z:T.    ((\mforall{}x:T.  ((\mneg{}(R  x  y))  \mwedge{}  (\mneg{}(R  x  z))))  {}\mRightarrow{}  (y  =  z))
8.  a  :  T@i
9.  b  :  T@i
10.  m  :  T
11.  n1  :  \mBbbN{}
12.  m  rel\_exp(T;  R;  n1)  a
13.  \mforall{}z:T.  (\mneg{}(R  z  m))
14.  n  :  \mBbbN{}
15.  m  rel\_exp(T;  R;  n)  b
16.  n1  \mleq{}  n
\mvdash{}  \mexists{}c:T.  ((m  rel\_exp(T;  R;  n1)  c)  \mwedge{}  (c  rel\_exp(T;  R;  n  -  n1)  b))


By

---

Latex:
((BLemma  `rel-exp-add-iff`  THEN  Auto')  THEN  NthHypSq  (-2)  THEN  ProveSqEq  THEN  Auto)

---

Home Index