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 42625

Description: Orthomodular law for constructed vector space H. Lemma 3.3(1) in [Holland95] p. 215. (poml4N 41201 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 2763	. . . . . . . . 9 ⊢ (Base‘𝑈) = (Base‘𝑈)
4		dihoml4.s	. . . . . . . . 9 ⊢ 𝑆 = (LSubSp‘𝑈)
5	3, 4	lssss 21238	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑆 → 𝑋 ⊆ (Base‘𝑈))
6	2, 5	syl 18	. . . . . . 7 ⊢ (𝜑 → 𝑋 ⊆ (Base‘𝑈))
7		dihoml4.h	. . . . . . . 8 ⊢ 𝐻 = (LHyp‘𝐾)
8		eqid 2763	. . . . . . . 8 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
9		dihoml4.u	. . . . . . . 8 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
10		dihoml4.o	. . . . . . . 8 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
11	7, 8, 9, 3, 10	dochcl 42601	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ (Base‘𝑈)) → ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊))
12	1, 6, 11	syl2anc 596	. . . . . 6 ⊢ (𝜑 → ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊))
13	7, 8, 10	dochoc 42615	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘𝑋) ∈ ran ((DIsoH‘𝐾)‘𝑊)) → ( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) = ( ⊥ ‘𝑋))
14	1, 12, 13	syl2anc 596	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) = ( ⊥ ‘𝑋))
15	14	ineq1d 4119	. . . 4 ⊢ (𝜑 → (( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌) = (( ⊥ ‘𝑋) ∩ 𝑌))
16	15	fveq2d 6909	. . 3 ⊢ (𝜑 → ( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) = ( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)))
17	16	ineq1d 4119	. 2 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) ∩ 𝑌) = (( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)) ∩ 𝑌))
18	7, 9, 3, 10	dochssv 42603	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ (Base‘𝑈)) → ( ⊥ ‘𝑋) ⊆ (Base‘𝑈))
19	1, 6, 18	syl2anc 596	. . . 4 ⊢ (𝜑 → ( ⊥ ‘𝑋) ⊆ (Base‘𝑈))
20	7, 8, 9, 3, 10	dochcl 42601	. . . 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 21238	. . . . . 6 ⊢ (𝑌 ∈ 𝑆 → 𝑌 ⊆ (Base‘𝑈))
25	23, 24	syl 18	. . . . 5 ⊢ (𝜑 → 𝑌 ⊆ (Base‘𝑈))
26	7, 8, 9, 3, 10, 1, 25	dochoccl 42617	. . . 4 ⊢ (𝜑 → (𝑌 ∈ ran ((DIsoH‘𝐾)‘𝑊) ↔ ( ⊥ ‘( ⊥ ‘𝑌)) = 𝑌))
27	22, 26	mpbird 260	. . 3 ⊢ (𝜑 → 𝑌 ∈ ran ((DIsoH‘𝐾)‘𝑊))
28		dihoml4.l	. . . . . 6 ⊢ (𝜑 → 𝑋 ⊆ 𝑌)
29	7, 9, 3, 10	dochss 42613	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑌 ⊆ (Base‘𝑈) ∧ 𝑋 ⊆ 𝑌) → ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋))
30	1, 25, 28, 29	syl3anc 1399	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋))
31	7, 9, 3, 10	dochss 42613	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘𝑋) ⊆ (Base‘𝑈) ∧ ( ⊥ ‘𝑌) ⊆ ( ⊥ ‘𝑋)) → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ ( ⊥ ‘( ⊥ ‘𝑌)))
32	1, 19, 30, 31	syl3anc 1399	. . . 4 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ ( ⊥ ‘( ⊥ ‘𝑌)))
33	32, 22	sseqtrd 3949	. . 3 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘𝑋)) ⊆ 𝑌)
34	7, 8, 10, 1, 21, 27, 33	dihoml4c 42624	. 2 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘( ⊥ ‘( ⊥ ‘𝑋))) ∩ 𝑌)) ∩ 𝑌) = ( ⊥ ‘( ⊥ ‘𝑋)))
35	17, 34	eqtr3d 2800	1 ⊢ (𝜑 → (( ⊥ ‘(( ⊥ ‘𝑋) ∩ 𝑌)) ∩ 𝑌) = ( ⊥ ‘( ⊥ ‘𝑋)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2147 ⊆ wss 3900 ∩ cin 4092 ran crn 5656 ‘cfv 6555 Basecbs 17413 LSubSpclss 21233 HLchlt 40598 LHypclh 41232 DVecHcdvh 42326 DIsoHcdih 42476 ocHcoch 42595

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 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5235 ax-sep 5252 ax-nul 5263 ax-pow 5331 ax-pr 5395 ax-un 7772 ax-cnex 11280 ax-resscn 11281 ax-1cn 11282 ax-icn 11283 ax-addcl 11284 ax-addrcl 11285 ax-mulcl 11286 ax-mulrcl 11287 ax-mulcom 11288 ax-addass 11289 ax-mulass 11290 ax-distr 11291 ax-i2m1 11292 ax-1ne0 11293 ax-1rid 11294 ax-rnegex 11295 ax-rrecex 11296 ax-cnre 11297 ax-pre-lttri 11298 ax-pre-lttrn 11299 ax-pre-ltadd 11300 ax-pre-mulgt0 11301 ax-riotaBAD 40201

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 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-tp 4593 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5107 df-opab 5171 df-mpt 5190 df-tr 5216 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6319 df-ord 6380 df-on 6381 df-lim 6382 df-suc 6383 df-iota 6509 df-fun 6557 df-fn 6558 df-f 6559 df-f1 6560 df-fo 6561 df-f1o 6562 df-fv 6563 df-riota 7397 df-ov 7443 df-oprab 7444 df-mpo 7445 df-om 7899 df-1st 8022 df-2nd 8023 df-tpos 8268 df-undef 8315 df-frecs 8324 df-wrecs 8355 df-recs 8404 df-rdg 8443 df-1o 8501 df-er 8742 df-map 8874 df-en 8999 df-dom 9000 df-sdom 9001 df-fin 9002 df-pnf 11369 df-mnf 11370 df-xr 11371 df-ltxr 11372 df-le 11373 df-sub 11567 df-neg 11568 df-nn 12360 df-2 12429 df-3 12430 df-4 12431 df-5 12432 df-6 12433 df-n0 12631 df-z 12718 df-uz 12990 df-fz 13664 df-struct 17351 df-sets 17368 df-slot 17386 df-ndx 17398 df-base 17414 df-ress 17435 df-plusg 17467 df-mulr 17468 df-sca 17470 df-vsca 17471 df-0g 17638 df-proset 18494 df-poset 18513 df-plt 18528 df-lub 18544 df-glb 18545 df-join 18546 df-meet 18547 df-p0 18623 df-p1 18624 df-lat 18632 df-clat 18699 df-mgm 18842 df-sgrp 18934 df-mnd 18950 df-submnd 19005 df-grp 19173 df-minusg 19174 df-sbg 19175 df-subg 19359 df-cntz 19558 df-lsm 19877 df-cmn 20023 df-abl 20024 df-mgp 20388 df-rng 20402 df-ur 20435 df-ring 20488 df-oppr 20594 df-dvdsr 20614 df-unit 20615 df-invr 20645 df-dvr 20658 df-drng 21009 df-lmod 21164 df-lss 21234 df-lsp 21274 df-lvec 21405 df-lsatoms 40224 df-oposet 40424 df-ol 40426 df-oml 40427 df-covers 40514 df-ats 40515 df-atl 40546 df-cvlat 40570 df-hlat 40599 df-llines 40746 df-lplanes 40747 df-lvols 40748 df-lines 40749 df-psubsp 40751 df-pmap 40752 df-padd 41044 df-lhyp 41236 df-laut 41237 df-ldil 41352 df-ltrn 41353 df-trl 41407 df-tendo 42003 df-edring 42005 df-disoa 42277 df-dvech 42327 df-dib 42387 df-dic 42421 df-dih 42477 df-doch 42596

This theorem is used by: dochexmidlem6 42713

W3C validator