mapdheq4 - Mathbox for Norm Megill

	Mathbox for Norm Megill		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > mapdheq4		Structured version Visualization version GIF version

Theorem mapdheq4 42547

Description: Lemma for ~? mapdh . Part (4) in [Baer] p. 46. (Contributed by NM, 12-Apr-2015.)

**Hypotheses**
Ref	Expression
mapdh.q	⊢ 𝑄 = (0_g‘𝐶)
mapdh.i	⊢ 𝐼 = (𝑥 ∈ V ↦ if((2^nd ‘𝑥) = 0 , 𝑄, (℩ℎ ∈ 𝐷 ((𝑀‘(𝑁‘{(2^nd ‘𝑥)})) = (𝐽‘{ℎ}) ∧ (𝑀‘(𝑁‘{((1^st ‘(1^st ‘𝑥)) − (2^nd ‘𝑥))})) = (𝐽‘{((2^nd ‘(1^st ‘𝑥))𝑅ℎ)})))))
mapdh.h	⊢ 𝐻 = (LHyp‘𝐾)
mapdh.m	⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
mapdh.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
mapdh.v	⊢ 𝑉 = (Base‘𝑈)
mapdh.s	⊢ − = (-_g‘𝑈)
mapdhc.o	⊢ 0 = (0_g‘𝑈)
mapdh.n	⊢ 𝑁 = (LSpan‘𝑈)
mapdh.c	⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
mapdh.d	⊢ 𝐷 = (Base‘𝐶)
mapdh.r	⊢ 𝑅 = (-_g‘𝐶)
mapdh.j	⊢ 𝐽 = (LSpan‘𝐶)
mapdh.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
mapdhc.f	⊢ (𝜑 → 𝐹 ∈ 𝐷)
mapdh.mn	⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐽‘{𝐹}))
mapdhcl.x	⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
mapdhe4.y	⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
mapdhe.z	⊢ (𝜑 → 𝑍 ∈ (𝑉 ∖ { 0 }))
mapdh.xn	⊢ (𝜑 → ¬ 𝑋 ∈ (𝑁‘{𝑌, 𝑍}))
mapdh.yz	⊢ (𝜑 → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑍}))
mapdh.eg	⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) = 𝐺)
mapdh.ee	⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) = 𝐸)

**Assertion**
Ref	Expression
mapdheq4	⊢ (𝜑 → (𝐼‘⟨𝑌, 𝐺, 𝑍⟩) = 𝐸)

Distinct variable groups: 𝑥,𝐷,ℎ ℎ,𝐹,𝑥 𝑥,𝐽 𝑥,𝑀 𝑥,𝑁 𝑥, 0 𝑥,𝑄 𝑥,𝑅 𝑥, − ℎ,𝑋,𝑥 ℎ,𝑌,𝑥 𝜑,ℎ 0 ,ℎ 𝐶,ℎ 𝐷,ℎ ℎ,𝐽 ℎ,𝑀 ℎ,𝑁 𝑅,ℎ 𝑈,ℎ − ,ℎ ℎ,𝐺,𝑥 ℎ,𝐸 ℎ,𝑍,𝑥 Allowed substitution hints: 𝜑(𝑥) 𝐶(𝑥) 𝑄(ℎ) 𝑈(𝑥) 𝐸(𝑥) 𝐻(𝑥, ℎ) 𝐼(𝑥, ℎ) 𝐾(𝑥, ℎ) 𝑉(𝑥, ℎ) 𝑊(𝑥, ℎ)

