---

Step * 2 2 1 1 1 1 of Lemma rat-complex-boundary-subdiv


1. k : ℕ
2. n : ℕ
3. K : n-dim-complex
4. ¬(n = 0 ∈ ℤ)
5. hlf : ℚCube(k)
6. ↑Inhabited(hlf)
7. dim(hlf) = (n - 1) ∈ ℤ
8. fc : ℚCube(k)
9. ↑in-complex-boundary(k;fc;K)
10. dim(fc) = (n - 1) ∈ ℤ
11. ↑is-half-cube(k;hlf;fc)
⊢ ∃R:ℚCube(k) ⟶ ℚCube(k) ⟶ ℙ
   ((∀a1,a2,b:ℚCube(k).
       ((a1 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
       ⇒ (a2 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
       ⇒ (b ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
       ⇒ (R a1 b)
       ⇒ (R a2 b)
       ⇒ (a1 = a2 ∈ ℚCube(k))))
   ∧ (∀b1,b2,a1:ℚCube(k).
        ((b1 ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
        ⇒ (b2 ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
        ⇒ (a1 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
        ⇒ (R a1 b1)
        ⇒ (R a1 b2)
        ⇒ (b1 = b2 ∈ ℚCube(k))))
   ∧ (∀a1:ℚCube(k)
        ((a1 ∈ (K)')
        ⇒ (↑is-rat-cube-face(k;hlf;a1))
        ⇒ (∃b:ℚCube(k). ((b ∈ K) ∧ (↑is-rat-cube-face(k;fc;b)) ∧ (R a1 b)))))
   ∧ (∀b:ℚCube(k)
        ((b ∈ K)
        ⇒ (↑is-rat-cube-face(k;fc;b))
        ⇒ (∃a:ℚCube(k). ((a ∈ (K)') ∧ (↑is-rat-cube-face(k;hlf;a)) ∧ (R a b))))))
BY
{ ((D 0 With ⌜λx,y. (↑is-half-cube(k;x;y))⌝  THENW Auto) THEN Reduce 0) }

1
1. k : ℕ
2. n : ℕ
3. K : n-dim-complex
4. ¬(n = 0 ∈ ℤ)
5. hlf : ℚCube(k)
6. ↑Inhabited(hlf)
7. dim(hlf) = (n - 1) ∈ ℤ
8. fc : ℚCube(k)
9. ↑in-complex-boundary(k;fc;K)
10. dim(fc) = (n - 1) ∈ ℤ
11. ↑is-half-cube(k;hlf;fc)
⊢ (∀a1,a2,b:ℚCube(k).
     ((a1 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
     ⇒ (a2 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
     ⇒ (b ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
     ⇒ (↑is-half-cube(k;a1;b))
     ⇒ (↑is-half-cube(k;a2;b))
     ⇒ (a1 = a2 ∈ ℚCube(k))))
∧ (∀b1,b2,a1:ℚCube(k).
     ((b1 ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
     ⇒ (b2 ∈ filter(λc.is-rat-cube-face(k;fc;c);K))
     ⇒ (a1 ∈ filter(λc@0.is-rat-cube-face(k;hlf;c@0);(K)'))
     ⇒ (↑is-half-cube(k;a1;b1))
     ⇒ (↑is-half-cube(k;a1;b2))
     ⇒ (b1 = b2 ∈ ℚCube(k))))
∧ (∀a1:ℚCube(k)
     ((a1 ∈ (K)')
     ⇒ (↑is-rat-cube-face(k;hlf;a1))
     ⇒ (∃b:ℚCube(k). ((b ∈ K) ∧ (↑is-rat-cube-face(k;fc;b)) ∧ (↑is-half-cube(k;a1;b))))))
∧ (∀b:ℚCube(k)
     ((b ∈ K)
     ⇒ (↑is-rat-cube-face(k;fc;b))
     ⇒ (∃a:ℚCube(k). ((a ∈ (K)') ∧ (↑is-rat-cube-face(k;hlf;a)) ∧ (↑is-half-cube(k;a;b))))))

---

Latex:

---

Latex:

1.  k  :  \mBbbN{}
2.  n  :  \mBbbN{}
3.  K  :  n-dim-complex
4.  \mneg{}(n  =  0)
5.  hlf  :  \mBbbQ{}Cube(k)
6.  \muparrow{}Inhabited(hlf)
7.  dim(hlf)  =  (n  -  1)
8.  fc  :  \mBbbQ{}Cube(k)
9.  \muparrow{}in-complex-boundary(k;fc;K)
10.  dim(fc)  =  (n  -  1)
11.  \muparrow{}is-half-cube(k;hlf;fc)
\mvdash{}  \mexists{}R:\mBbbQ{}Cube(k)  {}\mrightarrow{}  \mBbbQ{}Cube(k)  {}\mrightarrow{}  \mBbbP{}
      ((\mforall{}a1,a2,b:\mBbbQ{}Cube(k).
              ((a1  \mmember{}  filter(\mlambda{}c@0.is-rat-cube-face(k;hlf;c@0);(K)'))
              {}\mRightarrow{}  (a2  \mmember{}  filter(\mlambda{}c@0.is-rat-cube-face(k;hlf;c@0);(K)'))
              {}\mRightarrow{}  (b  \mmember{}  filter(\mlambda{}c.is-rat-cube-face(k;fc;c);K))
              {}\mRightarrow{}  (R  a1  b)
              {}\mRightarrow{}  (R  a2  b)
              {}\mRightarrow{}  (a1  =  a2)))
      \mwedge{}  (\mforall{}b1,b2,a1:\mBbbQ{}Cube(k).
                ((b1  \mmember{}  filter(\mlambda{}c.is-rat-cube-face(k;fc;c);K))
                {}\mRightarrow{}  (b2  \mmember{}  filter(\mlambda{}c.is-rat-cube-face(k;fc;c);K))
                {}\mRightarrow{}  (a1  \mmember{}  filter(\mlambda{}c@0.is-rat-cube-face(k;hlf;c@0);(K)'))
                {}\mRightarrow{}  (R  a1  b1)
                {}\mRightarrow{}  (R  a1  b2)
                {}\mRightarrow{}  (b1  =  b2)))
      \mwedge{}  (\mforall{}a1:\mBbbQ{}Cube(k)
                ((a1  \mmember{}  (K)')
                {}\mRightarrow{}  (\muparrow{}is-rat-cube-face(k;hlf;a1))
                {}\mRightarrow{}  (\mexists{}b:\mBbbQ{}Cube(k).  ((b  \mmember{}  K)  \mwedge{}  (\muparrow{}is-rat-cube-face(k;fc;b))  \mwedge{}  (R  a1  b)))))
      \mwedge{}  (\mforall{}b:\mBbbQ{}Cube(k)
                ((b  \mmember{}  K)
                {}\mRightarrow{}  (\muparrow{}is-rat-cube-face(k;fc;b))
                {}\mRightarrow{}  (\mexists{}a:\mBbbQ{}Cube(k).  ((a  \mmember{}  (K)')  \mwedge{}  (\muparrow{}is-rat-cube-face(k;hlf;a))  \mwedge{}  (R  a  b))))))


By

---

Latex:
((D  0  With  \mkleeneopen{}\mlambda{}x,y.  (\muparrow{}is-half-cube(k;x;y))\mkleeneclose{}    THENW  Auto)  THEN  Reduce  0)

---

Home Index