Step * of Lemma cu-cube-family_wf

[I:Cname List]. ∀[alpha:c𝕌(I)]. ∀[L:Cname List]. ∀[f:name-morph(I;L)].  (cu-cube-family(alpha;L;f) ∈ Type)
BY
(ProveWfLemma THEN (RWO "cubical-universe-I-cube" THENA Auto) THEN RepeatFor (D 2) THEN Reduce THEN Auto) }


Latex:


Latex:
\mforall{}[I:Cname  List].  \mforall{}[alpha:c\mBbbU{}(I)].  \mforall{}[L:Cname  List].  \mforall{}[f:name-morph(I;L)].
    (cu-cube-family(alpha;L;f)  \mmember{}  Type)


By


Latex:
(ProveWfLemma
  THEN  (RWO  "cubical-universe-I-cube"  2  THENA  Auto)
  THEN  RepeatFor  4  (D  2)
  THEN  Reduce  0
  THEN  Auto)




Home Index