**Proof of Theorem mapdheq4**
Step	Hyp	Ref	Expression
1		mapdh.ee	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) = 𝐸)
2		mapdh.q	. . . . 5 ⊢ 𝑄 = (0_g‘𝐶)
3		mapdh.i	. . . . 5 ⊢ 𝐼 = (𝑥 ∈ V ↦ if((2^nd ‘𝑥) = 0 , 𝑄, (℩ℎ ∈ 𝐷 ((𝑀‘(𝑁‘{(2^nd ‘𝑥)})) = (𝐽‘{ℎ}) ∧ (𝑀‘(𝑁‘{((1^st ‘(1^st ‘𝑥)) − (2^nd ‘𝑥))})) = (𝐽‘{((2^nd ‘(1^st ‘𝑥))𝑅ℎ)})))))
4		mapdh.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
5		mapdh.m	. . . . 5 ⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
6		mapdh.u	. . . . 5 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
7		mapdh.v	. . . . 5 ⊢ 𝑉 = (Base‘𝑈)
8		mapdh.s	. . . . 5 ⊢ − = (-_g‘𝑈)
9		mapdhc.o	. . . . 5 ⊢ 0 = (0_g‘𝑈)
10		mapdh.n	. . . . 5 ⊢ 𝑁 = (LSpan‘𝑈)
11		mapdh.c	. . . . 5 ⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
12		mapdh.d	. . . . 5 ⊢ 𝐷 = (Base‘𝐶)
13		mapdh.r	. . . . 5 ⊢ 𝑅 = (-_g‘𝐶)
14		mapdh.j	. . . . 5 ⊢ 𝐽 = (LSpan‘𝐶)
15		mapdh.k	. . . . 5 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
16		mapdhc.f	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ 𝐷)
17		mapdh.mn	. . . . 5 ⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐽‘{𝐹}))
18		mapdhcl.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
19		mapdhe.z	. . . . 5 ⊢ (𝜑 → 𝑍 ∈ (𝑉 ∖ { 0 }))
20	19	eldifad 3920	. . . . . . 7 ⊢ (𝜑 → 𝑍 ∈ 𝑉)
21	4, 6, 15	dvhlvec 41924	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ LVec)
22		mapdhe4.y	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
23	18	eldifad 3920	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
24		mapdh.yz	. . . . . . . . 9 ⊢ (𝜑 → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑍}))
25		mapdh.xn	. . . . . . . . 9 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝑁‘{𝑌, 𝑍}))
26	7, 9, 10, 21, 22, 20, 23, 24, 25	lspindp1 21294	. . . . . . . 8 ⊢ (𝜑 → ((𝑁‘{𝑋}) ≠ (𝑁‘{𝑍}) ∧ ¬ 𝑌 ∈ (𝑁‘{𝑋, 𝑍})))
27	26	simpld 500	. . . . . . 7 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑍}))
28	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 20, 27	mapdhcl 42542	. . . . . 6 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) ∈ 𝐷)
29	1, 28	eqeltrrd 2867	. . . . 5 ⊢ (𝜑 → 𝐸 ∈ 𝐷)
30	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 29, 27	mapdheq 42543	. . . 4 ⊢ (𝜑 → ((𝐼‘⟨𝑋, 𝐹, 𝑍⟩) = 𝐸 ↔ ((𝑀‘(𝑁‘{𝑍})) = (𝐽‘{𝐸}) ∧ (𝑀‘(𝑁‘{(𝑋 − 𝑍)})) = (𝐽‘{(𝐹𝑅𝐸)}))))
31	1, 30	mpbid 235	. . 3 ⊢ (𝜑 → ((𝑀‘(𝑁‘{𝑍})) = (𝐽‘{𝐸}) ∧ (𝑀‘(𝑁‘{(𝑋 − 𝑍)})) = (𝐽‘{(𝐹𝑅𝐸)})))
32	31	simpld 500	. 2 ⊢ (𝜑 → (𝑀‘(𝑁‘{𝑍})) = (𝐽‘{𝐸}))
33		mapdh.eg	. . 3 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) = 𝐺)
34	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 22, 19, 25, 24, 33, 1	mapdheq4lem 42546	. 2 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑌 − 𝑍)})) = (𝐽‘{(𝐺𝑅𝐸)}))
35	22	eldifad 3920	. . . . 5 ⊢ (𝜑 → 𝑌 ∈ 𝑉)
36	7, 9, 10, 21, 35, 19, 23, 24, 25	lspindp2 21296	. . . . . 6 ⊢ (𝜑 → ((𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}) ∧ ¬ 𝑍 ∈ (𝑁‘{𝑋, 𝑌})))
37	36	simpld 500	. . . . 5 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
38	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 35, 37	mapdhcl 42542	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ∈ 𝐷)
39	33, 38	eqeltrrd 2867	. . 3 ⊢ (𝜑 → 𝐺 ∈ 𝐷)
40	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 22, 39, 37	mapdheq 42543	. . . . 5 ⊢ (𝜑 → ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) = 𝐺 ↔ ((𝑀‘(𝑁‘{𝑌})) = (𝐽‘{𝐺}) ∧ (𝑀‘(𝑁‘{(𝑋 − 𝑌)})) = (𝐽‘{(𝐹𝑅𝐺)}))))
41	33, 40	mpbid 235	. . . 4 ⊢ (𝜑 → ((𝑀‘(𝑁‘{𝑌})) = (𝐽‘{𝐺}) ∧ (𝑀‘(𝑁‘{(𝑋 − 𝑌)})) = (𝐽‘{(𝐹𝑅𝐺)})))
42	41	simpld 500	. . 3 ⊢ (𝜑 → (𝑀‘(𝑁‘{𝑌})) = (𝐽‘{𝐺}))
43	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 39, 42, 22, 19, 29, 24	mapdheq 42543	. 2 ⊢ (𝜑 → ((𝐼‘⟨𝑌, 𝐺, 𝑍⟩) = 𝐸 ↔ ((𝑀‘(𝑁‘{𝑍})) = (𝐽‘{𝐸}) ∧ (𝑀‘(𝑁‘{(𝑌 − 𝑍)})) = (𝐽‘{(𝐺𝑅𝐸)}))))
44	32, 34, 43	mpbir2and 726	1 ⊢ (𝜑 → (𝐼‘⟨𝑌, 𝐺, 𝑍⟩) = 𝐸)

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2146 ≠ wne 2961 Vcvv 3458 ∖ cdif 3905 ifcif 4492 {csn 4594 {cpr 4596 ⟨cotp 4602 ↦ cmpt 5197 ‘cfv 6543 ℩crio 7379 (class class class)co 7423 1^st c1st 7993 2^nd c2nd 7994 Basecbs 17294 0_gc0g 17517 -_gcsg 19033 LSpanclspn 21129 HLchlt 40165 LHypclh 40799 DVecHcdvh 41893 LCDualclcd 42401 mapdcmpd 42439

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2738 ax-rep 5243 ax-sep 5262 ax-nul 5274 ax-pow 5341 ax-pr 5409 ax-un 7745 ax-cnex 11174 ax-resscn 11175 ax-1cn 11176 ax-icn 11177 ax-addcl 11178 ax-addrcl 11179 ax-mulcl 11180 ax-mulrcl 11181 ax-mulcom 11182 ax-addass 11183 ax-mulass 11184 ax-distr 11185 ax-i2m1 11186 ax-1ne0 11187 ax-1rid 11188 ax-rnegex 11189 ax-rrecex 11190 ax-cnre 11191 ax-pre-lttri 11192 ax-pre-lttrn 11193 ax-pre-ltadd 11194 ax-pre-mulgt0 11195 ax-riotaBAD 39768

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2570 df-eu 2600 df-clab 2745 df-cleq 2758 df-clel 2841 df-nfc 2915 df-ne 2962 df-nel 3068 df-ral 3083 df-rex 3093 df-rmo 3372 df-reu 3373 df-rab 3420 df-v 3460 df-sbc 3748 df-csb 3857 df-dif 3911 df-un 3913 df-in 3915 df-ss 3925 df-pss 3928 df-nul 4290 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-tp 4599 df-op 4601 df-ot 4603 df-uni 4878 df-int 4918 df-iun 4963 df-iin 4964 df-br 5115 df-opab 5179 df-mpt 5198 df-tr 5224 df-id 5561 df-eprel 5566 df-po 5574 df-so 5575 df-fr 5619 df-we 5621 df-xp 5672 df-rel 5673 df-cnv 5674 df-co 5675 df-dm 5676 df-rn 5677 df-res 5678 df-ima 5679 df-pred 6309 df-ord 6370 df-on 6371 df-lim 6372 df-suc 6373 df-iota 6499 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-riota 7380 df-ov 7426 df-oprab 7427 df-mpo 7428 df-of 7687 df-om 7872 df-1st 7995 df-2nd 7996 df-tpos 8231 df-undef 8278 df-frecs 8287 df-wrecs 8318 df-recs 8367 df-rdg 8406 df-1o 8462 df-2o 8463 df-er 8703 df-map 8835 df-en 8953 df-dom 8954 df-sdom 8955 df-fin 8956 df-pnf 11263 df-mnf 11264 df-xr 11265 df-ltxr 11266 df-le 11267 df-sub 11461 df-neg 11462 df-nn 12252 df-2 12321 df-3 12322 df-4 12323 df-5 12324 df-6 12325 df-n0 12523 df-z 12610 df-uz 12881 df-fz 13554 df-struct 17232 df-sets 17249 df-slot 17267 df-ndx 17279 df-base 17295 df-ress 17316 df-plusg 17348 df-mulr 17349 df-sca 17351 df-vsca 17352 df-0g 17519 df-mre 17663 df-mrc 17664 df-acs 17666 df-proset 18375 df-poset 18394 df-plt 18409 df-lub 18425 df-glb 18426 df-join 18427 df-meet 18428 df-p0 18504 df-p1 18505 df-lat 18513 df-clat 18580 df-mgm 18723 df-sgrp 18806 df-mnd 18822 df-submnd 18873 df-grp 19034 df-minusg 19035 df-sbg 19036 df-subg 19220 df-cntz 19418 df-oppg 19447 df-lsm 19737 df-cmn 19883 df-abl 19884 df-mgp 20248 df-rng 20262 df-ur 20295 df-ring 20348 df-oppr 20452 df-dvdsr 20472 df-unit 20473 df-invr 20503 df-dvr 20516 df-nzr 20647 df-rlreg 20830 df-domn 20831 df-drng 20866 df-lmod 21020 df-lss 21090 df-lsp 21130 df-lvec 21261 df-lsatoms 39791 df-lshyp 39792 df-lcv 39834 df-lfl 39873 df-lkr 39901 df-ldual 39939 df-oposet 39991 df-ol 39993 df-oml 39994 df-covers 40081 df-ats 40082 df-atl 40113 df-cvlat 40137 df-hlat 40166 df-llines 40313 df-lplanes 40314 df-lvols 40315 df-lines 40316 df-psubsp 40318 df-pmap 40319 df-padd 40611 df-lhyp 40803 df-laut 40804 df-ldil 40919 df-ltrn 40920 df-trl 40974 df-tgrp 41558 df-tendo 41570 df-edring 41572 df-dveca 41818 df-disoa 41844 df-dvech 41894 df-dib 41954 df-dic 41988 df-dih 42044 df-doch 42163 df-djh 42210 df-lcdual 42402 df-mapd 42440

This theorem is used by: mapdh7dN 42565 mapdh75d 42569 mapdh8a 42590 hdmap1eq4N 42621

W3C validator