---

Step * 2 2 1 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)
⊢ (∀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))))))
BY
{ ((RWO "member_filter" 0 THENA 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 ∈ (K)') ∧ (↑is-rat-cube-face(k;hlf;a1)))
     ⇒ ((a2 ∈ (K)') ∧ (↑is-rat-cube-face(k;hlf;a2)))
     ⇒ ((b ∈ K) ∧ (↑is-rat-cube-face(k;fc;b)))
     ⇒ (↑is-half-cube(k;a1;b))
     ⇒ (↑is-half-cube(k;a2;b))
     ⇒ (a1 = a2 ∈ ℚCube(k))))
∧ (∀b1,b2,a1:ℚCube(k).
     (((b1 ∈ K) ∧ (↑is-rat-cube-face(k;fc;b1)))
     ⇒ ((b2 ∈ K) ∧ (↑is-rat-cube-face(k;fc;b2)))
     ⇒ ((a1 ∈ (K)') ∧ (↑is-rat-cube-face(k;hlf;a1)))
     ⇒ (↑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{}  (\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{}  (\muparrow{}is-half-cube(k;a1;b))
          {}\mRightarrow{}  (\muparrow{}is-half-cube(k;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{}  (\muparrow{}is-half-cube(k;a1;b1))
          {}\mRightarrow{}  (\muparrow{}is-half-cube(k;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{}  (\muparrow{}is-half-cube(k;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{}  (\muparrow{}is-half-cube(k;a;b))))))


By

---

Latex:
((RWO  "member\_filter"  0  THENA  Auto)  THEN  Reduce  0)

---

Home Index