---

Step * 1 1 1 1 1 of Lemma rel-comp-star


1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [S] : T ⟶ T ⟶ ℙ
4. x : T
5. y : T
6. n : ℕ
7. (R o ((S o R)^n - 1 o S)) x y
8. ((R o S)^n x y) ⇒ (if (n =z 0) then λx,y. (x = y ∈ T) else (R o ((S o R)^n - 1 o S)) fi  x y)
9. ((R o S)^n x y) ⇐ if (n =z 0) then λx,y. (x = y ∈ T) else (R o ((S o R)^n - 1 o S)) fi  x y
10. ¬(n = 0 ∈ ℤ)
⊢ (x (R o ((S o R)^* o S)) y) ∨ (x = y ∈ T)
BY
{ (RepeatFor 2 (Thin (-2)) THEN OrLeft THEN Auto) }

1
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [S] : T ⟶ T ⟶ ℙ
4. x : T
5. y : T
6. n : ℕ
7. (R o ((S o R)^n - 1 o S)) x y
8. ¬(n = 0 ∈ ℤ)
⊢ x (R o ((S o R)^* o S)) y

---

Latex:

---

Latex:

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


By

---

Latex:
(RepeatFor  2  (Thin  (-2))  THEN  OrLeft  THEN  Auto)

---

Home Index