Metamath Proof Explorer


Theorem prjspersym

Description: The relation in PrjSp is symmetric. (Contributed by Steven Nguyen, 1-May-2023)

Ref Expression
Hypotheses prjsprel.1 ˙=xy|xByBlKx=l·˙y
prjspertr.b B=BaseV0V
prjspertr.s S=ScalarV
prjspertr.x ·˙=V
prjspertr.k K=BaseS
Assertion prjspersym VLVecX˙YY˙X

Proof

Step Hyp Ref Expression
1 prjsprel.1 ˙=xy|xByBlKx=l·˙y
2 prjspertr.b B=BaseV0V
3 prjspertr.s S=ScalarV
4 prjspertr.x ·˙=V
5 prjspertr.k K=BaseS
6 simpllr VLVecX˙YmKX=m·˙YX˙Y
7 1 prjsprel X˙YXBYBmKX=m·˙Y
8 pm3.22 XBYBYBXB
9 8 adantr XBYBmKX=m·˙YYBXB
10 7 9 sylbi X˙YYBXB
11 6 10 syl VLVecX˙YmKX=m·˙YYBXB
12 simplll VLVecX˙YmKX=m·˙YVLVec
13 3 lvecdrng VLVecSDivRing
14 12 13 syl VLVecX˙YmKX=m·˙YSDivRing
15 simplr VLVecX˙YmKX=m·˙YmK
16 simpll XBYBmKX=m·˙YXB
17 7 16 sylbi X˙YXB
18 eldifsni XBaseV0VX0V
19 18 2 eleq2s XBX0V
20 6 17 19 3syl VLVecX˙YmKX=m·˙YX0V
21 simplr VLVecX˙YmKX=m·˙Ym=0SX=m·˙Y
22 simpr VLVecX˙YmKX=m·˙Ym=0Sm=0S
23 22 oveq1d VLVecX˙YmKX=m·˙Ym=0Sm·˙Y=0S·˙Y
24 lveclmod VLVecVLMod
25 24 ad4antr VLVecX˙YmKX=m·˙Ym=0SVLMod
26 simplr XBYBmKX=m·˙YYB
27 7 26 sylbi X˙YYB
28 eldifi YBaseV0VYBaseV
29 28 2 eleq2s YBYBaseV
30 6 27 29 3syl VLVecX˙YmKX=m·˙YYBaseV
31 30 adantr VLVecX˙YmKX=m·˙Ym=0SYBaseV
32 eqid BaseV=BaseV
33 eqid 0S=0S
34 eqid 0V=0V
35 32 3 4 33 34 lmod0vs VLModYBaseV0S·˙Y=0V
36 25 31 35 syl2anc VLVecX˙YmKX=m·˙Ym=0S0S·˙Y=0V
37 21 23 36 3eqtrd VLVecX˙YmKX=m·˙Ym=0SX=0V
38 20 37 mteqand VLVecX˙YmKX=m·˙Ym0S
39 eqid invrS=invrS
40 5 33 39 drnginvrcl SDivRingmKm0SinvrSmK
41 14 15 38 40 syl3anc VLVecX˙YmKX=m·˙YinvrSmK
42 oveq1 n=invrSmn·˙X=invrSm·˙X
43 42 eqeq2d n=invrSmY=n·˙XY=invrSm·˙X
44 43 adantl VLVecX˙YmKX=m·˙Yn=invrSmY=n·˙XY=invrSm·˙X
45 simpr VLVecX˙YmKX=m·˙YX=m·˙Y
46 nelsn m0S¬m0S
47 38 46 syl VLVecX˙YmKX=m·˙Y¬m0S
48 15 47 eldifd VLVecX˙YmKX=m·˙YmK0S
49 eldifi XBaseV0VXBaseV
50 49 2 eleq2s XBXBaseV
51 6 17 50 3syl VLVecX˙YmKX=m·˙YXBaseV
52 32 4 3 5 33 39 12 48 51 30 lvecinv VLVecX˙YmKX=m·˙YX=m·˙YY=invrSm·˙X
53 45 52 mpbid VLVecX˙YmKX=m·˙YY=invrSm·˙X
54 41 44 53 rspcedvd VLVecX˙YmKX=m·˙YnKY=n·˙X
55 1 prjsprel Y˙XYBXBnKY=n·˙X
56 11 54 55 sylanbrc VLVecX˙YmKX=m·˙YY˙X
57 simpr XBYBmKX=m·˙YmKX=m·˙Y
58 7 57 sylbi X˙YmKX=m·˙Y
59 58 adantl VLVecX˙YmKX=m·˙Y
60 56 59 r19.29a VLVecX˙YY˙X