Lm1:
for x being Real holds (x ^2) + 1 > 0
Lm2:
dom proj1 = the carrier of (TOP-REAL 2)
by FUNCT_2:def 1;
Lm3:
dom proj2 = the carrier of (TOP-REAL 2)
by FUNCT_2:def 1;
Lm4:
for K1 being non empty Subset of (TOP-REAL 2)
for q being Point of ((TOP-REAL 2) | K1) holds (proj2 | K1) . q = proj2 . q
Lm5:
for K1 being non empty Subset of (TOP-REAL 2) holds proj2 | K1 is continuous Function of ((TOP-REAL 2) | K1),R^1
Lm6:
for K1 being non empty Subset of (TOP-REAL 2)
for q being Point of ((TOP-REAL 2) | K1) holds (proj1 | K1) . q = proj1 . q
Lm7:
for K1 being non empty Subset of (TOP-REAL 2) holds proj1 | K1 is continuous Function of ((TOP-REAL 2) | K1),R^1
Lm8:
0.REAL 2 = 0. (TOP-REAL 2)
by EUCLID:66;
Lm9:
( ( (1.REAL 2) `2 <= (1.REAL 2) `1 & - ((1.REAL 2) `1) <= (1.REAL 2) `2 ) or ( (1.REAL 2) `2 >= (1.REAL 2) `1 & (1.REAL 2) `2 <= - ((1.REAL 2) `1) ) )
by JGRAPH_2:5;
Lm10:
1.REAL 2 <> 0. (TOP-REAL 2)
by Lm8, REVROT_1:19;
Lm11:
for K1 being non empty Subset of (TOP-REAL 2) holds dom (proj2 * (Sq_Circ | K1)) = the carrier of ((TOP-REAL 2) | K1)
Lm12:
for K1 being non empty Subset of (TOP-REAL 2) holds dom (proj1 * (Sq_Circ | K1)) = the carrier of ((TOP-REAL 2) | K1)
Lm13:
NonZero (TOP-REAL 2) <> {}
by JGRAPH_2:9;
Lm14:
( ( (1.REAL 2) `1 <= (1.REAL 2) `2 & - ((1.REAL 2) `2) <= (1.REAL 2) `1 ) or ( (1.REAL 2) `1 >= (1.REAL 2) `2 & (1.REAL 2) `1 <= - ((1.REAL 2) `2) ) )
by JGRAPH_2:5;
Lm15:
1.REAL 2 <> 0. (TOP-REAL 2)
by Lm8, REVROT_1:19;
Lm16:
TopStruct(# the carrier of (TOP-REAL 2), the topology of (TOP-REAL 2) #) = TopSpaceMetr (Euclid 2)
by EUCLID:def 8;
Lm17:
for K1 being non empty Subset of (TOP-REAL 2) holds proj2 * ((Sq_Circ ") | K1) is Function of ((TOP-REAL 2) | K1),R^1
Lm18:
for K1 being non empty Subset of (TOP-REAL 2) holds proj1 * ((Sq_Circ ") | K1) is Function of ((TOP-REAL 2) | K1),R^1
Lm20:
now for px1 being Real holds
( not (px1 ^2) - 1 = 0 or px1 = 1 or px1 = - 1 )
let px1 be
Real;
( not (px1 ^2) - 1 = 0 or px1 = 1 or px1 = - 1 )assume
(px1 ^2) - 1
= 0
;
( px1 = 1 or px1 = - 1 )then
(px1 - 1) * (px1 + 1) = 0
;
then
(
px1 - 1
= 0 or
px1 + 1
= 0 )
by XCMPLX_1:6;
hence
(
px1 = 1 or
px1 = - 1 )
;
verum
end;