Theorem lhpexle3lem 40635

Description: There exists atom under a co-atom different from any three other atoms. TODO: study if adant*, simp* usage can be improved. (Contributed by NM, 9-Jul-2013.)

Hypotheses

Ref	Expression
lhpex1.l	⊢ ≤ = (le‘𝐾)
lhpex1.a	⊢ 𝐴 = (Atoms‘𝐾)
lhpex1.h	⊢ 𝐻 = (LHyp‘𝐾)

Assertion

Ref	Expression
lhpexle3lem	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))

Distinct variable groups:   ≤ ,𝑝   𝐴,𝑝   𝐻,𝑝   𝐾,𝑝   𝑊,𝑝   𝑋,𝑝   𝑌,𝑝   𝑍,𝑝

Proof of Theorem lhpexle3lem

Step	Hyp	Ref	Expression
1		simpl1 1205	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		lhpex1.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
3		lhpex1.a	. . . . 5 ⊢ 𝐴 = (Atoms‘𝐾)
4		lhpex1.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
5	2, 3, 4	lhpexle2 40634	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍))
6	1, 5	syl 17	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍))
7		simp31 1223	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → 𝑝 ≤ 𝑊)
8		simp32 1224	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → 𝑝 ≠ 𝑋)
9		simp1r 1212	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → 𝑋 = 𝑌)
10	8, 9	neeqtrd 3026	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → 𝑝 ≠ 𝑌)
11		simp33 1225	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → 𝑝 ≠ 𝑍)
12	8, 10, 11	3jca 1141	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍))
13	7, 12	jca 519	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍)) → (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
14	13	3exp 1132	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) → (𝑝 ∈ 𝐴 → ((𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍) → (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))))
15	14	reximdvai 3173	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) → (∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑍) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍))))
16	6, 15	mpd 15	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 = 𝑌) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
17		simprrr 791	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑝 ≤ 𝑊)
18		simp11l 1298	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝐾 ∈ HL)
19	18	adantr 484	. . . . . . . . 9 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝐾 ∈ HL)
20	19	hllatd 39988	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝐾 ∈ Lat)
21		eqid 2762	. . . . . . . . . 10 ⊢ (Base‘𝐾) = (Base‘𝐾)
22	21, 3	atbase 39913	. . . . . . . . 9 ⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ (Base‘𝐾))
23	22	ad2antrl 738	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑝 ∈ (Base‘𝐾))
24		simp121 1319	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑋 ∈ 𝐴)
25	24	adantr 484	. . . . . . . . 9 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑋 ∈ 𝐴)
26	21, 3	atbase 39913	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐴 → 𝑋 ∈ (Base‘𝐾))
27	25, 26	syl 17	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑋 ∈ (Base‘𝐾))
28		simp122 1320	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑌 ∈ 𝐴)
29	28	adantr 484	. . . . . . . . 9 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑌 ∈ 𝐴)
30	21, 3	atbase 39913	. . . . . . . . 9 ⊢ (𝑌 ∈ 𝐴 → 𝑌 ∈ (Base‘𝐾))
31	29, 30	syl 17	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑌 ∈ (Base‘𝐾))
32		simprrl 790	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → ¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌))
33		eqid 2762	. . . . . . . . 9 ⊢ (join‘𝐾) = (join‘𝐾)
34	21, 2, 33	latnlej1l 18489	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑝 ∈ (Base‘𝐾) ∧ 𝑋 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾)) ∧ ¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑝 ≠ 𝑋)
35	20, 23, 27, 31, 32, 34	syl131anc 1402	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑝 ≠ 𝑋)
36	21, 2, 33	latnlej1r 18490	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑝 ∈ (Base‘𝐾) ∧ 𝑋 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾)) ∧ ¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑝 ≠ 𝑌)
37	20, 23, 27, 31, 32, 36	syl131anc 1402	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑝 ≠ 𝑌)
38		simpl3 1207	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑍 ≤ (𝑋(join‘𝐾)𝑌))
39		nbrne2 5120	. . . . . . . . 9 ⊢ ((𝑍 ≤ (𝑋(join‘𝐾)𝑌) ∧ ¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑍 ≠ 𝑝)
40	39	necomd 3012	. . . . . . . 8 ⊢ ((𝑍 ≤ (𝑋(join‘𝐾)𝑌) ∧ ¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑝 ≠ 𝑍)
41	38, 32, 40	syl2anc 593	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → 𝑝 ≠ 𝑍)
42	35, 37, 41	3jca 1141	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍))
43	17, 42	jca 519	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))) → (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
44		simp11 1217	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
45		simp131 1322	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑋 ≤ 𝑊)
46		simp132 1323	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑌 ≤ 𝑊)
47		eqid 2762	. . . . . . . 8 ⊢ (lt‘𝐾) = (lt‘𝐾)
48	2, 47, 33, 3, 4	lhp2lt 40625	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐴 ∧ 𝑌 ≤ 𝑊)) → (𝑋(join‘𝐾)𝑌)(lt‘𝐾)𝑊)
49	44, 24, 45, 28, 46, 48	syl122anc 1398	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → (𝑋(join‘𝐾)𝑌)(lt‘𝐾)𝑊)
50	21, 33, 3	hlatjcl 39991	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴) → (𝑋(join‘𝐾)𝑌) ∈ (Base‘𝐾))
51	18, 24, 28, 50	syl3anc 1390	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → (𝑋(join‘𝐾)𝑌) ∈ (Base‘𝐾))
52		simp11r 1299	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑊 ∈ 𝐻)
53	21, 4	lhpbase 40622	. . . . . . . 8 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ (Base‘𝐾))
54	52, 53	syl 17	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑊 ∈ (Base‘𝐾))
55	21, 2, 47, 3	hlrelat1 40024	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋(join‘𝐾)𝑌) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑋(join‘𝐾)𝑌)(lt‘𝐾)𝑊 → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊)))
56	18, 51, 54, 55	syl3anc 1390	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ((𝑋(join‘𝐾)𝑌)(lt‘𝐾)𝑊 → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊)))
57	49, 56	mpd 15	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ 𝑝 ≤ 𝑊))
58	43, 57	reximddv 3178	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
59	58	3expa 1131	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌) ∧ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
60		simp11l 1298	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝐾 ∈ HL)
61	60	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝐾 ∈ HL)
62	61	hllatd 39988	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝐾 ∈ Lat)
63	22	ad2antrl 738	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ∈ (Base‘𝐾))
64		simp121 1319	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑋 ∈ 𝐴)
65	64	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑋 ∈ 𝐴)
66		simp122 1320	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑌 ∈ 𝐴)
67	66	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑌 ∈ 𝐴)
68	61, 65, 67, 50	syl3anc 1390	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → (𝑋(join‘𝐾)𝑌) ∈ (Base‘𝐾))
69		simp11r 1299	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑊 ∈ 𝐻)
70	69	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑊 ∈ 𝐻)
71	70, 53	syl 17	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑊 ∈ (Base‘𝐾))
72		simprr3 1237	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ≤ (𝑋(join‘𝐾)𝑌))
73		simp131 1322	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑋 ≤ 𝑊)
74	73	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑋 ≤ 𝑊)
75		simp132 1323	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑌 ≤ 𝑊)
76	75	adantr 484	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑌 ≤ 𝑊)
77	65, 26	syl 17	. . . . . . . . 9 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑋 ∈ (Base‘𝐾))
78	67, 30	syl 17	. . . . . . . . 9 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑌 ∈ (Base‘𝐾))
79	21, 2, 33	latjle12 18482	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾))) → ((𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊) ↔ (𝑋(join‘𝐾)𝑌) ≤ 𝑊))
80	62, 77, 78, 71, 79	syl13anc 1391	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → ((𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊) ↔ (𝑋(join‘𝐾)𝑌) ≤ 𝑊))
81	74, 76, 80	mpbi2and 722	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → (𝑋(join‘𝐾)𝑌) ≤ 𝑊)
82	21, 2, 62, 63, 68, 71, 72, 81	lattrd 18478	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ≤ 𝑊)
83		simprr1 1235	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ≠ 𝑋)
84		simprr2 1236	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ≠ 𝑌)
85		simpl3 1207	. . . . . . . 8 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌))
86		nbrne2 5120	. . . . . . . 8 ⊢ ((𝑝 ≤ (𝑋(join‘𝐾)𝑌) ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑝 ≠ 𝑍)
87	72, 85, 86	syl2anc 593	. . . . . . 7 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → 𝑝 ≠ 𝑍)
88	83, 84, 87	3jca 1141	. . . . . 6 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍))
89	82, 88	jca 519	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))) → (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
90		simp2 1150	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → 𝑋 ≠ 𝑌)
91	2, 33, 3	hlsupr 40010	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴) ∧ 𝑋 ≠ 𝑌) → ∃𝑝 ∈ 𝐴 (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))
92	60, 64, 66, 90, 91	syl31anc 1392	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≤ (𝑋(join‘𝐾)𝑌)))
93	89, 92	reximddv 3178	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌 ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
94	93	3expa 1131	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌) ∧ ¬ 𝑍 ≤ (𝑋(join‘𝐾)𝑌)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
95	59, 94	pm2.61dan 822	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) ∧ 𝑋 ≠ 𝑌) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))
96	16, 95	pm2.61dane 3044	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐴 ∧ 𝑌 ∈ 𝐴 ∧ 𝑍 ∈ 𝐴) ∧ (𝑋 ≤ 𝑊 ∧ 𝑌 ≤ 𝑊 ∧ 𝑍 ≤ 𝑊)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ (𝑝 ≠ 𝑋 ∧ 𝑝 ≠ 𝑌 ∧ 𝑝 ≠ 𝑍)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142   ≠ wne 2957  ∃wrex 3086   class class class wbr 5100  ‘cfv 6521  (class class class)co 7396  Basecbs 17245  lecple 17293  ltcplt 18340  joincjn 18343  Latclat 18463  Atomscatm 39887  HLchlt 39974  LHypclh 40608

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-proset 18326  df-poset 18345  df-plt 18360  df-lub 18376  df-glb 18377  df-join 18378  df-meet 18379  df-p0 18455  df-p1 18456  df-lat 18464  df-clat 18531  df-oposet 39800  df-ol 39802  df-oml 39803  df-covers 39890  df-ats 39891  df-atl 39922  df-cvlat 39946  df-hlat 39975  df-lhyp 40612

This theorem is referenced by:  lhpexle3  40636