cdleme42f - Mathbox for Norm Megill

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

Theorem cdleme42f 36554

Description: Part of proof of Lemma E in [Crawley] p. 113. (Contributed by NM, 8-Mar-2013.)

**Hypotheses**
Ref	Expression
cdleme41.b	⊢ 𝐵 = (Base‘𝐾)
cdleme41.l	⊢ ≤ = (le‘𝐾)
cdleme41.j	⊢ ∨ = (join‘𝐾)
cdleme41.m	⊢ ∧ = (meet‘𝐾)
cdleme41.a	⊢ 𝐴 = (Atoms‘𝐾)
cdleme41.h	⊢ 𝐻 = (LHyp‘𝐾)
cdleme41.u	⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
cdleme41.d	⊢ 𝐷 = ((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)))
cdleme41.e	⊢ 𝐸 = ((𝑡 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑡) ∧ 𝑊)))
cdleme41.g	⊢ 𝐺 = ((𝑃 ∨ 𝑄) ∧ (𝐸 ∨ ((𝑠 ∨ 𝑡) ∧ 𝑊)))
cdleme41.i	⊢ 𝐼 = (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐺))
cdleme41.n	⊢ 𝑁 = if(𝑠 ≤ (𝑃 ∨ 𝑄), 𝐼, 𝐷)
cdleme41.o	⊢ 𝑂 = (℩𝑧 ∈ 𝐵 ∀𝑠 ∈ 𝐴 ((¬ 𝑠 ≤ 𝑊 ∧ (𝑠 ∨ (𝑥 ∧ 𝑊)) = 𝑥) → 𝑧 = (𝑁 ∨ (𝑥 ∧ 𝑊))))
cdleme41.f	⊢ 𝐹 = (𝑥 ∈ 𝐵 ↦ if((𝑃 ≠ 𝑄 ∧ ¬ 𝑥 ≤ 𝑊), 𝑂, 𝑥))
cdleme34e.v	⊢ 𝑉 = ((𝑅 ∨ 𝑆) ∧ 𝑊)

**Assertion**
Ref	Expression
cdleme42f	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝐹‘(𝑅 ∨ 𝑉)) = ((𝐹‘𝑅) ∨ 𝑉))

Distinct variable groups: 𝐴,𝑠 ∨ ,𝑠 ≤ ,𝑠 ∧ ,𝑠 𝑃,𝑠 𝑄,𝑠 𝑅,𝑠 𝑆,𝑠 𝑈,𝑠 𝑊,𝑠 𝑦,𝑡,𝐴,𝑠 𝐵,𝑠,𝑡,𝑦 𝑦,𝐷 𝑦,𝐺 𝐸,𝑠,𝑦 𝐻,𝑠,𝑡,𝑦 𝑡, ∨ ,𝑦 𝐾,𝑠,𝑡,𝑦 𝑡, ≤ ,𝑦 𝑡, ∧ ,𝑦 𝑡,𝑃,𝑦 𝑡,𝑄,𝑦 𝑡,𝑅,𝑦 𝑡,𝑆,𝑦 𝑡,𝑈,𝑦 𝑡,𝑊,𝑦 𝑥,𝑧,𝐴 𝑥,𝐵,𝑧 𝑧,𝐸,𝑠 𝑧,𝐻 𝑥, ∨ ,𝑧 𝑧,𝐾 𝑥, ≤ ,𝑧 𝑥, ∧ ,𝑧 𝑥,𝑁,𝑧 𝑥,𝑃,𝑧 𝑥,𝑄,𝑧 𝑥,𝑅,𝑧 𝑥,𝑆,𝑧 𝑥,𝑈,𝑧 𝑥,𝑊,𝑧,𝑠,𝑡,𝑦 𝑉,𝑠,𝑡,𝑥,𝑧 Allowed substitution hints: 𝐷(𝑥,𝑧,𝑡,𝑠) 𝐸(𝑥,𝑡) 𝐹(𝑥,𝑦,𝑧,𝑡,𝑠) 𝐺(𝑥,𝑧,𝑡,𝑠) 𝐻(𝑥) 𝐼(𝑥,𝑦,𝑧,𝑡,𝑠) 𝐾(𝑥) 𝑁(𝑦,𝑡,𝑠) 𝑂(𝑥,𝑦,𝑧,𝑡,𝑠) 𝑉(𝑦)

