Step
*
of Lemma
cube-face_wf
∀[k:ℕ]. ∀[i:ℕk]. ∀[up:𝔹]. ∀[c:real-cube(k)].  (cube-face(i;up;c) ∈ real-cube(k))
BY
{ (Auto
   THEN D -1
   THEN RepeatFor 2 (D 3)
   THEN (Fold `it` 0 THEN Folds ``bfalse btrue`` 0)
   THEN RepUR ``cube-face real-cube`` 0
   THEN MemCD
   THEN Try (Trivial)
   THEN RepUR ``real-vec`` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[k:\mBbbN{}].  \mforall{}[i:\mBbbN{}k].  \mforall{}[up:\mBbbB{}].  \mforall{}[c:real-cube(k)].    (cube-face(i;up;c)  \mmember{}  real-cube(k))
By
Latex:
(Auto
  THEN  D  -1
  THEN  RepeatFor  2  (D  3)
  THEN  (Fold  `it`  0  THEN  Folds  ``bfalse  btrue``  0)
  THEN  RepUR  ``cube-face  real-cube``  0
  THEN  MemCD
  THEN  Try  (Trivial)
  THEN  RepUR  ``real-vec``  0
  THEN  Auto)
Home
Index