Step * of Lemma cube-+

No Annotations
[I:fset(ℕ)]. ∀[i:ℕ].  (cube+(I;i) cube-(I;i) 1(formal-cube(I+i)) ∈ formal-cube(I+i) j⟶ formal-cube(I+i))
BY
(Intros
   THEN CsmEqual
   THEN Auto
   THEN RepeatFor ((FunExt THENA Auto))
   THEN RepUR ``formal-cube`` -1
   THEN RepUR ``formal-cube csm-id cube+ cube- csm-comp compose names-hom`` 0
   THEN (FunExt THENA Auto)
   THEN Reduce 0
   THEN BoolCase ⌜(x1 =z i)⌝⋅
   THEN Auto) }


Latex:


Latex:
No  Annotations
\mforall{}[I:fset(\mBbbN{})].  \mforall{}[i:\mBbbN{}].    (cube+(I;i)  o  cube-(I;i)  =  1(formal-cube(I+i)))


By


Latex:
(Intros
  THEN  CsmEqual
  THEN  Auto
  THEN  RepeatFor  2  ((FunExt  THENA  Auto))
  THEN  RepUR  ``formal-cube``  -1
  THEN  RepUR  ``formal-cube  csm-id  cube+  cube-  csm-comp  compose  names-hom``  0
  THEN  (FunExt  THENA  Auto)
  THEN  Reduce  0
  THEN  BoolCase  \mkleeneopen{}(x1  =\msubz{}  i)\mkleeneclose{}\mcdot{}
  THEN  Auto)




Home Index