**Proof of Theorem cdleme42f**
Step	Hyp	Ref	Expression
1		cdleme41.b	. . 3 ⊢ 𝐵 = (Base‘𝐾)
2		cdleme41.l	. . 3 ⊢ ≤ = (le‘𝐾)
3		cdleme41.j	. . 3 ⊢ ∨ = (join‘𝐾)
4		cdleme41.m	. . 3 ⊢ ∧ = (meet‘𝐾)
5		cdleme41.a	. . 3 ⊢ 𝐴 = (Atoms‘𝐾)
6		cdleme41.h	. . 3 ⊢ 𝐻 = (LHyp‘𝐾)
7		cdleme41.u	. . 3 ⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
8		cdleme41.d	. . 3 ⊢ 𝐷 = ((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)))
9		cdleme41.e	. . 3 ⊢ 𝐸 = ((𝑡 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑡) ∧ 𝑊)))
10		cdleme41.g	. . 3 ⊢ 𝐺 = ((𝑃 ∨ 𝑄) ∧ (𝐸 ∨ ((𝑠 ∨ 𝑡) ∧ 𝑊)))
11		cdleme41.i	. . 3 ⊢ 𝐼 = (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐺))
12		cdleme41.n	. . 3 ⊢ 𝑁 = if(𝑠 ≤ (𝑃 ∨ 𝑄), 𝐼, 𝐷)
13		cdleme41.o	. . 3 ⊢ 𝑂 = (℩𝑧 ∈ 𝐵 ∀𝑠 ∈ 𝐴 ((¬ 𝑠 ≤ 𝑊 ∧ (𝑠 ∨ (𝑥 ∧ 𝑊)) = 𝑥) → 𝑧 = (𝑁 ∨ (𝑥 ∧ 𝑊))))
14		cdleme41.f	. . 3 ⊢ 𝐹 = (𝑥 ∈ 𝐵 ↦ if((𝑃 ≠ 𝑄 ∧ ¬ 𝑥 ≤ 𝑊), 𝑂, 𝑥))
15		cdleme34e.v	. . 3 ⊢ 𝑉 = ((𝑅 ∨ 𝑆) ∧ 𝑊)
16	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15	cdleme42e 36553	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝐹‘(𝑅 ∨ 𝑉)) = (⦋𝑅 / 𝑠⦌𝑁 ∨ ((𝑅 ∨ 𝑉) ∧ 𝑊)))
17	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14	cdleme32fva1 36512	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ 𝑃 ≠ 𝑄) → (𝐹‘𝑅) = ⦋𝑅 / 𝑠⦌𝑁)
18	17	3adant2r 1231	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝐹‘𝑅) = ⦋𝑅 / 𝑠⦌𝑁)
19		simp11 1264	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
20		simp2l 1260	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊))
21		simp2r 1261	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊))
22	1, 2, 3, 4, 5, 6, 15	cdleme42a 36545	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) → (𝑅 ∨ 𝑆) = (𝑅 ∨ 𝑉))
23	19, 20, 21, 22	syl3anc 1494	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝑅 ∨ 𝑆) = (𝑅 ∨ 𝑉))
24	23	oveq1d 6925	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → ((𝑅 ∨ 𝑆) ∧ 𝑊) = ((𝑅 ∨ 𝑉) ∧ 𝑊))
25	15, 24	syl5eq 2873	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → 𝑉 = ((𝑅 ∨ 𝑉) ∧ 𝑊))
26	18, 25	oveq12d 6928	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → ((𝐹‘𝑅) ∨ 𝑉) = (⦋𝑅 / 𝑠⦌𝑁 ∨ ((𝑅 ∨ 𝑉) ∧ 𝑊)))
27	16, 26	eqtr4d 2864	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊) ∧ (𝑆 ∈ 𝐴 ∧ ¬ 𝑆 ≤ 𝑊)) ∧ 𝑃 ≠ 𝑄) → (𝐹‘(𝑅 ∨ 𝑉)) = ((𝐹‘𝑅) ∨ 𝑉))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 386 ∧ w3a 1111 = wceq 1656 ∈ wcel 2164 ≠ wne 2999 ∀wral 3117 ⦋csb 3757 ifcif 4308 class class class wbr 4875 ↦ cmpt 4954 ‘cfv 6127 ℩crio 6870 (class class class)co 6910 Basecbs 16229 lecple 16319 joincjn 17304 meetcmee 17305 Atomscatm 35337 HLchlt 35424 LHypclh 36058

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1894 ax-4 1908 ax-5 2009 ax-6 2075 ax-7 2112 ax-8 2166 ax-9 2173 ax-10 2192 ax-11 2207 ax-12 2220 ax-13 2389 ax-ext 2803 ax-rep 4996 ax-sep 5007 ax-nul 5015 ax-pow 5067 ax-pr 5129 ax-un 7214 ax-riotaBAD 35027

This theorem depends on definitions: df-bi 199 df-an 387 df-or 879 df-3or 1112 df-3an 1113 df-tru 1660 df-ex 1879 df-nf 1883 df-sb 2068 df-mo 2605 df-eu 2640 df-clab 2812 df-cleq 2818 df-clel 2821 df-nfc 2958 df-ne 3000 df-nel 3103 df-ral 3122 df-rex 3123 df-reu 3124 df-rmo 3125 df-rab 3126 df-v 3416 df-sbc 3663 df-csb 3758 df-dif 3801 df-un 3803 df-in 3805 df-ss 3812 df-nul 4147 df-if 4309 df-pw 4382 df-sn 4400 df-pr 4402 df-op 4406 df-uni 4661 df-iun 4744 df-iin 4745 df-br 4876 df-opab 4938 df-mpt 4955 df-id 5252 df-xp 5352 df-rel 5353 df-cnv 5354 df-co 5355 df-dm 5356 df-rn 5357 df-res 5358 df-ima 5359 df-iota 6090 df-fun 6129 df-fn 6130 df-f 6131 df-f1 6132 df-fo 6133 df-f1o 6134 df-fv 6135 df-riota 6871 df-ov 6913 df-oprab 6914 df-mpt2 6915 df-1st 7433 df-2nd 7434 df-undef 7669 df-proset 17288 df-poset 17306 df-plt 17318 df-lub 17334 df-glb 17335 df-join 17336 df-meet 17337 df-p0 17399 df-p1 17400 df-lat 17406 df-clat 17468 df-oposet 35250 df-ol 35252 df-oml 35253 df-covers 35340 df-ats 35341 df-atl 35372 df-cvlat 35396 df-hlat 35425 df-llines 35572 df-lplanes 35573 df-lvols 35574 df-lines 35575 df-psubsp 35577 df-pmap 35578 df-padd 35870 df-lhyp 36062

This theorem is referenced by: cdleme42g 36555

W3C validator