Theorem trlval4 40940

Description: The value of the trace of a lattice translation in terms of 2 atoms. (Contributed by NM, 3-May-2013.)

Hypotheses

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

Assertion

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

Proof of Theorem trlval4

Step	Hyp	Ref	Expression
1		simp1 1154	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		simp21 1225	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → 𝐹 ∈ 𝑇)
3		simp22 1226	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
4		simp23 1227	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
5		simp3r 1221	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))
6		simpl1l 1243	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝐾 ∈ HL)
7		simp23l 1313	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → 𝑄 ∈ 𝐴)
8	7	adantr 485	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑄 ∈ 𝐴)
9		simpl1 1210	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
10		simpl21 1270	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝐹 ∈ 𝑇)
11		trlval3.l	. . . . . . . . . 10 ⊢ ≤ = (le‘𝐾)
12		trlval3.a	. . . . . . . . . 10 ⊢ 𝐴 = (Atoms‘𝐾)
13		trlval3.h	. . . . . . . . . 10 ⊢ 𝐻 = (LHyp‘𝐾)
14		trlval3.t	. . . . . . . . . 10 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
15	11, 12, 13, 14	ltrnat 40892	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑄 ∈ 𝐴) → (𝐹‘𝑄) ∈ 𝐴)
16	9, 10, 8, 15	syl3anc 1398	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝐹‘𝑄) ∈ 𝐴)
17		trlval3.j	. . . . . . . . 9 ⊢ ∨ = (join‘𝐾)
18	11, 17, 12	hlatlej1 40127	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ (𝐹‘𝑄) ∈ 𝐴) → 𝑄 ≤ (𝑄 ∨ (𝐹‘𝑄)))
19	6, 8, 16, 18	syl3anc 1398	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑄 ≤ (𝑄 ∨ (𝐹‘𝑄)))
20		simpl22 1271	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
21		trlval3.r	. . . . . . . . . 10 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
22	11, 17, 12, 13, 14, 21	trljat1 40918	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → (𝑃 ∨ (𝑅‘𝐹)) = (𝑃 ∨ (𝐹‘𝑃)))
23	9, 10, 20, 22	syl3anc 1398	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑃 ∨ (𝑅‘𝐹)) = (𝑃 ∨ (𝐹‘𝑃)))
24		simpr 489	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄)))
25	23, 24	eqtrd 2798	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑃 ∨ (𝑅‘𝐹)) = (𝑄 ∨ (𝐹‘𝑄)))
26	19, 25	breqtrrd 5140	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)))
27		simpl3r 1248	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))
28		simpll1 1231	. . . . . . . . . . . . 13 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
29	20	adantr 485	. . . . . . . . . . . . 13 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
30	10	adantr 485	. . . . . . . . . . . . 13 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → 𝐹 ∈ 𝑇)
31		simpr 489	. . . . . . . . . . . . 13 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (𝐹‘𝑃) = 𝑃)
32		eqid 2763	. . . . . . . . . . . . . 14 ⊢ (0.‘𝐾) = (0.‘𝐾)
33	11, 32, 12, 13, 14, 21	trl0 40922	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝐹 ∈ 𝑇 ∧ (𝐹‘𝑃) = 𝑃)) → (𝑅‘𝐹) = (0.‘𝐾))
34	28, 29, 30, 31, 33	syl112anc 1401	. . . . . . . . . . . 12 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (𝑅‘𝐹) = (0.‘𝐾))
35		hlatl 40112	. . . . . . . . . . . . . . 15 ⊢ (𝐾 ∈ HL → 𝐾 ∈ AtLat)
36	6, 35	syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝐾 ∈ AtLat)
37		simp22l 1311	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → 𝑃 ∈ 𝐴)
38	37	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑃 ∈ 𝐴)
39		eqid 2763	. . . . . . . . . . . . . . . 16 ⊢ (Base‘𝐾) = (Base‘𝐾)
40	39, 17, 12	hlatjcl 40119	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾))
41	6, 38, 8, 40	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾))
42	39, 11, 32	atl0le 40056	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ AtLat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) → (0.‘𝐾) ≤ (𝑃 ∨ 𝑄))
43	36, 41, 42	syl2anc 595	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (0.‘𝐾) ≤ (𝑃 ∨ 𝑄))
44	43	adantr 485	. . . . . . . . . . . 12 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (0.‘𝐾) ≤ (𝑃 ∨ 𝑄))
45	34, 44	eqbrtrd 5134	. . . . . . . . . . 11 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) ∧ (𝐹‘𝑃) = 𝑃) → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))
46	45	ex 417	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → ((𝐹‘𝑃) = 𝑃 → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄)))
47	46	necon3bd 2972	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄) → (𝐹‘𝑃) ≠ 𝑃))
48	27, 47	mpd 16	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝐹‘𝑃) ≠ 𝑃)
49	11, 12, 13, 14, 21	trlat 40921	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝐹 ∈ 𝑇 ∧ (𝐹‘𝑃) ≠ 𝑃)) → (𝑅‘𝐹) ∈ 𝐴)
50	9, 20, 10, 48, 49	syl112anc 1401	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑅‘𝐹) ∈ 𝐴)
51		simpl3l 1247	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑃 ≠ 𝑄)
52	51	necomd 3013	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → 𝑄 ≠ 𝑃)
53	11, 17, 12	hlatexch1 40147	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑄 ∈ 𝐴 ∧ (𝑅‘𝐹) ∈ 𝐴 ∧ 𝑃 ∈ 𝐴) ∧ 𝑄 ≠ 𝑃) → (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄)))
54	6, 8, 50, 38, 52, 53	syl131anc 1410	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄)))
55	26, 54	mpd 16	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) ∧ (𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄))) → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))
56	55	ex 417	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → ((𝑃 ∨ (𝐹‘𝑃)) = (𝑄 ∨ (𝐹‘𝑄)) → (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄)))
57	56	necon3bd 2972	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄) → (𝑃 ∨ (𝐹‘𝑃)) ≠ (𝑄 ∨ (𝐹‘𝑄))))
58	5, 57	mpd 16	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (𝑃 ∨ (𝐹‘𝑃)) ≠ (𝑄 ∨ (𝐹‘𝑄)))
59		trlval3.m	. . 3 ⊢ ∧ = (meet‘𝐾)
60	11, 17, 59, 12, 13, 14, 21	trlval3 40939	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑃 ∨ (𝐹‘𝑃)) ≠ (𝑄 ∨ (𝐹‘𝑄)))) → (𝑅‘𝐹) = ((𝑃 ∨ (𝐹‘𝑃)) ∧ (𝑄 ∨ (𝐹‘𝑄))))
61	1, 2, 3, 4, 58, 60	syl113anc 1409	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑃 ≠ 𝑄 ∧ ¬ (𝑅‘𝐹) ≤ (𝑃 ∨ 𝑄))) → (𝑅‘𝐹) = ((𝑃 ∨ (𝐹‘𝑃)) ∧ (𝑄 ∨ (𝐹‘𝑄))))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 400   ∧ w3a 1103   = wceq 1570   ∈ wcel 2143   ≠ wne 2958   class class class wbr 5110  ‘cfv 6538  (class class class)co 7412  Basecbs 17270  lecple 17318  joincjn 18368  meetcmee 18369  0.cp0 18478  Atomscatm 40015  AtLatcal 40016  HLchlt 40102  LHypclh 40736  LTrncltrn 40853  trLctrl 40910

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5558  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-1st 7987  df-2nd 7988  df-map 8827  df-proset 18351  df-poset 18370  df-plt 18385  df-lub 18401  df-glb 18402  df-join 18403  df-meet 18404  df-p0 18480  df-p1 18481  df-lat 18489  df-clat 18556  df-oposet 39928  df-ol 39930  df-oml 39931  df-covers 40018  df-ats 40019  df-atl 40050  df-cvlat 40074  df-hlat 40103  df-llines 40250  df-psubsp 40255  df-pmap 40256  df-padd 40548  df-lhyp 40740  df-laut 40741  df-ldil 40856  df-ltrn 40857  df-trl 40911

This theorem is referenced by:  cdlemg10a  41392  cdlemg12d  41398