Step
*
of Lemma
poset-functor-id
∀[I:Cname List]. ∀[f:name-morph(I;I)].
  poset-functor(I;I;f) = 1 ∈ Functor(poset-cat(I);poset-cat(I)) supposing f = 1 ∈ name-morph(I;I)
BY
{ (Auto THEN HypSubst' (-1) 0 THEN Auto) }
Latex:
Latex:
\mforall{}[I:Cname  List].  \mforall{}[f:name-morph(I;I)].    poset-functor(I;I;f)  =  1  supposing  f  =  1
By
Latex:
(Auto  THEN  HypSubst'  (-1)  0  THEN  Auto)
Home
Index