---

Step * of Lemma cubical-type-ap-morph_wf

∀[X:CubicalSet]. ∀[A:{X ⊢ _}]. ∀[I,J:Cname List]. ∀[f:name-morph(I;J)]. ∀[a:X(I)]. ∀[u:A(a)].  ((u a f) ∈ A(f(a)))
BY
{ (ProveWfLemma
   THEN RepeatFor 2 (DVar `A')
   THEN Unfold `cubical-type-at` 0
   THEN Reduce 0
   THEN Unfold `cubical-type-at` -1
   THEN Reduce (-1)
   THEN Auto) }

---

Latex:

---

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


By

---

Latex:
(ProveWfLemma
  THEN  RepeatFor  2  (DVar  `A')
  THEN  Unfold  `cubical-type-at`  0
  THEN  Reduce  0
  THEN  Unfold  `cubical-type-at`  -1
  THEN  Reduce  (-1)
  THEN  Auto)

---

Home Index