---

Step * 2 of Lemma transitive-closure-cases


1. [A] : Type
2. [R] : A ⟶ A ⟶ ℙ
3. x : A
4. y : A
5. u : a:A × b:A × (R a b)
6. v : (a:A × b:A × (R a b)) List
7. [%1] : rel_path(A;[u / v];x;y) ∧ 0 < ||[u / v]||
⊢ (x R y) ∨ (∃z:A. ((x R z) ∧ (z TC(R) y)))
BY
{ D -2 }

1
1. [A] : Type
2. [R] : A ⟶ A ⟶ ℙ
3. x : A
4. y : A
5. u : a:A × b:A × (R a b)
6. [%1] : rel_path(A;[u];x;y) ∧ 0 < ||[u]||
⊢ (x R y) ∨ (∃z:A. ((x R z) ∧ (z TC(R) y)))

2
1. [A] : Type
2. [R] : A ⟶ A ⟶ ℙ
3. x : A
4. y : A
5. u : a:A × b:A × (R a b)
6. u1 : a:A × b:A × (R a b)
7. v : (a:A × b:A × (R a b)) List
8. [%1] : rel_path(A;[u; [u1 / v]];x;y) ∧ 0 < ||[u; [u1 / v]]||
⊢ (x R y) ∨ (∃z:A. ((x R z) ∧ (z TC(R) y)))

---

Latex:

---

Latex:

1.  [A]  :  Type
2.  [R]  :  A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbP{}
3.  x  :  A
4.  y  :  A
5.  u  :  a:A  \mtimes{}  b:A  \mtimes{}  (R  a  b)
6.  v  :  (a:A  \mtimes{}  b:A  \mtimes{}  (R  a  b))  List
7.  [\%1]  :  rel\_path(A;[u  /  v];x;y)  \mwedge{}  0  <  ||[u  /  v]||
\mvdash{}  (x  R  y)  \mvee{}  (\mexists{}z:A.  ((x  R  z)  \mwedge{}  (z  TC(R)  y)))


By

---

Latex:
D  -2

---

Home Index