dihoml4 - Mathbox for Norm Megill

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

Theorem dihoml4 42237

Description: Orthomodular law for constructed vector space H. Lemma 3.3(1) in [Holland95] p. 215. (poml4N 40813 analog.) (Contributed by NM, 15-Jan-2015.)

**Hypotheses**
Ref	Expression
dihoml4.h	⊢ 𝐻 = (LHyp‘𝐾)
dihoml4.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
dihoml4.s	⊢ 𝑆 = (LSubSp‘𝑈)
dihoml4.o	⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
dihoml4.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
dihoml4.x	⊢ (𝜑 → 𝑋 ∈ 𝑆)
dihoml4.y	⊢ (𝜑 → 𝑌 ∈ 𝑆)
dihoml4.c	⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑌)) = 𝑌)
dihoml4.l	⊢ (𝜑 → 𝑋 ⊆ 𝑌)

**Assertion**
Ref	Expression
dihoml4	⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)) ∩ 𝑌) = ( ⊥ ‘( ⊥ ‘𝑋)))

**Proof of Theorem dihoml4**
Step	Hyp	Ref	Expression
1		dihoml4.k	. . . . . 6 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		dihoml4.x	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ 𝑆)
3		eqid 2762	. . . . . . . . 9 ⊢ (Base‘𝑈) = (Base‘𝑈)
4		dihoml4.s	. . . . . . . . 9 ⊢ 𝑆 = (LSubSp‘𝑈)
5	3, 4	lssss 21121	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑆 → 𝑋 ⊆ (Base‘𝑈))
6	2, 5	syl 18	. . . . . . 7 ⊢ (𝜑 → 𝑋 ⊆ (Base‘𝑈))
7		dihoml4.h	. . . . . . . 8 ⊢ 𝐻 = (LHyp‘𝐾)
8		eqid 2762	. . . . . . . 8 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
9		dihoml4.u	. . . . . . . 8 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
10		dihoml4.o	. . . . . . . 8 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
11	7, 8, 9, 3, 10	dochcl 42213	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ (Base‘𝑈)) → ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊))
12	1, 6, 11	syl2anc 596	. . . . . 6 ⊢ (𝜑 → ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊))
13	7, 8, 10	dochoc 42227	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊)) → ( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) = ( ⊥ ‘𝑋))
14	1, 12, 13	syl2anc 596	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) = ( ⊥ ‘𝑋))
15	14	ineq1d 4168	. . . 4 ⊢ (𝜑 → (( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌) = (( ⊥ ‘𝑋) ∩ 𝑌))
16	15	fveq2d 6886	. . 3 ⊢ (𝜑 → ( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) = ( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)))
17	16	ineq1d 4168	. 2 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) ∩ 𝑌) = (( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)) ∩ 𝑌))
18	7, 9, 3, 10	dochssv 42215	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ (Base‘𝑈)) → ( ⊥ ‘𝑋) ⊆ (Base‘𝑈))
19	1, 6, 18	syl2anc 596	. . . 4 ⊢ (𝜑 → ( ⊥ ‘𝑋) ⊆ (Base‘𝑈))
20	7, 8, 9, 3, 10	dochcl 42213	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘𝑋) ⊆ (Base‘𝑈)) → ( ⊥ ‘( ⊥ ‘𝑋)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
21	1, 19, 20	syl2anc 596	. . 3 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑋)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
22		dihoml4.c	. . . 4 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑌)) = 𝑌)
23		dihoml4.y	. . . . . 6 ⊢ (𝜑 → 𝑌 ∈ 𝑆)
24	3, 4	lssss 21121	. . . . . 6 ⊢ (𝑌 ∈ 𝑆 → 𝑌 ⊆ (Base‘𝑈))
25	23, 24	syl 18	. . . . 5 ⊢ (𝜑 → 𝑌 ⊆ (Base‘𝑈))
26	7, 8, 9, 3, 10, 1, 25	dochoccl 42229	. . . 4 ⊢ (𝜑 → (𝑌 ∈ ran ((DIsoH‘𝐾)‘𝑊) ↔ ( ⊥ ‘( ⊥ ‘𝑌)) = 𝑌))
27	22, 26	mpbird 260	. . 3 ⊢ (𝜑 → 𝑌 ∈ ran ((DIsoH‘𝐾)‘𝑊))
28		dihoml4.l	. . . . . 6 ⊢ (𝜑 → 𝑋 ⊆ 𝑌)
29	7, 9, 3, 10	dochss 42225	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑌 ⊆ (Base‘𝑈) ∧ 𝑋 ⊆ 𝑌) → ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋))
30	1, 25, 28, 29	syl3anc 1398	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋))
31	7, 9, 3, 10	dochss 42225	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘𝑋) ⊆ (Base‘𝑈) ∧ ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋)) → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ ( ⊥ ‘( ⊥ ‘𝑌)))
32	1, 19, 30, 31	syl3anc 1398	. . . 4 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ ( ⊥ ‘( ⊥ ‘𝑌)))
33	32, 22	sseqtrd 3970	. . 3 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ 𝑌)
34	7, 8, 10, 1, 21, 27, 33	dihoml4c 42236	. 2 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) ∩ 𝑌) = ( ⊥ ‘( ⊥ ‘𝑋)))
35	17, 34	eqtr3d 2799	1 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)) ∩ 𝑌) = ( ⊥ ‘( ⊥ ‘𝑋)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2145 ∩ cin 3901 ⊆ wss 3902 ran crn 5660 ‘cfv 6537 Basecbs 17305 LSubSpclss 21116 HLchlt 40210 LHypclh 40844 DVecHcdvh 41938 DIsoHcdih 42088 ocHcoch 42207

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 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7739 ax-cnex 11183 ax-resscn 11184 ax-1cn 11185 ax-icn 11186 ax-addcl 11187 ax-addrcl 11188 ax-mulcl 11189 ax-mulrcl 11190 ax-mulcom 11191 ax-addass 11192 ax-mulass 11193 ax-distr 11194 ax-i2m1 11195 ax-1ne0 11196 ax-1rid 11197 ax-rnegex 11198 ax-rrecex 11199 ax-cnre 11200 ax-pre-lttri 11201 ax-pre-lttrn 11202 ax-pre-ltadd 11203 ax-pre-mulgt0 11204 ax-riotaBAD 39813

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 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-riota 7373 df-ov 7419 df-oprab 7420 df-mpo 7421 df-om 7866 df-1st 7989 df-2nd 7990 df-tpos 8227 df-undef 8274 df-frecs 8283 df-wrecs 8314 df-recs 8363 df-rdg 8402 df-1o 8458 df-er 8699 df-map 8831 df-en 8956 df-dom 8957 df-sdom 8958 df-fin 8959 df-pnf 11272 df-mnf 11273 df-xr 11274 df-ltxr 11275 df-le 11276 df-sub 11470 df-neg 11471 df-nn 12261 df-2 12330 df-3 12331 df-4 12332 df-5 12333 df-6 12334 df-n0 12532 df-z 12619 df-uz 12891 df-fz 13564 df-struct 17243 df-sets 17260 df-slot 17278 df-ndx 17290 df-base 17306 df-ress 17327 df-plusg 17359 df-mulr 17360 df-sca 17362 df-vsca 17363 df-0g 17530 df-proset 18386 df-poset 18405 df-plt 18420 df-lub 18436 df-glb 18437 df-join 18438 df-meet 18439 df-p0 18515 df-p1 18516 df-lat 18524 df-clat 18591 df-mgm 18734 df-sgrp 18823 df-mnd 18839 df-submnd 18893 df-grp 19061 df-minusg 19062 df-sbg 19063 df-subg 19247 df-cntz 19445 df-lsm 19764 df-cmn 19910 df-abl 19911 df-mgp 20275 df-rng 20289 df-ur 20322 df-ring 20375 df-oppr 20479 df-dvdsr 20499 df-unit 20500 df-invr 20530 df-dvr 20543 df-drng 20893 df-lmod 21047 df-lss 21117 df-lsp 21157 df-lvec 21288 df-lsatoms 39836 df-oposet 40036 df-ol 40038 df-oml 40039 df-covers 40126 df-ats 40127 df-atl 40158 df-cvlat 40182 df-hlat 40211 df-llines 40358 df-lplanes 40359 df-lvols 40360 df-lines 40361 df-psubsp 40363 df-pmap 40364 df-padd 40656 df-lhyp 40848 df-laut 40849 df-ldil 40964 df-ltrn 40965 df-trl 41019 df-tendo 41615 df-edring 41617 df-disoa 41889 df-dvech 41939 df-dib 41999 df-dic 42033 df-dih 42089 df-doch 42208

This theorem is used by: dochexmidlem6 42325

W3C validator