Step
*
of Lemma
system-equiv-implies-equal
∀[M:Type ─→ Type]
  ∀[S1,S2:System(P.M[P])].  S1 = S2 ∈ (Top × LabeledDAG(pInTransit(P.M[P]))) supposing system-equiv(P.M[P];S1;S2) 
  supposing Continuous+(P.M[P])
BY
{ (Auto THEN D -3 THEN D -2 THEN EqCD THEN Auto) }
Latex:
Latex:
\mforall{}[M:Type  {}\mrightarrow{}  Type]
    \mforall{}[S1,S2:System(P.M[P])].    S1  =  S2  supposing  system-equiv(P.M[P];S1;S2) 
    supposing  Continuous+(P.M[P])
By
Latex:
(Auto  THEN  D  -3  THEN  D  -2  THEN  EqCD  THEN  Auto)
Home
Index