let C be Simple_closed_curve; :: thesis: ( |[(- 1),0 ]|,|[1,0 ]| realize-max-dist-in C implies for Jc, Jd being compact with_the_max_arc Subset of (TOP-REAL 2) st Jc is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & Jd is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & C = Jc \/ Jd & Jc /\ Jd = {|[(- 1),0 ]|,|[1,0 ]|} & UMP C in Jc & LMP C in Jd & W-bound C = W-bound Jc & E-bound C = E-bound Jc holds
for Ux being Subset of (TOP-REAL 2) st Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) holds
( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) ) )
set m = UMP C;
set j = LMP C;
assume A1:
|[(- 1),0 ]|,|[1,0 ]| realize-max-dist-in C
; :: thesis: for Jc, Jd being compact with_the_max_arc Subset of (TOP-REAL 2) st Jc is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & Jd is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & C = Jc \/ Jd & Jc /\ Jd = {|[(- 1),0 ]|,|[1,0 ]|} & UMP C in Jc & LMP C in Jd & W-bound C = W-bound Jc & E-bound C = E-bound Jc holds
for Ux being Subset of (TOP-REAL 2) st Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) holds
( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) )
let Jc, Jd be compact with_the_max_arc Subset of (TOP-REAL 2); :: thesis: ( Jc is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & Jd is_an_arc_of |[(- 1),0 ]|,|[1,0 ]| & C = Jc \/ Jd & Jc /\ Jd = {|[(- 1),0 ]|,|[1,0 ]|} & UMP C in Jc & LMP C in Jd & W-bound C = W-bound Jc & E-bound C = E-bound Jc implies for Ux being Subset of (TOP-REAL 2) st Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) holds
( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) ) )
assume that
A2:
Jc is_an_arc_of |[(- 1),0 ]|,|[1,0 ]|
and
A3:
Jd is_an_arc_of |[(- 1),0 ]|,|[1,0 ]|
and
A4:
C = Jc \/ Jd
and
A5:
Jc /\ Jd = {|[(- 1),0 ]|,|[1,0 ]|}
and
A6:
UMP C in Jc
and
A7:
LMP C in Jd
and
A8:
W-bound C = W-bound Jc
and
A9:
E-bound C = E-bound Jc
; :: thesis: for Ux being Subset of (TOP-REAL 2) st Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) holds
( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) )
set l = LMP Jc;
set LJ = (LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd;
set k = UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd);
set x = (1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc));
set w = ((W-bound C) + (E-bound C)) / 2;
let Ux be Subset of (TOP-REAL 2); :: thesis: ( Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) implies ( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) ) )
assume A10:
Ux = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ))
; :: thesis: ( Ux is_inside_component_of C & ( for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Ux ) )
A11:
C c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A1, Th71;
A12:
W-bound C = - 1
by A1, Th75;
A13:
E-bound C = 1
by A1, Th76;
A14:
( |[(- 1),0 ]| in C & |[1,0 ]| in C )
by A1, JORDAN24:def 1;
A15:
UMP C in C
by JORDAN21:43;
A16:
LMP Jc in Jc
by JORDAN21:44;
A17:
Jd c= C
by A4, XBOOLE_1:7;
A18:
Jc c= C
by A4, XBOOLE_1:7;
then A19:
LMP Jc in C
by A16;
A20:
(UMP C) `2 < |[0 ,3]| `2
by A1, Lm23, Th83, JORDAN21:43;
A21:
(LMP Jc) `1 = 0
by A8, A9, A12, A13, EUCLID:56;
A22:
|[0 ,3]| `1 = ((W-bound C) + (E-bound C)) / 2
by A1, Lm81;
A23:
(UMP C) `1 = ((W-bound C) + (E-bound C)) / 2
by EUCLID:56;
A24:
( UMP C <> |[(- 1),0 ]| & UMP C <> |[1,0 ]| & LMP Jc <> |[(- 1),0 ]| & LMP Jc <> |[1,0 ]| )
by A8, A9, A12, A13, Lm18, Lm19, EUCLID:56;
then consider Pml being Path of UMP C, LMP Jc such that
A25:
rng Pml c= Jc
and
A26:
rng Pml misses {|[(- 1),0 ]|,|[1,0 ]|}
by A2, A6, A16, Th44;
set ml = rng Pml;
A27:
rng Pml c= C
by A18, A25, XBOOLE_1:1;
A28:
LMP C in C
by A7, A17;
A29:
LSeg (LMP Jc),|[0 ,(- 3)]| is vertical
by A21, Lm24, SPPOL_1:37;
A30:
|[0 ,(- 3)]| `2 <= (LMP C) `2
by A1, A7, A17, Lm25, Th84;
A31:
(LMP C) `1 = 0
by A12, A13, EUCLID:56;
LMP Jc in Vertical_Line (((W-bound C) + (E-bound C)) / 2)
by A12, A13, A21, JORDAN6:34;
then A32:
LMP Jc in C /\ (Vertical_Line (((W-bound C) + (E-bound C)) / 2))
by A16, A18, XBOOLE_0:def 4;
then
(LMP C) `2 <= (LMP Jc) `2
by JORDAN21:42;
then
LMP C in LSeg (LMP Jc),|[0 ,(- 3)]|
by A21, A30, A31, Lm24, GOBOARD7:8;
then A33:
not (LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd is empty
by A7, XBOOLE_0:def 4;
A34:
(LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd is compact
by COMPTS_1:20;
A36:
(LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd is vertical
by A29, Th4;
then
(LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd is with_the_max_arc
by A33, A34;
then A37:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in (LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd
by A34, JORDAN21:43;
then A38:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in LSeg (LMP Jc),|[0 ,(- 3)]|
by XBOOLE_0:def 4;
A39:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in Jd
by A37, XBOOLE_0:def 4;
then A40:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in C
by A17;
A41:
|[0 ,(- 3)]| in LSeg (LMP Jc),|[0 ,(- 3)]|
by RLTOPSP1:69;
then A42:
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `1 = 0
by A29, A38, Lm24, SPPOL_1:def 3;
then
( UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) <> |[(- 1),0 ]| & UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) <> |[1,0 ]| & LMP C <> |[(- 1),0 ]| & LMP C <> |[1,0 ]| )
by A31, EUCLID:56;
then consider Pkj being Path of UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd), LMP C such that
A43:
rng Pkj c= Jd
and
A44:
rng Pkj misses {|[(- 1),0 ]|,|[1,0 ]|}
by A3, A7, A39, Th44;
set kj = rng Pkj;
A45:
rng Pkj c= C
by A17, A43, XBOOLE_1:1;
A46:
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in LSeg (UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)),(LMP Jc)
by RLTOPSP1:70;
A47:
Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) is_a_component_of (TOP-REAL 2) | (C ` )
by CONNSP_1:43;
A48:
the carrier of ((TOP-REAL 2) | (C ` )) = C `
by PRE_TOPC:29;
A49:
LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) is vertical
by A21, A42, SPPOL_1:37;
A50:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by RLTOPSP1:69;
A51:
( LMP Jc = |[((LMP Jc) `1 ),((LMP Jc) `2 )]| & UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) = |[((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `1 ),((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 )]| )
by EUCLID:57;
A52:
|[0 ,(- 3)]| = |[(|[0 ,(- 3)]| `1 ),(|[0 ,(- 3)]| `2 )]|
by EUCLID:57;
|[0 ,(- 3)]| `2 <= (LMP Jc) `2
by A1, A16, A18, Lm25, Th84;
then A53:
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 <= (LMP Jc) `2
by A21, A38, A51, A52, Lm24, JGRAPH_6:9;
( |[(- 1),0 ]| <> UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) & |[1,0 ]| <> UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) & |[(- 1),0 ]| <> LMP Jc & |[1,0 ]| <> LMP Jc )
by A21, A42, EUCLID:56;
then
( not UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in {|[(- 1),0 ]|,|[1,0 ]|} & not LMP Jc in {|[(- 1),0 ]|,|[1,0 ]|} )
by TARSKI:def 2;
then A54:
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) <> LMP Jc
by A5, A16, A39, XBOOLE_0:def 4;
then
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 <> (LMP Jc) `2
by A21, A42, TOPREAL3:11;
then A55:
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 < (LMP Jc) `2
by A53, XXREAL_0:1;
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in Vertical_Line (((W-bound C) + (E-bound C)) / 2)
by A12, A13, A42, JORDAN6:34;
then
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in C /\ (Vertical_Line (((W-bound C) + (E-bound C)) / 2))
by A17, A39, XBOOLE_0:def 4;
then
(LMP C) `2 <= (UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2
by JORDAN21:42;
then
|[0 ,(- 3)]| `2 <= (UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2
by A1, A7, A17, Lm25, Th84, XXREAL_0:2;
then A56:
LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) c= LSeg (LMP Jc),|[0 ,(- 3)]|
by A29, A42, A49, A53, Lm24, GOBOARD7:65;
A57:
(LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} c= C `
proof
let q be
set ;
:: according to TARSKI:def 3 :: thesis: ( not q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} or q in C ` )
assume that A58:
q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
and A59:
not
q in C `
;
:: thesis: contradiction
A60:
q in LSeg (LMP Jc),
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by A58, XBOOLE_0:def 5;
reconsider q =
q as
Point of
(TOP-REAL 2) by A58;
A61:
q in C
by A59, SUBSET_1:50;
A62:
q `1 = ((W-bound C) + (E-bound C)) / 2
by A12, A13, A42, A49, A50, A60, SPPOL_1:def 3;
then A63:
q in Vertical_Line (((W-bound C) + (E-bound C)) / 2)
by JORDAN6:34;
per cases
( q in Jc or q in Jd )
by A4, A61, XBOOLE_0:def 3;
suppose
q in Jc
;
:: thesis: contradictionthen
q in Jc /\ (Vertical_Line (((W-bound C) + (E-bound C)) / 2))
by A63, XBOOLE_0:def 4;
then A64:
(LMP Jc) `2 <= q `2
by A8, A9, JORDAN21:42;
q `2 <= (LMP Jc) `2
by A21, A42, A51, A53, A60, JGRAPH_6:9;
then
(LMP Jc) `2 = q `2
by A64, XXREAL_0:1;
then
LMP Jc = q
by A12, A13, A21, A62, TOPREAL3:11;
then
q in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by TARSKI:def 2;
hence
contradiction
by A58, XBOOLE_0:def 5;
:: thesis: verum end; suppose
q in Jd
;
:: thesis: contradictionthen A65:
q in (LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd
by A56, A60, XBOOLE_0:def 4;
A66:
q `1 = |[0 ,(- 3)]| `1
by A29, A41, A56, A60, SPPOL_1:def 3;
(LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd c= LSeg (LMP Jc),
|[0 ,(- 3)]|
by XBOOLE_1:17;
then A67:
(
W-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) <= W-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) &
E-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) <= E-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) )
by A65, PSCOMP_1:130, PSCOMP_1:132;
A68:
W-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) = E-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)
by A33, A34, A36, SPRECT_1:17;
A69:
(
W-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) = |[0 ,(- 3)]| `1 &
E-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) = |[0 ,(- 3)]| `1 )
by A21, Lm24, SPRECT_1:62, SPRECT_1:65;
then
(
W-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) = W-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) &
E-bound (LSeg (LMP Jc),|[0 ,(- 3)]|) = E-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) )
by A67, A68, XXREAL_0:1;
then
q in Vertical_Line (((W-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (E-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) / 2)
by A66, A69, JORDAN6:34;
then
q in ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) /\ (Vertical_Line (((W-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (E-bound ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) / 2))
by A65, XBOOLE_0:def 4;
then A70:
q `2 <= (UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2
by A34, JORDAN21:41;
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 <= q `2
by A21, A42, A51, A53, A60, JGRAPH_6:9;
then
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 = q `2
by A70, XXREAL_0:1;
then
UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) = q
by A12, A13, A42, A62, TOPREAL3:11;
then
q in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by TARSKI:def 2;
hence
contradiction
by A58, XBOOLE_0:def 5;
:: thesis: verum end; end;
end;
then reconsider X = (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} as Subset of ((TOP-REAL 2) | (C ` )) by PRE_TOPC:29;
now assume
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
;
:: thesis: contradictionthen
(
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) = LMP Jc or
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) = UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) )
by TARSKI:def 2;
hence
contradiction
by A54, Th1;
:: thesis: verum end;
then A71:
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by A46, XBOOLE_0:def 5;
then
Component_of ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ) = Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ))
by A57, CONNSP_3:27;
then A72:
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ))
by A57, A71, CONNSP_3:26;
then A73:
X meets Ux
by A10, A71, XBOOLE_0:3;
(LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} is connected
by JORDAN1:52;
then
X is connected
by CONNSP_1:24;
then A74:
X c= Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ))
by A10, A47, A73, CONNSP_1:38;
A75:
LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A19, A40, JORDAN1:def 1;
A76:
the carrier of (Trectangle (- 1),1,(- 3),3) = closed_inside_of_rectangle (- 1),1,(- 3),3
by PRE_TOPC:29;
reconsider AR = |[(- 1),0 ]|, BR = |[1,0 ]|, CR = |[0 ,3]|, DR = |[0 ,(- 3)]| as Point of (Trectangle (- 1),1,(- 3),3) by A11, A14, Lm60, Lm61, Lm65, PRE_TOPC:29;
consider Pcm being Path of |[0 ,3]|, UMP C, fcm being Function of I[01] ,((TOP-REAL 2) | (LSeg |[0 ,3]|,(UMP C))) such that
A77:
( rng fcm = LSeg |[0 ,3]|,(UMP C) & Pcm = fcm )
by Th43;
A78:
LSeg |[0 ,3]|,(UMP C) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A15, Lm60, Lm65, JORDAN1:def 1;
A79:
rng Pml c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A27, XBOOLE_1:1;
thus
Ux is_inside_component_of C
:: thesis: for V being Subset of (TOP-REAL 2) st V is_inside_component_of C holds
V = Uxproof
thus A80:
Ux is_a_component_of C `
by A10, A47, CONNSP_1:def 6;
:: according to JORDAN2C:def 3 :: thesis: Ux is Bounded
assume
not
Ux is
Bounded
;
:: thesis: contradiction
then
not
Ux c= Ball ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),10
by JORDAN2C:16;
then consider u being
set such that A81:
u in Ux
and A82:
not
u in Ball ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),10
by TARSKI:def 3;
A83:
closed_inside_of_rectangle (- 1),1,
(- 3),3
c= Ball ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),10
by A46, A75, Lm83;
reconsider u =
u as
Point of
(TOP-REAL 2) by A81;
A84:
Ux is
open
by A80, SPRECT_3:18;
Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` )) is
connected
by A47, CONNSP_1:def 5;
then
Ux is
connected
by A10, CONNSP_1:24;
then A85:
Ux is
being_Region
by A84;
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in Ball ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),10
by Th16;
then consider P1 being
Subset of
(TOP-REAL 2) such that A86:
P1 is_S-P_arc_joining (1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
u
and A87:
P1 c= Ux
by A10, A72, A81, A82, A85, TOPREAL4:30;
A88:
P1 is_an_arc_of (1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
u
by A86, TOPREAL4:3;
reconsider P2 =
P1 as
Subset of
((TOP-REAL 2) | (C ` )) by A10, A87, XBOOLE_1:1;
A89:
P2 c= Component_of (Down ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(C ` ))
by A10, A87;
A90:
P2 misses C
by A48, SUBSET_1:43;
then A91:
P2 misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A92:
P2 misses Jd
by A4, A90, XBOOLE_1:7, XBOOLE_1:63;
A93:
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `1 =
(1 / 2) * (((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) `1 )
by TOPREAL3:9
.=
(1 / 2) * (((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `1 ) + ((LMP Jc) `1 ))
by TOPREAL3:7
.=
0
by A21, A42
;
then A94:
LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) is
vertical
by Lm24, SPPOL_1:37;
A95:
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) = |[(((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `1 ),(((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2 )]|
by EUCLID:57;
A96:
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2 < (LMP Jc) `2
by A55, Th3;
A97:
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2 < ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2
by A55, Th2;
then A98:
|[0 ,(- 3)]| `2 <= ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2
by A1, A17, A39, Lm25, Th84, XXREAL_0:2;
|[0 ,(- 3)]| `1 = |[0 ,(- 3)]| `1
;
then A99:
LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) c= LSeg |[0 ,(- 3)]|,
(LMP Jc)
by A29, A94, A96, A98, GOBOARD7:65;
A100:
LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) misses Jc
proof
assume
not
LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) misses Jc
;
:: thesis: contradiction
then consider q being
set such that A101:
q in LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))
and A102:
q in Jc
by XBOOLE_0:3;
reconsider q =
q as
Point of
(TOP-REAL 2) by A101;
q `2 <= ((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2
by A52, A93, A95, A98, A101, Lm24, JGRAPH_6:9;
then A103:
q `2 < (LMP Jc) `2
by A96, XXREAL_0:2;
q `1 = 0
by A29, A41, A99, A101, Lm24, SPPOL_1:def 3;
then
q in Vertical_Line (((W-bound C) + (E-bound C)) / 2)
by A12, A13, JORDAN6:34;
then
q in Jc /\ (Vertical_Line (((W-bound C) + (E-bound C)) / 2))
by A102, XBOOLE_0:def 4;
hence
contradiction
by A8, A9, A103, JORDAN21:42;
:: thesis: verum
end;
set n =
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3);
A104:
not
u in closed_inside_of_rectangle (- 1),1,
(- 3),3
by A82, A83;
A105:
Fr (closed_inside_of_rectangle (- 1),1,(- 3),3) = rectangle (- 1),1,
(- 3),3
by Th52;
u in P1
by A88, TOPREAL1:4;
then A106:
P1 \ (closed_inside_of_rectangle (- 1),1,(- 3),3) <> {} (TOP-REAL 2)
by A104, XBOOLE_0:def 5;
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in P1
by A88, TOPREAL1:4;
then
P1 meets closed_inside_of_rectangle (- 1),1,
(- 3),3
by A46, A75, XBOOLE_0:3;
then A107:
P1 meets rectangle (- 1),1,
(- 3),3
by A88, A105, A106, CONNSP_1:23, JORDAN6:11;
P1 is
closed
by A86, JORDAN6:12, TOPREAL4:3;
then
P1 /\ (rectangle (- 1),1,(- 3),3) is
closed
by TOPS_1:35;
then A108:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in P1 /\ (rectangle (- 1),1,(- 3),3)
by A88, A107, JORDAN5C:def 1;
then A109:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in rectangle (- 1),1,
(- 3),3
by XBOOLE_0:def 4;
A110:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in P1
by A108, XBOOLE_0:def 4;
set alpha =
Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3));
A111:
- 3
< (UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) `2
by A1, A17, A39, Th84;
(LMP Jc) `2 <= (UMP C) `2
by A32, JORDAN21:41;
then
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) `2 < (UMP C) `2
by A96, XXREAL_0:2;
then
not
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)) in rectangle (- 1),1,
(- 3),3
by A20, A93, A95, A97, A111, Lm80;
then A112:
Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) is_an_arc_of (1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3)
by A86, A109, A110, JORDAN16:39, TOPREAL4:3;
A113:
Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) misses Jc
by A91, JORDAN16:5, XBOOLE_1:63;
A114:
Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) misses Jd
by A92, JORDAN16:5, XBOOLE_1:63;
consider Pdx being
Path of
|[0 ,(- 3)]|,
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
fdx being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg |[0 ,(- 3)]|,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))))) such that A115:
(
rng fdx = LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) &
Pdx = fdx )
by Th43;
consider PJc being
Path of
|[(- 1),0 ]|,
|[1,0 ]|,
fJc being
Function of
I[01] ,
((TOP-REAL 2) | Jc) such that A116:
(
rng fJc = Jc &
PJc = fJc )
by A2, Th42;
consider PJd being
Path of
|[(- 1),0 ]|,
|[1,0 ]|,
fJd being
Function of
I[01] ,
((TOP-REAL 2) | Jd) such that A117:
(
rng fJd = Jd &
PJd = fJd )
by A3, Th42;
consider Palpha being
Path of
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
falpha being
Function of
I[01] ,
((TOP-REAL 2) | (Segment P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)))) such that A118:
(
rng falpha = Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) &
Palpha = falpha )
by A112, Th42;
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in closed_inside_of_rectangle (- 1),1,
(- 3),3
by A109, Lm65;
then A119:
ex
p being
Point of
(TOP-REAL 2) st
(
p = First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) &
- 1
<= p `1 &
p `1 <= 1 &
- 3
<= p `2 &
p `2 <= 3 )
;
rng PJc c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A11, A18, A76, A116, XBOOLE_1:1;
then reconsider h =
PJc as
Path of
AR,
BR by Th30;
rng PJd c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A11, A17, A76, A117, XBOOLE_1:1;
then reconsider H =
PJd as
Path of
AR,
BR by Th30;
A120:
LSeg |[0 ,(- 3)]|,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A46, A75, Lm61, Lm65, JORDAN1:def 1;
A121:
Segment P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A46, A75, A86, A104, Th57, TOPREAL4:3;
A122:
|[(- 1),(- 3)]| in LSeg |[(- 1),(- 3)]|,
|[(- 1),3]|
by RLTOPSP1:69;
A123:
|[1,(- 3)]| in LSeg |[1,(- 3)]|,
|[1,3]|
by RLTOPSP1:69;
LSeg |[(- 1),3]|,
|[0 ,3]| misses C
by A1, Lm72;
then A124:
LSeg |[(- 1),3]|,
|[0 ,3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A125:
LSeg |[(- 1),3]|,
|[0 ,3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by Lm65, Lm66, XBOOLE_1:1;
A126:
LSeg |[1,3]|,
|[0 ,3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by Lm65, Lm67, XBOOLE_1:1;
LSeg |[1,3]|,
|[0 ,3]| misses C
by A1, Lm73;
then A127:
LSeg |[1,3]|,
|[0 ,3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
consider Plx being
Path of
LMP Jc,
(1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)),
flx being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))))) such that A128:
(
rng flx = LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) &
Plx = flx )
by Th43;
set PCX =
(Pcm + Pml) + Plx;
A129:
rng ((Pcm + Pml) + Plx) = ((rng Pcm) \/ (rng Pml)) \/ (rng Plx)
by Th40;
A130:
rng Pml misses Jd
A133:
(LSeg |[0 ,3]|,(UMP C)) /\ C = {(UMP C)}
by A1, Th91;
A134:
LSeg |[0 ,3]|,
(UMP C) misses Jd
proof
assume
LSeg |[0 ,3]|,
(UMP C) meets Jd
;
:: thesis: contradiction
then consider q being
set such that A135:
q in LSeg |[0 ,3]|,
(UMP C)
and A136:
q in Jd
by XBOOLE_0:3;
q in {(UMP C)}
by A17, A133, A135, A136, XBOOLE_0:def 4;
then
q = UMP C
by TARSKI:def 1;
then
UMP C in {|[(- 1),0 ]|,|[1,0 ]|}
by A5, A6, A136, XBOOLE_0:def 4;
hence
contradiction
by A24, TARSKI:def 2;
:: thesis: verum
end;
LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) is
vertical
by A21, A93, SPPOL_1:37;
then A137:
LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) c= LSeg (LMP Jc),
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by A42, A49, A93, A96, A97, GOBOARD7:65;
LMP Jc in LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))
by RLTOPSP1:69;
then
{(LMP Jc)} c= LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))
by ZFMISC_1:37;
then A138:
LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) = ((LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)}) \/ {(LMP Jc)}
by XBOOLE_1:45;
(LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)} c= (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
proof
let q be
set ;
:: according to TARSKI:def 3 :: thesis: ( not q in (LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)} or q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} )
assume
q in (LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)}
;
:: thesis: q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
then A139:
(
q in LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) &
q <> LMP Jc )
by ZFMISC_1:64;
then
q <> UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)
by A21, A51, A93, A95, A96, A97, JGRAPH_6:9;
then
not
q in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by A139, TARSKI:def 2;
hence
q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by A137, A139, XBOOLE_0:def 5;
:: thesis: verum
end;
then
(LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)} c= C `
by A57, XBOOLE_1:1;
then
(LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)} misses C
by SUBSET_1:43;
then A140:
(LSeg (LMP Jc),((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc)))) \ {(LMP Jc)} misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
{(LMP Jc)} misses Jd
then
LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) misses Jd
by A138, A140, XBOOLE_1:70;
then A141:
rng ((Pcm + Pml) + Plx) misses Jd
by A77, A128, A129, A130, A134, XBOOLE_1:114;
LSeg (LMP Jc),
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))) c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A75, A137, XBOOLE_1:1;
then A142:
rng ((Pcm + Pml) + Plx) c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A77, A78, A79, A128, A129, Lm1;
LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]| misses C
by A1, Lm74;
then A143:
LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
LSeg |[1,(- 3)]|,
|[0 ,(- 3)]| misses C
by A1, Lm75;
then A144:
LSeg |[1,(- 3)]|,
|[0 ,(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
per cases
( (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2 < 0 or (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2 >= 0 )
;
suppose A145:
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2 < 0
;
:: thesis: contradictionper cases
( First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),0 ]|,|[(- 1),(- 3)]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),(- 3)]|,|[0 ,(- 3)]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[0 ,(- 3)]|,|[1,(- 3)]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[1,(- 3)]|,|[1,0 ]| )
by A109, A145, Lm71;
suppose A146:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),0 ]|,
|[(- 1),(- 3)]|
;
:: thesis: contradictionconsider Pnld being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[(- 1),(- 3)]|,
fnld being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[(- 1),(- 3)]|)) such that A147:
(
rng fnld = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| &
Pnld = fnld )
by Th43;
consider Pldd being
Path of
|[(- 1),(- 3)]|,
|[0 ,(- 3)]|,
fldd being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg |[(- 1),(- 3)]|,|[0 ,(- 3)]|)) such that A148:
(
rng fldd = LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]| &
Pldd = fldd )
by Th43;
A149:
|[(- 1),(- 3)]| `1 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1
by A122, A146, Lm43, Lm56, SPPOL_1:def 3;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| is
vertical
by SPPOL_1:37;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| c= LSeg |[(- 1),(- 3)]|,
|[(- 1),3]|
by A119, A149, Lm27, Lm29, Lm43, GOBOARD7:65;
then A150:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| c= rectangle (- 1),1,
(- 3),3
by Lm39, XBOOLE_1:1;
set K1 =
((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| misses C
by A1, A48, A89, A110, A146, Lm78;
then A151:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
A152:
rng (((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd) = (((rng ((Pcm + Pml) + Plx)) \/ (rng Palpha)) \/ (rng Pnld)) \/ (rng Pldd)
by Lm11;
then A153:
rng PJd misses rng (((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd)
by A114, A117, A118, A141, A143, A147, A148, A151, Lm3;
A154:
LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by Lm65, Lm68, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A150, Lm65, XBOOLE_1:1;
then
rng (((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A118, A121, A142, A147, A148, A152, A154, Lm2;
then reconsider v =
((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd as
Path of
CR,
DR by Th30;
consider s,
t being
Point of
I[01] such that A155:
H . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom H = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
H . s in rng PJd &
v . t in rng (((((Pcm + Pml) + Plx) + Palpha) + Pnld) + Pldd) )
by FUNCT_1:def 5;
hence
contradiction
by A153, A155, XBOOLE_0:3;
:: thesis: verum end; suppose A156:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]|
;
:: thesis: contradictionconsider Pnd being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[0 ,(- 3)]|,
fnd being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[0 ,(- 3)]|)) such that A157:
(
rng fnd = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| &
Pnd = fnd )
by Th43;
set K1 =
(((Pcm + Pml) + Plx) + Palpha) + Pnd;
|[(- 1),(- 3)]| in LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]|
by RLTOPSP1:69;
then A158:
|[(- 1),(- 3)]| `2 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2
by A156, Lm49, SPPOL_1:def 2;
then A159:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| is
horizontal
by Lm25, Lm29, SPPOL_1:36;
(
|[(- 1),(- 3)]| `1 <= (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 &
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 <= |[0 ,(- 3)]| `1 )
by A156, Lm24, Lm28, JGRAPH_6:11;
then A160:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= LSeg |[(- 1),(- 3)]|,
|[0 ,(- 3)]|
by A158, A159, Lm49, GOBOARD7:66;
then A161:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= rectangle (- 1),1,
(- 3),3
by Lm68, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| misses C
by A1, A160, Lm74, XBOOLE_1:63;
then A162:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
A163:
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) = ((rng ((Pcm + Pml) + Plx)) \/ (rng Palpha)) \/ (rng Pnd)
by Th40;
then A164:
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) misses Jd
by A114, A118, A141, A157, A162, XBOOLE_1:114;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A161, Lm65, XBOOLE_1:1;
then
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A118, A121, A142, A157, A163, Lm1;
then reconsider v =
(((Pcm + Pml) + Plx) + Palpha) + Pnd as
Path of
CR,
DR by Th30;
consider s,
t being
Point of
I[01] such that A165:
H . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom H = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
H . s in rng PJd &
v . t in rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) )
by FUNCT_1:def 5;
hence
contradiction
by A117, A164, A165, XBOOLE_0:3;
:: thesis: verum end; suppose A166:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[0 ,(- 3)]|,
|[1,(- 3)]|
;
:: thesis: contradictionconsider Pnd being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[0 ,(- 3)]|,
fnd being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[0 ,(- 3)]|)) such that A167:
(
rng fnd = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| &
Pnd = fnd )
by Th43;
set K1 =
(((Pcm + Pml) + Plx) + Palpha) + Pnd;
|[1,(- 3)]| in LSeg |[1,(- 3)]|,
|[0 ,(- 3)]|
by RLTOPSP1:69;
then
|[1,(- 3)]| `2 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2
by A166, Lm50, SPPOL_1:def 2;
then A168:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| is
horizontal
by Lm25, Lm33, SPPOL_1:36;
A169:
|[0 ,(- 3)]| `2 = |[0 ,(- 3)]| `2
;
(
|[0 ,(- 3)]| `1 <= (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 &
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 <= |[1,(- 3)]| `1 )
by A166, Lm24, Lm32, JGRAPH_6:11;
then A170:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= LSeg |[1,(- 3)]|,
|[0 ,(- 3)]|
by A168, A169, Lm50, GOBOARD7:66;
then A171:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= rectangle (- 1),1,
(- 3),3
by Lm69, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| misses C
by A1, A170, Lm75, XBOOLE_1:63;
then A172:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
A173:
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) = ((rng ((Pcm + Pml) + Plx)) \/ (rng Palpha)) \/ (rng Pnd)
by Th40;
then A174:
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) misses Jd
by A114, A118, A141, A167, A172, XBOOLE_1:114;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A171, Lm65, XBOOLE_1:1;
then
rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A118, A121, A142, A167, A173, Lm1;
then reconsider v =
(((Pcm + Pml) + Plx) + Palpha) + Pnd as
Path of
CR,
DR by Th30;
consider s,
t being
Point of
I[01] such that A175:
H . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom H = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
H . s in rng PJd &
v . t in rng ((((Pcm + Pml) + Plx) + Palpha) + Pnd) )
by FUNCT_1:def 5;
hence
contradiction
by A117, A174, A175, XBOOLE_0:3;
:: thesis: verum end; suppose A176:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[1,(- 3)]|,
|[1,0 ]|
;
:: thesis: contradictionconsider Pnpd being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[1,(- 3)]|,
fnpd being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[1,(- 3)]|)) such that A177:
(
rng fnpd = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| &
Pnpd = fnpd )
by Th43;
consider Ppdd being
Path of
|[1,(- 3)]|,
|[0 ,(- 3)]|,
fpdd being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg |[1,(- 3)]|,|[0 ,(- 3)]|)) such that A178:
(
rng fpdd = LSeg |[1,(- 3)]|,
|[0 ,(- 3)]| &
Ppdd = fpdd )
by Th43;
A179:
|[1,(- 3)]| `1 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1
by A123, A176, Lm44, Lm58, SPPOL_1:def 3;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| is
vertical
by SPPOL_1:37;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| c= LSeg |[1,(- 3)]|,
|[1,3]|
by A119, A179, Lm31, Lm33, Lm44, GOBOARD7:65;
then A180:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| c= rectangle (- 1),1,
(- 3),3
by Lm41, XBOOLE_1:1;
set K1 =
((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| misses C
by A1, A48, A89, A110, A176, Lm79;
then A181:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| misses Jd
by A4, XBOOLE_1:7, XBOOLE_1:63;
A182:
rng (((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd) = (((rng ((Pcm + Pml) + Plx)) \/ (rng Palpha)) \/ (rng Pnpd)) \/ (rng Ppdd)
by Lm11;
then A183:
rng PJd misses rng (((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd)
by A114, A117, A118, A141, A144, A177, A178, A181, Lm3;
A184:
LSeg |[1,(- 3)]|,
|[0 ,(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by Lm65, Lm69, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,(- 3)]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A180, Lm65, XBOOLE_1:1;
then
rng (((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A118, A121, A142, A177, A178, A182, A184, Lm2;
then reconsider v =
((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd as
Path of
CR,
DR by Th30;
consider s,
t being
Point of
I[01] such that A185:
H . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom H = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
H . s in rng PJd &
v . t in rng (((((Pcm + Pml) + Plx) + Palpha) + Pnpd) + Ppdd) )
by FUNCT_1:def 5;
hence
contradiction
by A183, A185, XBOOLE_0:3;
:: thesis: verum end; end; end; suppose A186:
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2 >= 0
;
:: thesis: contradictionper cases
( First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),0 ]|,|[(- 1),3]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),3]|,|[0 ,3]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[0 ,3]|,|[1,3]| or First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3) in LSeg |[1,3]|,|[1,0 ]| )
by A109, A186, Lm70;
suppose A187:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),0 ]|,
|[(- 1),3]|
;
:: thesis: contradictionconsider Pnlg being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[(- 1),3]|,
fnlg being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[(- 1),3]|)) such that A188:
(
rng fnlg = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| &
Pnlg = fnlg )
by Th43;
consider Plgc being
Path of
|[(- 1),3]|,
|[0 ,3]|,
flgc being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg |[(- 1),3]|,|[0 ,3]|)) such that A189:
(
rng flgc = LSeg |[(- 1),3]|,
|[0 ,3]| &
Plgc = flgc )
by Th43;
A190:
|[(- 1),(- 3)]| `1 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1
by A122, A187, Lm43, Lm55, SPPOL_1:def 3;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| is
vertical
by Lm26, Lm28, SPPOL_1:37;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| c= LSeg |[(- 1),(- 3)]|,
|[(- 1),3]|
by A119, A190, Lm27, Lm29, Lm43, GOBOARD7:65;
then A191:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| c= rectangle (- 1),1,
(- 3),3
by Lm39, XBOOLE_1:1;
set K1 =
((Pdx + Palpha) + Pnlg) + Plgc;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| misses C
by A1, A48, A89, A110, A187, Lm76;
then A192:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A193:
rng (((Pdx + Palpha) + Pnlg) + Plgc) = (((rng Pdx) \/ (rng Palpha)) \/ (rng Pnlg)) \/ (rng Plgc)
by Lm11;
then A194:
rng (((Pdx + Palpha) + Pnlg) + Plgc) misses Jc
by A100, A113, A115, A118, A124, A188, A189, A192, Lm3;
A195:
rng (((Pdx + Palpha) + Pnlg) + Plgc) = rng (- (((Pdx + Palpha) + Pnlg) + Plgc))
by Th32;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[(- 1),3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A191, Lm65, XBOOLE_1:1;
then
rng (((Pdx + Palpha) + Pnlg) + Plgc) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A115, A118, A120, A121, A125, A188, A189, A193, Lm2;
then reconsider v =
- (((Pdx + Palpha) + Pnlg) + Plgc) as
Path of
CR,
DR by A195, Th30;
consider s,
t being
Point of
I[01] such that A196:
h . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom h = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
h . s in rng PJc &
v . t in rng (- (((Pdx + Palpha) + Pnlg) + Plgc)) )
by FUNCT_1:def 5;
hence
contradiction
by A116, A194, A195, A196, XBOOLE_0:3;
:: thesis: verum end; suppose A197:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[(- 1),3]|,
|[0 ,3]|
;
:: thesis: contradictionconsider Pnc being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[0 ,3]|,
fnc being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[0 ,3]|)) such that A198:
(
rng fnc = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| &
Pnc = fnc )
by Th43;
set K1 =
(Pdx + Palpha) + Pnc;
|[(- 1),3]| in LSeg |[(- 1),3]|,
|[0 ,3]|
by RLTOPSP1:69;
then A199:
|[(- 1),3]| `2 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2
by A197, Lm51, SPPOL_1:def 2;
then A200:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| is
horizontal
by Lm23, Lm27, SPPOL_1:36;
(
|[(- 1),3]| `1 <= (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 &
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 <= |[0 ,3]| `1 )
by A197, Lm22, Lm26, JGRAPH_6:11;
then A201:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| c= LSeg |[(- 1),3]|,
|[0 ,3]|
by A199, A200, Lm51, GOBOARD7:66;
then A202:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| c= rectangle (- 1),1,
(- 3),3
by Lm66, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| misses C
by A1, A201, Lm72, XBOOLE_1:63;
then A203:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A204:
rng ((Pdx + Palpha) + Pnc) = ((rng Pdx) \/ (rng Palpha)) \/ (rng Pnc)
by Th40;
then A205:
rng ((Pdx + Palpha) + Pnc) misses Jc
by A100, A113, A115, A118, A198, A203, XBOOLE_1:114;
A206:
rng ((Pdx + Palpha) + Pnc) = rng (- ((Pdx + Palpha) + Pnc))
by Th32;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A202, Lm65, XBOOLE_1:1;
then
rng ((Pdx + Palpha) + Pnc) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A115, A118, A120, A121, A198, A204, Lm1;
then reconsider v =
- ((Pdx + Palpha) + Pnc) as
Path of
CR,
DR by A206, Th30;
consider s,
t being
Point of
I[01] such that A207:
h . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom h = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
h . s in rng PJc &
v . t in rng (- ((Pdx + Palpha) + Pnc)) )
by FUNCT_1:def 5;
hence
contradiction
by A116, A205, A206, A207, XBOOLE_0:3;
:: thesis: verum end; suppose A208:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[0 ,3]|,
|[1,3]|
;
:: thesis: contradictionconsider Pnc being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[0 ,3]|,
fnc being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[0 ,3]|)) such that A209:
(
rng fnc = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| &
Pnc = fnc )
by Th43;
set K1 =
(Pdx + Palpha) + Pnc;
|[1,3]| in LSeg |[1,3]|,
|[0 ,3]|
by RLTOPSP1:69;
then
|[1,3]| `2 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `2
by A208, Lm52, SPPOL_1:def 2;
then A210:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| is
horizontal
by Lm23, Lm31, SPPOL_1:36;
A211:
|[0 ,3]| `2 = |[0 ,3]| `2
;
(
|[0 ,3]| `1 <= (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 &
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1 <= |[1,3]| `1 )
by A208, Lm22, Lm30, JGRAPH_6:11;
then A212:
LSeg |[0 ,3]|,
(First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) c= LSeg |[0 ,3]|,
|[1,3]|
by A210, A211, Lm52, GOBOARD7:66;
then A213:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| c= rectangle (- 1),1,
(- 3),3
by Lm67, XBOOLE_1:1;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| misses C
by A1, A212, Lm73, XBOOLE_1:63;
then A214:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A215:
rng ((Pdx + Palpha) + Pnc) = ((rng Pdx) \/ (rng Palpha)) \/ (rng Pnc)
by Th40;
then A216:
rng ((Pdx + Palpha) + Pnc) misses Jc
by A100, A113, A115, A118, A209, A214, XBOOLE_1:114;
A217:
rng ((Pdx + Palpha) + Pnc) = rng (- ((Pdx + Palpha) + Pnc))
by Th32;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[0 ,3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A213, Lm65, XBOOLE_1:1;
then
rng ((Pdx + Palpha) + Pnc) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A115, A118, A120, A121, A209, A215, Lm1;
then reconsider v =
- ((Pdx + Palpha) + Pnc) as
Path of
CR,
DR by A217, Th30;
consider s,
t being
Point of
I[01] such that A218:
h . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom h = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
h . s in rng PJc &
v . t in rng (- ((Pdx + Palpha) + Pnc)) )
by FUNCT_1:def 5;
hence
contradiction
by A116, A216, A217, A218, XBOOLE_0:3;
:: thesis: verum end; suppose A219:
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3) in LSeg |[1,3]|,
|[1,0 ]|
;
:: thesis: contradictionconsider Pnpg being
Path of
First_Point P1,
((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),
u,
(rectangle (- 1),1,(- 3),3),
|[1,3]|,
fnpg being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),|[1,3]|)) such that A220:
(
rng fnpg = LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| &
Pnpg = fnpg )
by Th43;
consider Ppgc being
Path of
|[1,3]|,
|[0 ,3]|,
fpgc being
Function of
I[01] ,
((TOP-REAL 2) | (LSeg |[1,3]|,|[0 ,3]|)) such that A221:
(
rng fpgc = LSeg |[1,3]|,
|[0 ,3]| &
Ppgc = fpgc )
by Th43;
A222:
|[1,(- 3)]| `1 = (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)) `1
by A123, A219, Lm44, Lm57, SPPOL_1:def 3;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| is
vertical
by Lm30, Lm32, SPPOL_1:37;
then
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| c= LSeg |[1,(- 3)]|,
|[1,3]|
by A119, A222, Lm31, Lm33, Lm44, GOBOARD7:65;
then A223:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| c= rectangle (- 1),1,
(- 3),3
by Lm41, XBOOLE_1:1;
set K1 =
((Pdx + Palpha) + Pnpg) + Ppgc;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| misses C
by A1, A48, A89, A110, A219, Lm77;
then A224:
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| misses Jc
by A4, XBOOLE_1:7, XBOOLE_1:63;
A225:
rng (((Pdx + Palpha) + Pnpg) + Ppgc) = (((rng Pdx) \/ (rng Palpha)) \/ (rng Pnpg)) \/ (rng Ppgc)
by Lm11;
then A226:
rng (((Pdx + Palpha) + Pnpg) + Ppgc) misses Jc
by A100, A113, A115, A118, A127, A220, A221, A224, Lm3;
A227:
rng (((Pdx + Palpha) + Pnpg) + Ppgc) = rng (- (((Pdx + Palpha) + Pnpg) + Ppgc))
by Th32;
LSeg (First_Point P1,((1 / 2) * ((UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) + (LMP Jc))),u,(rectangle (- 1),1,(- 3),3)),
|[1,3]| c= closed_inside_of_rectangle (- 1),1,
(- 3),3
by A223, Lm65, XBOOLE_1:1;
then
rng (((Pdx + Palpha) + Pnpg) + Ppgc) c= the
carrier of
(Trectangle (- 1),1,(- 3),3)
by A76, A115, A118, A120, A121, A126, A220, A221, A225, Lm2;
then reconsider v =
- (((Pdx + Palpha) + Pnpg) + Ppgc) as
Path of
CR,
DR by A227, Th30;
consider s,
t being
Point of
I[01] such that A228:
h . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
(
dom h = the
carrier of
I[01] &
dom v = the
carrier of
I[01] )
by FUNCT_2:def 1;
then
(
h . s in rng PJc &
v . t in rng (- (((Pdx + Palpha) + Pnpg) + Ppgc)) )
by FUNCT_1:def 5;
hence
contradiction
by A116, A226, A227, A228, XBOOLE_0:3;
:: thesis: verum end; end; end; end;
end;
let V be Subset of (TOP-REAL 2); :: thesis: ( V is_inside_component_of C implies V = Ux )
assume A229:
V is_inside_component_of C
; :: thesis: V = Ux
assume A230:
V <> Ux
; :: thesis: contradiction
consider VP being Subset of ((TOP-REAL 2) | (C ` )) such that
A231:
VP = V
and
A232:
VP is_a_component_of (TOP-REAL 2) | (C ` )
and
VP is bounded Subset of (Euclid 2)
by A229, JORDAN2C:17;
reconsider T2C = (TOP-REAL 2) | (C ` ) as non empty SubSpace of TOP-REAL 2 ;
VP <> {} ((TOP-REAL 2) | (C ` ))
by A232, CONNSP_1:34;
then reconsider VP = VP as non empty Subset of T2C ;
A233:
V misses C
by A48, A231, SUBSET_1:43;
consider Pjd being Path of LMP C,|[0 ,(- 3)]|, fjd being Function of I[01] ,((TOP-REAL 2) | (LSeg (LMP C),|[0 ,(- 3)]|)) such that
A234:
( rng fjd = LSeg (LMP C),|[0 ,(- 3)]| & Pjd = fjd )
by Th43;
consider Plk being Path of LMP Jc, UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd), flk being Function of I[01] ,((TOP-REAL 2) | (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))) such that
A235:
( rng flk = LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) & Plk = flk )
by Th43;
set beta = (((Pcm + Pml) + Plk) + Pkj) + Pjd;
A236:
rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) = ((((rng Pcm) \/ (rng Pml)) \/ (rng Plk)) \/ (rng Pkj)) \/ (rng Pjd)
by Lm13;
dom ((((Pcm + Pml) + Plk) + Pkj) + Pjd) = [#] I[01]
by FUNCT_2:def 1;
then
((((Pcm + Pml) + Plk) + Pkj) + Pjd) .: (dom ((((Pcm + Pml) + Plk) + Pkj) + Pjd)) is compact
by WEIERSTR:14;
then
rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) is compact
by RELAT_1:146;
then A237:
rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) is closed
;
A238:
rng Pml misses V
by A27, A233, XBOOLE_1:63;
{(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} c= LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
proof
let x be
set ;
:: according to TARSKI:def 3 :: thesis: ( not x in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} or x in LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) )
assume
x in {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
;
:: thesis: x in LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
then
(
x = LMP Jc or
x = UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) )
by TARSKI:def 2;
hence
x in LSeg (LMP Jc),
(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by RLTOPSP1:69;
:: thesis: verum
end;
then A239:
LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) = ((LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}) \/ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
by XBOOLE_1:45;
A240:
(LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} misses V
proof
assume
not
(LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} misses V
;
:: thesis: contradiction
then consider q being
set such that A241:
q in (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) \ {(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))}
and A242:
q in V
by XBOOLE_0:3;
V meets Ux
by A10, A74, A241, A242, XBOOLE_0:3;
hence
contradiction
by A10, A47, A230, A231, A232, CONNSP_1:37;
:: thesis: verum
end;
( not LMP Jc in V & not UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd) in V )
by A16, A17, A18, A39, A233, XBOOLE_0:3;
then
{(LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))} misses V
by ZFMISC_1:57;
then A243:
LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)) misses V
by A239, A240, XBOOLE_1:70;
A244:
rng Pkj misses V
by A45, A233, XBOOLE_1:63;
A245:
LSeg (LMP C),|[0 ,(- 3)]| misses V
by A1, A229, Th90;
LSeg |[0 ,3]|,(UMP C) misses V
by A1, A229, Th89;
then
((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) misses V
by A238, A243, XBOOLE_1:114;
then A246:
rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) misses V
by A77, A234, A235, A236, A244, A245, XBOOLE_1:114;
A247:
UMP C = |[((UMP C) `1 ),((UMP C) `2 )]|
by EUCLID:57;
A248:
|[0 ,3]| = |[(|[0 ,3]| `1 ),(|[0 ,3]| `2 )]|
by EUCLID:57;
A249:
LMP C = |[((LMP C) `1 ),((LMP C) `2 )]|
by EUCLID:57;
A250:
not |[(- 1),0 ]| in LSeg |[0 ,3]|,(UMP C)
by A12, A13, A20, A22, A23, A247, A248, Lm18, JGRAPH_6:9;
not |[(- 1),0 ]| in rng Pml
by A26, ZFMISC_1:55;
then A251:
not |[(- 1),0 ]| in (LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)
by A250, XBOOLE_0:def 3;
not |[(- 1),0 ]| in LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by A21, A42, A51, A53, Lm18, JGRAPH_6:9;
then A252:
not |[(- 1),0 ]| in ((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))
by A251, XBOOLE_0:def 3;
not |[(- 1),0 ]| in rng Pkj
by A44, ZFMISC_1:55;
then A253:
not |[(- 1),0 ]| in (((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))) \/ (rng Pkj)
by A252, XBOOLE_0:def 3;
not |[(- 1),0 ]| in LSeg (LMP C),|[0 ,(- 3)]|
by A30, A31, A52, A249, Lm18, Lm24, JGRAPH_6:9;
then
not |[(- 1),0 ]| in rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A77, A234, A235, A236, A253, XBOOLE_0:def 3;
then consider ra being positive real number such that
A254:
Ball |[(- 1),0 ]|,ra misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A237, Th25;
A255:
not |[1,0 ]| in LSeg |[0 ,3]|,(UMP C)
by A12, A13, A20, A22, A23, A247, A248, Lm19, JGRAPH_6:9;
not |[1,0 ]| in rng Pml
by A26, ZFMISC_1:55;
then A256:
not |[1,0 ]| in (LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)
by A255, XBOOLE_0:def 3;
not |[1,0 ]| in LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))
by A21, A42, A51, A53, Lm19, JGRAPH_6:9;
then A257:
not |[1,0 ]| in ((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))
by A256, XBOOLE_0:def 3;
not |[1,0 ]| in rng Pkj
by A44, ZFMISC_1:55;
then A258:
not |[1,0 ]| in (((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))) \/ (rng Pkj)
by A257, XBOOLE_0:def 3;
not |[1,0 ]| in LSeg (LMP C),|[0 ,(- 3)]|
by A30, A31, A52, A249, Lm19, Lm24, JGRAPH_6:9;
then
not |[1,0 ]| in rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A77, A234, A235, A236, A258, XBOOLE_0:def 3;
then consider rb being positive real number such that
A259:
Ball |[1,0 ]|,rb misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A237, Th25;
set A = Ball |[(- 1),0 ]|,ra;
set B = Ball |[1,0 ]|,rb;
A260:
|[(- 1),0 ]| in Ball |[(- 1),0 ]|,ra
by Th16;
A261:
|[1,0 ]| in Ball |[1,0 ]|,rb
by Th16;
not VP is empty
;
then consider t being set such that
A262:
t in V
by A231, XBOOLE_0:def 1;
V in { W where W is Subset of (TOP-REAL 2) : W is_inside_component_of C }
by A229;
then
t in BDD C
by A262, TARSKI:def 4;
then A263:
C = Fr V
by A231, A232, Lm17;
then
|[(- 1),0 ]| in Cl V
by A14, XBOOLE_0:def 4;
then
Ball |[(- 1),0 ]|,ra meets V
by A260, PRE_TOPC:def 13;
then consider u being set such that
A264:
u in Ball |[(- 1),0 ]|,ra
and
A265:
u in V
by XBOOLE_0:3;
|[1,0 ]| in Cl V
by A14, A263, XBOOLE_0:def 4;
then
Ball |[1,0 ]|,rb meets V
by A261, PRE_TOPC:def 13;
then consider v being set such that
A266:
v in Ball |[1,0 ]|,rb
and
A267:
v in V
by XBOOLE_0:3;
reconsider u = u, v = v as Point of (TOP-REAL 2) by A264, A266;
A268:
the carrier of (T2C | VP) = VP
by PRE_TOPC:29;
reconsider u1 = u, v1 = v as Point of (T2C | VP) by A231, A265, A267, PRE_TOPC:29;
T2C | VP is arcwise_connected
by A232, Th69;
then A269:
u1,v1 are_connected
by BORSUK_2:def 3;
then consider fuv being Function of I[01] ,(T2C | VP) such that
A270:
( fuv is continuous & fuv . 0 = u1 & fuv . 1 = v1 )
by BORSUK_2:def 1;
A271:
T2C | VP = (TOP-REAL 2) | V
by A231, GOBOARD9:4;
fuv is Path of u1,v1
by A269, A270, BORSUK_2:def 2;
then reconsider uv = fuv as Path of u,v by A269, A271, TOPALG_2:1;
A272:
rng fuv c= the carrier of (T2C | VP)
;
then A273:
rng uv misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A231, A246, A268, XBOOLE_1:63;
consider au being Path of |[(- 1),0 ]|,u, fau being Function of I[01] ,((TOP-REAL 2) | (LSeg |[(- 1),0 ]|,u)) such that
A274:
( rng fau = LSeg |[(- 1),0 ]|,u & au = fau )
by Th43;
consider vb being Path of v,|[1,0 ]|, fvb being Function of I[01] ,((TOP-REAL 2) | (LSeg v,|[1,0 ]|)) such that
A275:
( rng fvb = LSeg v,|[1,0 ]| & vb = fvb )
by Th43;
set AB = (au + uv) + vb;
A276:
rng ((au + uv) + vb) = ((rng au) \/ (rng uv)) \/ (rng vb)
by Th40;
|[(- 1),0 ]| in Ball |[(- 1),0 ]|,ra
by Th16;
then
LSeg |[(- 1),0 ]|,u c= Ball |[(- 1),0 ]|,ra
by A264, JORDAN1:def 1;
then A277:
LSeg |[(- 1),0 ]|,u misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A254, XBOOLE_1:63;
|[1,0 ]| in Ball |[1,0 ]|,rb
by Th16;
then
LSeg v,|[1,0 ]| c= Ball |[1,0 ]|,rb
by A266, JORDAN1:def 1;
then
LSeg v,|[1,0 ]| misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A259, XBOOLE_1:63;
then A278:
rng ((au + uv) + vb) misses rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd)
by A273, A274, A275, A276, A277, XBOOLE_1:114;
A279:
|[(- 1),0 ]|,|[1,0 ]| are_connected
by BORSUK_2:def 3;
A280:
V c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A1, A229, Th93;
then A281:
LSeg |[(- 1),0 ]|,u c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A14, A265, JORDAN1:def 1;
A282:
LSeg v,|[1,0 ]| c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A14, A267, A280, JORDAN1:def 1;
rng uv c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A231, A268, A272, A280, XBOOLE_1:1;
then
(LSeg |[(- 1),0 ]|,u) \/ (rng uv) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A281, XBOOLE_1:8;
then
rng ((au + uv) + vb) c= the carrier of (Trectangle (- 1),1,(- 3),3)
by A76, A274, A275, A276, A282, XBOOLE_1:8;
then reconsider h = (au + uv) + vb as Path of AR,BR by A279, Th29;
A283:
|[0 ,3]|,|[0 ,(- 3)]| are_connected
by BORSUK_2:def 3;
(LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A78, A79, XBOOLE_1:8;
then A284:
((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd))) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A75, XBOOLE_1:8;
rng Pkj c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A45, XBOOLE_1:1;
then A285:
(((LSeg |[0 ,3]|,(UMP C)) \/ (rng Pml)) \/ (LSeg (LMP Jc),(UMP ((LSeg (LMP Jc),|[0 ,(- 3)]|) /\ Jd)))) \/ (rng Pkj) c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A284, XBOOLE_1:8;
LSeg (LMP C),|[0 ,(- 3)]| c= closed_inside_of_rectangle (- 1),1,(- 3),3
by A11, A28, Lm61, Lm65, JORDAN1:def 1;
then
rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) c= the carrier of (Trectangle (- 1),1,(- 3),3)
by A76, A77, A234, A235, A236, A285, XBOOLE_1:8;
then reconsider v = (((Pcm + Pml) + Plk) + Pkj) + Pjd as Path of CR,DR by A283, Th29;
consider s, t being Point of I[01] such that
A286:
h . s = v . t
by Lm18, Lm19, Lm23, Lm25, JGRAPH_8:6;
( dom h = the carrier of I[01] & dom v = the carrier of I[01] )
by FUNCT_2:def 1;
then
( h . s in rng ((au + uv) + vb) & v . t in rng ((((Pcm + Pml) + Plk) + Pkj) + Pjd) )
by FUNCT_1:def 5;
hence
contradiction
by A278, A286, XBOOLE_0:3; :: thesis: verum