Metamath Proof Explorer


Theorem rrx2pnecoorneor

Description: If two different points X and Y in a real Euclidean space of dimension 2 are different, then they are different at least at one coordinate. (Contributed by AV, 26-Feb-2023)

Ref Expression
Hypotheses rrx2pnecoorneor.i I = 1 2
rrx2pnecoorneor.b P = I
Assertion rrx2pnecoorneor X P Y P X Y X 1 Y 1 X 2 Y 2

Proof

Step Hyp Ref Expression
1 rrx2pnecoorneor.i I = 1 2
2 rrx2pnecoorneor.b P = I
3 1 raleqi i I X i = Y i i 1 2 X i = Y i
4 1ex 1 V
5 2ex 2 V
6 fveq2 i = 1 X i = X 1
7 fveq2 i = 1 Y i = Y 1
8 6 7 eqeq12d i = 1 X i = Y i X 1 = Y 1
9 fveq2 i = 2 X i = X 2
10 fveq2 i = 2 Y i = Y 2
11 9 10 eqeq12d i = 2 X i = Y i X 2 = Y 2
12 4 5 8 11 ralpr i 1 2 X i = Y i X 1 = Y 1 X 2 = Y 2
13 3 12 bitri i I X i = Y i X 1 = Y 1 X 2 = Y 2
14 13 bilanri X P Y P X 1 = Y 1 X 2 = Y 2 i I X i = Y i
15 elmapfn X I X Fn I
16 15 2 eleq2s X P X Fn I
17 elmapfn Y I Y Fn I
18 17 2 eleq2s Y P Y Fn I
19 16 18 anim12i X P Y P X Fn I Y Fn I
20 19 adantr X P Y P X 1 = Y 1 X 2 = Y 2 X Fn I Y Fn I
21 eqfnfv X Fn I Y Fn I X = Y i I X i = Y i
22 20 21 syl X P Y P X 1 = Y 1 X 2 = Y 2 X = Y i I X i = Y i
23 14 22 mpbird X P Y P X 1 = Y 1 X 2 = Y 2 X = Y
24 23 ex X P Y P X 1 = Y 1 X 2 = Y 2 X = Y
25 24 necon3ad X P Y P X Y ¬ X 1 = Y 1 X 2 = Y 2
26 25 3impia X P Y P X Y ¬ X 1 = Y 1 X 2 = Y 2
27 neorian X 1 Y 1 X 2 Y 2 ¬ X 1 = Y 1 X 2 = Y 2
28 26 27 sylibr X P Y P X Y X 1 Y 1 X 2 Y 2