Theorem 4atlem11a 39716

Description: Lemma for 4at 39722. Substitute 𝑈 for 𝑄. (Contributed by NM, 9-Jul-2012.)

Hypotheses

Ref	Expression
4at.l	⊢ ≤ = (le‘𝐾)
4at.j	⊢ ∨ = (join‘𝐾)
4at.a	⊢ 𝐴 = (Atoms‘𝐾)

Assertion

Ref	Expression
4atlem11a	⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑄 ≤ ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) ↔ ((𝑃 ∨ 𝑄) ∨ (𝑉 ∨ 𝑊)) = ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊))))

Proof of Theorem 4atlem11a

Step	Hyp	Ref	Expression
1		simp11 1204	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝐾 ∈ HL)
2		simp13 1206	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑄 ∈ 𝐴)
3		simp21 1207	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑈 ∈ 𝐴)
4	1	hllatd 39473	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝐾 ∈ Lat)
5		simp12 1205	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑃 ∈ 𝐴)
6		simp22 1208	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑉 ∈ 𝐴)
7		eqid 2733	. . . . . 6 ⊢ (Base‘𝐾) = (Base‘𝐾)
8		4at.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
9		4at.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
10	7, 8, 9	hlatjcl 39476	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴) → (𝑃 ∨ 𝑉) ∈ (Base‘𝐾))
11	1, 5, 6, 10	syl3anc 1373	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑃 ∨ 𝑉) ∈ (Base‘𝐾))
12		simp23 1209	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑊 ∈ 𝐴)
13	7, 9	atbase 39398	. . . . 5 ⊢ (𝑊 ∈ 𝐴 → 𝑊 ∈ (Base‘𝐾))
14	12, 13	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → 𝑊 ∈ (Base‘𝐾))
15	7, 8	latjcl 18355	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑉) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑉) ∨ 𝑊) ∈ (Base‘𝐾))
16	4, 11, 14, 15	syl3anc 1373	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → ((𝑃 ∨ 𝑉) ∨ 𝑊) ∈ (Base‘𝐾))
17		simp3 1138	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊))
18		4at.l	. . . 4 ⊢ ≤ = (le‘𝐾)
19	7, 18, 8, 9	hlexchb2 39494	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑄 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴 ∧ ((𝑃 ∨ 𝑉) ∨ 𝑊) ∈ (Base‘𝐾)) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑄 ≤ (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)) ↔ (𝑄 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)) = (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊))))
20	1, 2, 3, 16, 17, 19	syl131anc 1385	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑄 ≤ (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)) ↔ (𝑄 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)) = (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊))))
21	18, 8, 9	4atlem4b 39709	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴)) → ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) = (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)))
22	1, 5, 3, 6, 12, 21	syl32anc 1380	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) = (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)))
23	22	breq2d 5107	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑄 ≤ ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) ↔ 𝑄 ≤ (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊))))
24	18, 8, 9	4atlem4b 39709	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∨ (𝑉 ∨ 𝑊)) = (𝑄 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)))
25	1, 5, 2, 6, 12, 24	syl32anc 1380	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → ((𝑃 ∨ 𝑄) ∨ (𝑉 ∨ 𝑊)) = (𝑄 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)))
26	25, 22	eqeq12d 2749	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (((𝑃 ∨ 𝑄) ∨ (𝑉 ∨ 𝑊)) = ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) ↔ (𝑄 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊)) = (𝑈 ∨ ((𝑃 ∨ 𝑉) ∨ 𝑊))))
27	20, 23, 26	3bitr4d 311	1 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑈 ∈ 𝐴 ∧ 𝑉 ∈ 𝐴 ∧ 𝑊 ∈ 𝐴) ∧ ¬ 𝑄 ≤ ((𝑃 ∨ 𝑉) ∨ 𝑊)) → (𝑄 ≤ ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊)) ↔ ((𝑃 ∨ 𝑄) ∨ (𝑉 ∨ 𝑊)) = ((𝑃 ∨ 𝑈) ∨ (𝑉 ∨ 𝑊))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ w3a 1086   = wceq 1541   ∈ wcel 2113   class class class wbr 5095  ‘cfv 6489  (class class class)co 7355  Basecbs 17130  lecple 17178  joincjn 18227  Latclat 18347  Atomscatm 39372  HLchlt 39459

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2883  df-ne 2931  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4861  df-iun 4945  df-br 5096  df-opab 5158  df-mpt 5177  df-id 5516  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-riota 7312  df-ov 7358  df-oprab 7359  df-proset 18210  df-poset 18229  df-lub 18260  df-glb 18261  df-join 18262  df-meet 18263  df-lat 18348  df-ats 39376  df-atl 39407  df-cvlat 39431  df-hlat 39460

This theorem is referenced by:  4atlem11b  39717