Theorem pjoml4i 30633

Description: Variation of orthomodular law. (Contributed by NM, 6-Dec-2000.) (New usage is discouraged.)

Hypotheses

Ref	Expression
pjoml2.1	⊢ 𝐴 ∈ Cℋ
pjoml2.2	⊢ 𝐵 ∈ Cℋ

Assertion

Ref	Expression
pjoml4i	⊢ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) = (𝐴 ∨ℋ 𝐵)

Proof of Theorem pjoml4i

Step	Hyp	Ref	Expression
1		inss1 4215	. . 3 ⊢ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))) ⊆ 𝐵
2		pjoml2.2	. . . . 5 ⊢ 𝐵 ∈ Cℋ
3		pjoml2.1	. . . . . . 7 ⊢ 𝐴 ∈ Cℋ
4	3	choccli 30353	. . . . . 6 ⊢ (⊥‘𝐴) ∈ Cℋ
5	2	choccli 30353	. . . . . 6 ⊢ (⊥‘𝐵) ∈ Cℋ
6	4, 5	chjcli 30503	. . . . 5 ⊢ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)) ∈ Cℋ
7	2, 6	chincli 30506	. . . 4 ⊢ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))) ∈ Cℋ
8	7, 2, 3	chlej2i 30520	. . 3 ⊢ ((𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))) ⊆ 𝐵 → (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ⊆ (𝐴 ∨ℋ 𝐵))
9	1, 8	ax-mp 5	. 2 ⊢ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ⊆ (𝐴 ∨ℋ 𝐵)
10	3, 7	chub1i 30515	. . 3 ⊢ 𝐴 ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))
11	3, 2	chdmm1i 30523	. . . . . . . 8 ⊢ (⊥‘(𝐴 ∩ 𝐵)) = ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))
12	11	ineq1i 4195	. . . . . . 7 ⊢ ((⊥‘(𝐴 ∩ 𝐵)) ∩ 𝐵) = (((⊥‘𝐴) ∨ℋ (⊥‘𝐵)) ∩ 𝐵)
13		incom 4188	. . . . . . 7 ⊢ (((⊥‘𝐴) ∨ℋ (⊥‘𝐵)) ∩ 𝐵) = (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))
14	12, 13	eqtri 2759	. . . . . 6 ⊢ ((⊥‘(𝐴 ∩ 𝐵)) ∩ 𝐵) = (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))
15	14	oveq2i 7395	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ∨ℋ ((⊥‘(𝐴 ∩ 𝐵)) ∩ 𝐵)) = ((𝐴 ∩ 𝐵) ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))
16		inss2 4216	. . . . . 6 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐵
17	3, 2	chincli 30506	. . . . . . 7 ⊢ (𝐴 ∩ 𝐵) ∈ Cℋ
18	17, 2	pjoml2i 30631	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐵 → ((𝐴 ∩ 𝐵) ∨ℋ ((⊥‘(𝐴 ∩ 𝐵)) ∩ 𝐵)) = 𝐵)
19	16, 18	ax-mp 5	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ∨ℋ ((⊥‘(𝐴 ∩ 𝐵)) ∩ 𝐵)) = 𝐵
20	15, 19	eqtr3i 2761	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) = 𝐵
21		inss1 4215	. . . . 5 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐴
22	17, 3, 7	chlej1i 30519	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐴 → ((𝐴 ∩ 𝐵) ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))))
23	21, 22	ax-mp 5	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))
24	20, 23	eqsstrri 4004	. . 3 ⊢ 𝐵 ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))
25	3, 7	chjcli 30503	. . . 4 ⊢ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ∈ Cℋ
26	3, 2, 25	chlubii 30518	. . 3 ⊢ ((𝐴 ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) ∧ 𝐵 ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))) → (𝐴 ∨ℋ 𝐵) ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))))
27	10, 24, 26	mp2an 690	. 2 ⊢ (𝐴 ∨ℋ 𝐵) ⊆ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵))))
28	9, 27	eqssi 3985	1 ⊢ (𝐴 ∨ℋ (𝐵 ∩ ((⊥‘𝐴) ∨ℋ (⊥‘𝐵)))) = (𝐴 ∨ℋ 𝐵)

