Theorem 3dimlem3a 37721

Description: Lemma for 3dim3 37730. (Contributed by NM, 27-Jul-2012.)

Hypotheses

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

Assertion

Ref	Expression
3dimlem3a	⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ¬ 𝑇 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑅))

Proof of Theorem 3dimlem3a

Step	Hyp	Ref	Expression
1		simp31 1208	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))
2		simp11 1202	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝐾 ∈ HL)
3	2	hllatd 37624	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝐾 ∈ Lat)
4		simp13 1204	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑄 ∈ 𝐴)
5		eqid 2736	. . . . . . 7 ⊢ (Base‘𝐾) = (Base‘𝐾)
6		3dim0.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
7	5, 6	atbase 37549	. . . . . 6 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ (Base‘𝐾))
8	4, 7	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑄 ∈ (Base‘𝐾))
9		simp2l 1198	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑅 ∈ 𝐴)
10	5, 6	atbase 37549	. . . . . 6 ⊢ (𝑅 ∈ 𝐴 → 𝑅 ∈ (Base‘𝐾))
11	9, 10	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑅 ∈ (Base‘𝐾))
12		simp12 1203	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑃 ∈ 𝐴)
13	5, 6	atbase 37549	. . . . . 6 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾))
14	12, 13	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑃 ∈ (Base‘𝐾))
15		3dim0.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
16	5, 15	latjrot 18295	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → ((𝑄 ∨ 𝑅) ∨ 𝑃) = ((𝑃 ∨ 𝑄) ∨ 𝑅))
17	3, 8, 11, 14, 16	syl13anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ((𝑄 ∨ 𝑅) ∨ 𝑃) = ((𝑃 ∨ 𝑄) ∨ 𝑅))
18		simp33 1210	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))
19		simp2r 1199	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → 𝑆 ∈ 𝐴)
20	5, 15, 6	hlatjcl 37627	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) → (𝑄 ∨ 𝑅) ∈ (Base‘𝐾))
21	2, 4, 9, 20	syl3anc 1370	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → (𝑄 ∨ 𝑅) ∈ (Base‘𝐾))
22		simp32 1209	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ¬ 𝑃 ≤ (𝑄 ∨ 𝑅))
23		3dim0.l	. . . . . . 7 ⊢ ≤ = (le‘𝐾)
24	5, 23, 15, 6	hlexchb1 37645	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ (𝑄 ∨ 𝑅) ∈ (Base‘𝐾)) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅)) → (𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ↔ ((𝑄 ∨ 𝑅) ∨ 𝑃) = ((𝑄 ∨ 𝑅) ∨ 𝑆)))
25	2, 12, 19, 21, 22, 24	syl131anc 1382	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → (𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ↔ ((𝑄 ∨ 𝑅) ∨ 𝑃) = ((𝑄 ∨ 𝑅) ∨ 𝑆)))
26	18, 25	mpbid 231	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ((𝑄 ∨ 𝑅) ∨ 𝑃) = ((𝑄 ∨ 𝑅) ∨ 𝑆))
27	17, 26	eqtr3d 2778	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ((𝑃 ∨ 𝑄) ∨ 𝑅) = ((𝑄 ∨ 𝑅) ∨ 𝑆))
28	27	breq2d 5101	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → (𝑇 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑅) ↔ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆)))
29	1, 28	mtbird 324	1 ⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (¬ 𝑇 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆) ∧ ¬ 𝑃 ≤ (𝑄 ∨ 𝑅) ∧ 𝑃 ≤ ((𝑄 ∨ 𝑅) ∨ 𝑆))) → ¬ 𝑇 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1086   = wceq 1540   ∈ wcel 2105   class class class wbr 5089  ‘cfv 6473  (class class class)co 7329  Basecbs 17001  lecple 17058  joincjn 18118  Latclat 18238  Atomscatm 37523  HLchlt 37610

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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2707  ax-rep 5226  ax-sep 5240  ax-nul 5247  ax-pow 5305  ax-pr 5369  ax-un 7642

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2886  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3350  df-rab 3404  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4269  df-if 4473  df-pw 4548  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4852  df-iun 4940  df-br 5090  df-opab 5152  df-mpt 5173  df-id 5512  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-iota 6425  df-fun 6475  df-fn 6476  df-f 6477  df-f1 6478  df-fo 6479  df-f1o 6480  df-fv 6481  df-riota 7286  df-ov 7332  df-oprab 7333  df-proset 18102  df-poset 18120  df-lub 18153  df-glb 18154  df-join 18155  df-meet 18156  df-lat 18239  df-ats 37527  df-atl 37558  df-cvlat 37582  df-hlat 37611

This theorem is referenced by:  3dimlem3  37722  3dim3  37730