Step
*
of Lemma
meq_transitivity
∀[X:Type]. ∀[d:metric(X)]. ∀[x,y,z:X].  (x ≡ z) supposing (x ≡ y and y ≡ z)
BY
{ (InstLemma `meq-equiv` [] THEN RepeatFor 2 (ParallelLast) THEN Auto) }
1
1. ∀[X:Type]. ∀[d:metric(X)].  EquivRel(X;x,y.x ≡ y)
2. X : Type
3. ∀[d:metric(X)]. EquivRel(X;x,y.x ≡ y)
4. d : metric(X)
5. EquivRel(X;x,y.x ≡ y)
6. x : X
7. y : X
8. z : X
9. y ≡ z
10. x ≡ y
⊢ x ≡ z
Latex:
Latex:
\mforall{}[X:Type].  \mforall{}[d:metric(X)].  \mforall{}[x,y,z:X].    (x  \mequiv{}  z)  supposing  (x  \mequiv{}  y  and  y  \mequiv{}  z)
By
Latex:
(InstLemma  `meq-equiv`  []  THEN  RepeatFor  2  (ParallelLast)  THEN  Auto)
Home
Index