Syntax hints:   = wceq 1541   ∈ wcel 2106   ∩ cin 3934   ⊆ wss 3935  ‘cfv 6523  (class class class)co 7384   C_ℋ cch 29975  ⊥cort 29976   ∨_ℋ chj 29979

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5269  ax-sep 5283  ax-nul 5290  ax-pow 5347  ax-pr 5411  ax-un 7699  ax-inf2 9608  ax-cc 10402  ax-cnex 11138  ax-resscn 11139  ax-1cn 11140  ax-icn 11141  ax-addcl 11142  ax-addrcl 11143  ax-mulcl 11144  ax-mulrcl 11145  ax-mulcom 11146  ax-addass 11147  ax-mulass 11148  ax-distr 11149  ax-i2m1 11150  ax-1ne0 11151  ax-1rid 11152  ax-rnegex 11153  ax-rrecex 11154  ax-cnre 11155  ax-pre-lttri 11156  ax-pre-lttrn 11157  ax-pre-ltadd 11158  ax-pre-mulgt0 11159  ax-pre-sup 11160  ax-addf 11161  ax-mulf 11162  ax-hilex 30045  ax-hfvadd 30046  ax-hvcom 30047  ax-hvass 30048  ax-hv0cl 30049  ax-hvaddid 30050  ax-hfvmul 30051  ax-hvmulid 30052  ax-hvmulass 30053  ax-hvdistr1 30054  ax-hvdistr2 30055  ax-hvmul0 30056  ax-hfi 30125  ax-his1 30128  ax-his2 30129  ax-his3 30130  ax-his4 30131  ax-hcompl 30248

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3371  df-reu 3372  df-rab 3426  df-v 3468  df-sbc 3765  df-csb 3881  df-dif 3938  df-un 3940  df-in 3942  df-ss 3952  df-pss 3954  df-nul 4310  df-if 4514  df-pw 4589  df-sn 4614  df-pr 4616  df-tp 4618  df-op 4620  df-uni 4893  df-int 4935  df-iun 4983  df-iin 4984  df-br 5133  df-opab 5195  df-mpt 5216  df-tr 5250  df-id 5558  df-eprel 5564  df-po 5572  df-so 5573  df-fr 5615  df-se 5616  df-we 5617  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6280  df-ord 6347  df-on 6348  df-lim 6349  df-suc 6350  df-iota 6475  df-fun 6525  df-fn 6526  df-f 6527  df-f1 6528  df-fo 6529  df-f1o 6530  df-fv 6531  df-isom 6532  df-riota 7340  df-ov 7387  df-oprab 7388  df-mpo 7389  df-of 7644  df-om 7830  df-1st 7948  df-2nd 7949  df-supp 8120  df-frecs 8239  df-wrecs 8270  df-recs 8344  df-rdg 8383  df-1o 8439  df-2o 8440  df-oadd 8443  df-omul 8444  df-er 8677  df-map 8796  df-pm 8797  df-ixp 8865  df-en 8913  df-dom 8914  df-sdom 8915  df-fin 8916  df-fsupp 9335  df-fi 9378  df-sup 9409  df-inf 9410  df-oi 9477  df-card 9906  df-acn 9909  df-pnf 11222  df-mnf 11223  df-xr 11224  df-ltxr 11225  df-le 11226  df-sub 11418  df-neg 11419  df-div 11844  df-nn 12185  df-2 12247  df-3 12248  df-4 12249  df-5 12250  df-6 12251  df-7 12252  df-8 12253  df-9 12254  df-n0 12445  df-z 12531  df-dec 12650  df-uz 12795  df-q 12905  df-rp 12947  df-xneg 13064  df-xadd 13065  df-xmul 13066  df-ioo 13300  df-ico 13302  df-icc 13303  df-fz 13457  df-fzo 13600  df-fl 13729  df-seq 13939  df-exp 14000  df-hash 14263  df-cj 15018  df-re 15019  df-im 15020  df-sqrt 15154  df-abs 15155  df-clim 15404  df-rlim 15405  df-sum 15605  df-struct 17052  df-sets 17069  df-slot 17087  df-ndx 17099  df-base 17117  df-ress 17146  df-plusg 17182  df-mulr 17183  df-starv 17184  df-sca 17185  df-vsca 17186  df-ip 17187  df-tset 17188  df-ple 17189  df-ds 17191  df-unif 17192  df-hom 17193  df-cco 17194  df-rest 17340  df-topn 17341  df-0g 17359  df-gsum 17360  df-topgen 17361  df-pt 17362  df-prds 17365  df-xrs 17420  df-qtop 17425  df-imas 17426  df-xps 17428  df-mre 17502  df-mrc 17503  df-acs 17505  df-mgm 18533  df-sgrp 18582  df-mnd 18593  df-submnd 18638  df-mulg 18909  df-cntz 19133  df-cmn 19600  df-psmet 20847  df-xmet 20848  df-met 20849  df-bl 20850  df-mopn 20851  df-fbas 20852  df-fg 20853  df-cnfld 20856  df-top 22302  df-topon 22319  df-topsp 22341  df-bases 22355  df-cld 22429  df-ntr 22430  df-cls 22431  df-nei 22508  df-cn 22637  df-cnp 22638  df-lm 22639  df-haus 22725  df-tx 22972  df-hmeo 23165  df-fil 23256  df-fm 23348  df-flim 23349  df-flf 23350  df-xms 23732  df-ms 23733  df-tms 23734  df-cfil 24678  df-cau 24679  df-cmet 24680  df-grpo 29539  df-gid 29540  df-ginv 29541  df-gdiv 29542  df-ablo 29591  df-vc 29605  df-nv 29638  df-va 29641  df-ba 29642  df-sm 29643  df-0v 29644  df-vs 29645  df-nmcv 29646  df-ims 29647  df-dip 29747  df-ssp 29768  df-ph 29859  df-cbn 29909  df-hnorm 30014  df-hba 30015  df-hvsub 30017  df-hlim 30018  df-hcau 30019  df-sh 30253  df-ch 30267  df-oc 30298  df-ch0 30299  df-shs 30354  df-chj 30356

This theorem is referenced by:  osumcor2i  30690