Theorem cdlemg13a 38351

Description: TODO: FIX COMMENT. (Contributed by NM, 6-May-2013.)

Hypotheses

Ref	Expression
cdlemg12.l	⊢ ≤ = (le‘𝐾)
cdlemg12.j	⊢ ∨ = (join‘𝐾)
cdlemg12.m	⊢ ∧ = (meet‘𝐾)
cdlemg12.a	⊢ 𝐴 = (Atoms‘𝐾)
cdlemg12.h	⊢ 𝐻 = (LHyp‘𝐾)
cdlemg12.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemg12b.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)

Assertion

Ref	Expression
cdlemg13a	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))

Proof of Theorem cdlemg13a

Step	Hyp	Ref	Expression
1		simp11l 1286	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝐾 ∈ HL)
2		simp12l 1288	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝑃 ∈ 𝐴)
3		simp11 1205	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
4		simp2r 1202	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝐺 ∈ 𝑇)
5		cdlemg12.l	. . . . . . 7 ⊢ ≤ = (le‘𝐾)
6		cdlemg12.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
7		cdlemg12.h	. . . . . . 7 ⊢ 𝐻 = (LHyp‘𝐾)
8		cdlemg12.t	. . . . . . 7 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
9	5, 6, 7, 8	ltrnat 37840	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 ∈ 𝐴) → (𝐺‘𝑃) ∈ 𝐴)
10	3, 4, 2, 9	syl3anc 1373	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐺‘𝑃) ∈ 𝐴)
11		cdlemg12.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
12	5, 11, 6	hlatlej1 37075	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ (𝐺‘𝑃) ∈ 𝐴) → 𝑃 ≤ (𝑃 ∨ (𝐺‘𝑃)))
13	1, 2, 10, 12	syl3anc 1373	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝑃 ≤ (𝑃 ∨ (𝐺‘𝑃)))
14		simp32 1212	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑅‘𝐹) = (𝑅‘𝐺))
15		simp2l 1201	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝐹 ∈ 𝑇)
16		simp12 1206	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
17	5, 6, 7, 8	ltrnel 37839	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → ((𝐺‘𝑃) ∈ 𝐴 ∧ ¬ (𝐺‘𝑃) ≤ 𝑊))
18	3, 4, 16, 17	syl3anc 1373	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐺‘𝑃) ∈ 𝐴 ∧ ¬ (𝐺‘𝑃) ≤ 𝑊))
19		cdlemg12.m	. . . . . . . . 9 ⊢ ∧ = (meet‘𝐾)
20		cdlemg12b.r	. . . . . . . . 9 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
21	5, 11, 19, 6, 7, 8, 20	trlval2 37863	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ ((𝐺‘𝑃) ∈ 𝐴 ∧ ¬ (𝐺‘𝑃) ≤ 𝑊)) → (𝑅‘𝐹) = (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊))
22	3, 15, 18, 21	syl3anc 1373	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑅‘𝐹) = (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊))
23	5, 11, 19, 6, 7, 8, 20	trlval2 37863	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → (𝑅‘𝐺) = ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊))
24	3, 4, 16, 23	syl3anc 1373	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑅‘𝐺) = ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊))
25	14, 22, 24	3eqtr3d 2779	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊) = ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊))
26	25	oveq2d 7207	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐺‘𝑃) ∨ (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊)) = ((𝐺‘𝑃) ∨ ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊)))
27	5, 6, 7, 8	ltrncoat 37844	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ 𝑃 ∈ 𝐴) → (𝐹‘(𝐺‘𝑃)) ∈ 𝐴)
28	3, 15, 4, 2, 27	syl121anc 1377	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐹‘(𝐺‘𝑃)) ∈ 𝐴)
29		eqid 2736	. . . . . . 7 ⊢ (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊) = (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊)
30	5, 11, 19, 6, 7, 29	cdleme0cp 37914	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (((𝐺‘𝑃) ∈ 𝐴 ∧ ¬ (𝐺‘𝑃) ≤ 𝑊) ∧ (𝐹‘(𝐺‘𝑃)) ∈ 𝐴)) → ((𝐺‘𝑃) ∨ (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊)) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
31	3, 18, 28, 30	syl12anc 837	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐺‘𝑃) ∨ (((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ 𝑊)) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
32		eqid 2736	. . . . . . 7 ⊢ ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊) = ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊)
33	5, 11, 19, 6, 7, 32	cdleme0cq 37915	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ((𝐺‘𝑃) ∈ 𝐴 ∧ ¬ (𝐺‘𝑃) ≤ 𝑊))) → ((𝐺‘𝑃) ∨ ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊)) = (𝑃 ∨ (𝐺‘𝑃)))
34	3, 2, 18, 33	syl12anc 837	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐺‘𝑃) ∨ ((𝑃 ∨ (𝐺‘𝑃)) ∧ 𝑊)) = (𝑃 ∨ (𝐺‘𝑃)))
35	26, 31, 34	3eqtr3rd 2780	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑃 ∨ (𝐺‘𝑃)) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
36	13, 35	breqtrd 5065	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝑃 ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
37	5, 11, 6	hlatlej2 37076	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝐺‘𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺‘𝑃)) ∈ 𝐴) → (𝐹‘(𝐺‘𝑃)) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
38	1, 10, 28, 37	syl3anc 1373	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐹‘(𝐺‘𝑃)) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
39	1	hllatd 37064	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝐾 ∈ Lat)
40		eqid 2736	. . . . . 6 ⊢ (Base‘𝐾) = (Base‘𝐾)
41	40, 6	atbase 36989	. . . . 5 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾))
42	2, 41	syl 17	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝑃 ∈ (Base‘𝐾))
43	40, 6	atbase 36989	. . . . 5 ⊢ ((𝐹‘(𝐺‘𝑃)) ∈ 𝐴 → (𝐹‘(𝐺‘𝑃)) ∈ (Base‘𝐾))
44	28, 43	syl 17	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐹‘(𝐺‘𝑃)) ∈ (Base‘𝐾))
45	40, 11, 6	hlatjcl 37067	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝐺‘𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺‘𝑃)) ∈ 𝐴) → ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∈ (Base‘𝐾))
46	1, 10, 28, 45	syl3anc 1373	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∈ (Base‘𝐾))
47	40, 5, 11	latjle12 17910	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ (𝐹‘(𝐺‘𝑃)) ∈ (Base‘𝐾) ∧ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∈ (Base‘𝐾))) → ((𝑃 ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ (𝐹‘(𝐺‘𝑃)) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))) ↔ (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))))
48	39, 42, 44, 46, 47	syl13anc 1374	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝑃 ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ∧ (𝐹‘(𝐺‘𝑃)) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))) ↔ (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))))
49	36, 38, 48	mpbi2and 712	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))
50		simp13 1207	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
51		simp33 1213	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))
52	5, 11, 19, 6, 7, 8	cdlemg11a 38337	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐹‘(𝐺‘𝑃)) ≠ 𝑃)
53	3, 16, 50, 15, 4, 51, 52	syl123anc 1389	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝐹‘(𝐺‘𝑃)) ≠ 𝑃)
54	53	necomd 2987	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → 𝑃 ≠ (𝐹‘(𝐺‘𝑃)))
55	5, 11, 6	ps-1 37177	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ (𝐹‘(𝐺‘𝑃)) ∈ 𝐴 ∧ 𝑃 ≠ (𝐹‘(𝐺‘𝑃))) ∧ ((𝐺‘𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺‘𝑃)) ∈ 𝐴)) → ((𝑃 ∨ (𝐹‘(𝐺‘𝑃))) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ↔ (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))))
56	1, 2, 28, 54, 10, 28, 55	syl132anc 1390	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → ((𝑃 ∨ (𝐹‘(𝐺‘𝑃))) ≤ ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))) ↔ (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃)))))
57	49, 56	mpbid 235	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝐹‘𝑃) ≠ 𝑃 ∧ (𝑅‘𝐹) = (𝑅‘𝐺) ∧ ((𝐹‘(𝐺‘𝑃)) ∨ (𝐹‘(𝐺‘𝑄))) ≠ (𝑃 ∨ 𝑄))) → (𝑃 ∨ (𝐹‘(𝐺‘𝑃))) = ((𝐺‘𝑃) ∨ (𝐹‘(𝐺‘𝑃))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   ∧ w3a 1089   = wceq 1543   ∈ wcel 2112   ≠ wne 2932   class class class wbr 5039  ‘cfv 6358  (class class class)co 7191  Basecbs 16666  lecple 16756  joincjn 17772  meetcmee 17773  Latclat 17891  Atomscatm 36963  HLchlt 37050  LHypclh 37684  LTrncltrn 37801  trLctrl 37858

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501  ax-riotaBAD 36653

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-ral 3056  df-rex 3057  df-reu 3058  df-rmo 3059  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-op 4534  df-uni 4806  df-iun 4892  df-iin 4893  df-br 5040  df-opab 5102  df-mpt 5121  df-id 5440  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-res 5548  df-ima 5549  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7148  df-ov 7194  df-oprab 7195  df-mpo 7196  df-1st 7739  df-2nd 7740  df-undef 7993  df-map 8488  df-proset 17756  df-poset 17774  df-plt 17790  df-lub 17806  df-glb 17807  df-join 17808  df-meet 17809  df-p0 17885  df-p1 17886  df-lat 17892  df-clat 17959  df-oposet 36876  df-ol 36878  df-oml 36879  df-covers 36966  df-ats 36967  df-atl 36998  df-cvlat 37022  df-hlat 37051  df-llines 37198  df-lplanes 37199  df-lvols 37200  df-lines 37201  df-psubsp 37203  df-pmap 37204  df-padd 37496  df-lhyp 37688  df-laut 37689  df-ldil 37804  df-ltrn 37805  df-trl 37859

This theorem is referenced by:  cdlemg13  38352