Step * of Lemma meq_transitivity

[X:Type]. ∀[d:metric(X)]. ∀[x,y,z:X].  (x ≡ z) supposing (x ≡ and y ≡ z)
BY
(InstLemma `meq-equiv` [] THEN RepeatFor (ParallelLast) THEN Auto) }

1
1. ∀[X:Type]. ∀[d:metric(X)].  EquivRel(X;x,y.x ≡ y)
2. Type
3. ∀[d:metric(X)]. EquivRel(X;x,y.x ≡ y)
4. metric(X)
5. EquivRel(X;x,y.x ≡ y)
6. X
7. X
8. 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