Step
*
2
1
1
1
1
1
2
1
1
of Lemma
rat-complex-boundary-subdiv
.....aux..... 
1. k : ℕ
2. n : ℕ
3. K : n-dim-complex
4. ¬(n = 0 ∈ ℤ)
5. c : ℚCube(k)
6. ↑Inhabited(c)
7. dim(c) = (n - 1) ∈ ℤ
8. ↑in-complex-boundary(k;c;(K)')
9. dim(c) = (n - 1) ∈ ℤ
10. a : ℚCube(k)
11. u : ℚCube(k)
12. (a ∈ K)
13. ↑is-half-cube(k;u;a)
14. c ≤ u
15. dim(a) = n ∈ ℤ
16. ↑Inhabited(a)
17. dim(u) = dim(a) ∈ ℤ
18. b' : ℚCube(k)
19. c ≤ b'
20. ↑is-half-cube(k;b';a)
21. ¬(b' = u ∈ ℚCube(k))
22. ∀y:ℚCube(k). ((c ≤ y ∧ (↑is-half-cube(k;y;a)) ∧ (¬(y = u ∈ ℚCube(k)))) 
⇒ (y = b' ∈ ℚCube(k)))
23. has-interior-point(k;c;a)
24. x : ℚCube(k)
25. a1 : ℚCube(k)
26. (a1 ∈ K)
27. ↑is-half-cube(k;x;a1)
28. c ≤ x
⊢ (x = u ∈ ℚCube(k)) ∨ (x = b' ∈ ℚCube(k))
BY
{ (Decide ⌜x = u ∈ ℚCube(k)⌝⋅ THEN Auto) }
1
1. k : ℕ
2. n : ℕ
3. K : n-dim-complex
4. ¬(n = 0 ∈ ℤ)
5. c : ℚCube(k)
6. ↑Inhabited(c)
7. dim(c) = (n - 1) ∈ ℤ
8. ↑in-complex-boundary(k;c;(K)')
9. dim(c) = (n - 1) ∈ ℤ
10. a : ℚCube(k)
11. u : ℚCube(k)
12. (a ∈ K)
13. ↑is-half-cube(k;u;a)
14. c ≤ u
15. dim(a) = n ∈ ℤ
16. ↑Inhabited(a)
17. dim(u) = dim(a) ∈ ℤ
18. b' : ℚCube(k)
19. c ≤ b'
20. ↑is-half-cube(k;b';a)
21. ¬(b' = u ∈ ℚCube(k))
22. ∀y:ℚCube(k). ((c ≤ y ∧ (↑is-half-cube(k;y;a)) ∧ (¬(y = u ∈ ℚCube(k)))) 
⇒ (y = b' ∈ ℚCube(k)))
23. has-interior-point(k;c;a)
24. x : ℚCube(k)
25. a1 : ℚCube(k)
26. (a1 ∈ K)
27. ↑is-half-cube(k;x;a1)
28. c ≤ x
29. ¬(x = u ∈ ℚCube(k))
⊢ x = b' ∈ ℚCube(k)
Latex:
Latex:
.....aux..... 
1.  k  :  \mBbbN{}
2.  n  :  \mBbbN{}
3.  K  :  n-dim-complex
4.  \mneg{}(n  =  0)
5.  c  :  \mBbbQ{}Cube(k)
6.  \muparrow{}Inhabited(c)
7.  dim(c)  =  (n  -  1)
8.  \muparrow{}in-complex-boundary(k;c;(K)')
9.  dim(c)  =  (n  -  1)
10.  a  :  \mBbbQ{}Cube(k)
11.  u  :  \mBbbQ{}Cube(k)
12.  (a  \mmember{}  K)
13.  \muparrow{}is-half-cube(k;u;a)
14.  c  \mleq{}  u
15.  dim(a)  =  n
16.  \muparrow{}Inhabited(a)
17.  dim(u)  =  dim(a)
18.  b'  :  \mBbbQ{}Cube(k)
19.  c  \mleq{}  b'
20.  \muparrow{}is-half-cube(k;b';a)
21.  \mneg{}(b'  =  u)
22.  \mforall{}y:\mBbbQ{}Cube(k).  ((c  \mleq{}  y  \mwedge{}  (\muparrow{}is-half-cube(k;y;a))  \mwedge{}  (\mneg{}(y  =  u)))  {}\mRightarrow{}  (y  =  b'))
23.  has-interior-point(k;c;a)
24.  x  :  \mBbbQ{}Cube(k)
25.  a1  :  \mBbbQ{}Cube(k)
26.  (a1  \mmember{}  K)
27.  \muparrow{}is-half-cube(k;x;a1)
28.  c  \mleq{}  x
\mvdash{}  (x  =  u)  \mvee{}  (x  =  b')
By
Latex:
(Decide  \mkleeneopen{}x  =  u\mkleeneclose{}\mcdot{}  THEN  Auto)
Home
Index