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 simpr X P Y P X 1 = Y 1 X 2 = Y 2 X 1 = Y 1 X 2 = Y 2
4 1 raleqi i I X i = Y i i 1 2 X i = Y i
5 1ex 1 V
6 2ex 2 V
7 fveq2 i = 1 X i = X 1
8 fveq2 i = 1 Y i = Y 1
9 7 8 eqeq12d i = 1 X i = Y i X 1 = Y 1
10 fveq2 i = 2 X i = X 2
11 fveq2 i = 2 Y i = Y 2
12 10 11 eqeq12d i = 2 X i = Y i X 2 = Y 2
13 5 6 9 12 ralpr i 1 2 X i = Y i X 1 = Y 1 X 2 = Y 2
14 4 13 bitri i I X i = Y i X 1 = Y 1 X 2 = Y 2
15 3 14 sylibr X P Y P X 1 = Y 1 X 2 = Y 2 i I X i = Y i
16 elmapfn X I X Fn I
17 16 2 eleq2s X P X Fn I
18 elmapfn Y I Y Fn I
19 18 2 eleq2s Y P Y Fn I
20 17 19 anim12i X P Y P X Fn I Y Fn I
21 20 adantr X P Y P X 1 = Y 1 X 2 = Y 2 X Fn I Y Fn I
22 eqfnfv X Fn I Y Fn I X = Y i I X i = Y i
23 21 22 syl X P Y P X 1 = Y 1 X 2 = Y 2 X = Y i I X i = Y i
24 15 23 mpbird X P Y P X 1 = Y 1 X 2 = Y 2 X = Y
25 24 ex X P Y P X 1 = Y 1 X 2 = Y 2 X = Y
26 25 necon3ad X P Y P X Y ¬ X 1 = Y 1 X 2 = Y 2
27 26 3impia X P Y P X Y ¬ X 1 = Y 1 X 2 = Y 2
28 neorian X 1 Y 1 X 2 Y 2 ¬ X 1 = Y 1 X 2 = Y 2
29 27 28 sylibr X P Y P X Y X 1 Y 1 X 2 Y 2