Step * of Lemma cubical-type-ap-morph-comp

[X:CubicalSet]. ∀[A:{X ⊢ _}]. ∀[I,J,K:Cname List]. ∀[f:name-morph(I;J)]. ∀[g:name-morph(J;K)]. ∀[a:X(I)]. ∀[u:A(a)].
  (((u f) f(a) g) (u (f g)) ∈ A((f g)(a)))
BY
(Auto THEN RepeatFor (DVar `A') THEN RepUR ``cubical-type-ap-morph cubical-type-at`` THEN All Reduce THEN Auto) }


Latex:


Latex:
\mforall{}[X:CubicalSet].  \mforall{}[A:\{X  \mvdash{}  \_\}].  \mforall{}[I,J,K:Cname  List].  \mforall{}[f:name-morph(I;J)].  \mforall{}[g:name-morph(J;K)].
\mforall{}[a:X(I)].  \mforall{}[u:A(a)].
    (((u  a  f)  f(a)  g)  =  (u  a  (f  o  g)))


By


Latex:
(Auto
  THEN  RepeatFor  2  (DVar  `A')
  THEN  RepUR  ``cubical-type-ap-morph  cubical-type-at``  0
  THEN  All  Reduce
  THEN  Auto)




Home Index