---

Step * 1 of Lemma rel-comp-star


1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [S] : T ⟶ T ⟶ ℙ
4. ∀n:ℕ. (R o S)^n ⇐⇒ if (n =z 0) then λx,y. (x = y ∈ T) else (R o ((S o R)^n - 1 o S)) fi 
5. x : T
6. y : T
7. ((R o S)^*) x y
⊢ ((R o ((S o R)^* o S)) ∨ (λx,y. (x = y ∈ T))) x y
BY
{ (RepUR ``rel_or`` 0 THEN RepUR ``rel_star`` -1 THEN ExRepD) }

1
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [S] : T ⟶ T ⟶ ℙ
4. ∀n:ℕ. (R o S)^n ⇐⇒ if (n =z 0) then λx,y. (x = y ∈ T) else (R o ((S o R)^n - 1 o S)) fi 
5. x : T
6. y : T
7. n : ℕ
8. x (R o S)^n y
⊢ (x (R o ((S o R)^* o S)) y) ∨ (x = y ∈ T)

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  [R]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  [S]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
4.  \mforall{}n:\mBbbN{}
          (R  o  S)\^{}n  \mLeftarrow{}{}\mRightarrow{}  if  (n  =\msubz{}  0)  then  \mlambda{}x,y.  (x  =  y)  else  (R  o  ((S  o  R)\^{}n  -  1  o  S))  fi 
5.  x  :  T
6.  y  :  T
7.  rel\_star(T;  (R  o  S))  x  y
\mvdash{}  ((R  o  (rel\_star(T;  (S  o  R))  o  S))  \mvee{}  (\mlambda{}x,y.  (x  =  y)))  x  y


By

---

Latex:
(RepUR  ``rel\_or``  0  THEN  RepUR  ``rel\_star``  -1  THEN  ExRepD)

---

Home Index