Step
*
of Lemma
rat-cube-complex-polyhedron_functionality
∀[k:ℕ]. ∀[K,L:ℚCube(k) List].  |K| ≡ |L| supposing permutation(ℚCube(k);K;L)
BY
{ (Auto
   THEN ((FLemma `member-permutation` [-1] THENM RepeatFor 2 (D 0)) THENA Auto)
   THEN D -1
   THEN MemTypeCD
   THEN Auto
   THEN RepeatFor 2 (ParallelLast)
   THEN (All (RWO "l_exists_iff") THENA Auto)
   THEN RepeatFor 2 (ParallelLast)
   THEN Auto) }
Latex:
Latex:
\mforall{}[k:\mBbbN{}].  \mforall{}[K,L:\mBbbQ{}Cube(k)  List].    |K|  \mequiv{}  |L|  supposing  permutation(\mBbbQ{}Cube(k);K;L)
By
Latex:
(Auto
  THEN  ((FLemma  `member-permutation`  [-1]  THENM  RepeatFor  2  (D  0))  THENA  Auto)
  THEN  D  -1
  THEN  MemTypeCD
  THEN  Auto
  THEN  RepeatFor  2  (ParallelLast)
  THEN  (All  (RWO  "l\_exists\_iff")  THENA  Auto)
  THEN  RepeatFor  2  (ParallelLast)
  THEN  Auto)
Home
Index