Theorem islvol5 40353

Description: The predicate "is a 3-dim lattice volume" in terms of atoms. (Contributed by NM, 1-Jul-2012.)

Hypotheses

Ref	Expression
islvol5.b	⊢ 𝐵 = (Base‘𝐾)
islvol5.l	⊢ ≤ = (le‘𝐾)
islvol5.j	⊢ ∨ = (join‘𝐾)
islvol5.a	⊢ 𝐴 = (Atoms‘𝐾)
islvol5.v	⊢ 𝑉 = (LVols‘𝐾)

Assertion

Ref	Expression
islvol5	⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑋 ∈ 𝑉 ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))

Distinct variable groups:   𝑞,𝑝,𝑟,𝑠,𝐴   𝐵,𝑝,𝑞,𝑟,𝑠   ∨ ,𝑝,𝑞,𝑟,𝑠   𝐾,𝑝,𝑞,𝑟,𝑠   ≤ ,𝑝,𝑞,𝑟,𝑠   𝑋,𝑝,𝑞,𝑟,𝑠

Allowed substitution hints:   𝑉(𝑠,𝑟,𝑞,𝑝)

Proof of Theorem islvol5

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		islvol5.b	. . 3 ⊢ 𝐵 = (Base‘𝐾)
2		islvol5.l	. . 3 ⊢ ≤ = (le‘𝐾)
3		islvol5.j	. . 3 ⊢ ∨ = (join‘𝐾)
4		islvol5.a	. . 3 ⊢ 𝐴 = (Atoms‘𝐾)
5		eqid 2763	. . 3 ⊢ (LPlanes‘𝐾) = (LPlanes‘𝐾)
6		islvol5.v	. . 3 ⊢ 𝑉 = (LVols‘𝐾)
7	1, 2, 3, 4, 5, 6	islvol3 40350	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑋 ∈ 𝑉 ↔ ∃𝑦 ∈ (LPlanes‘𝐾)∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))
8		df-rex 3090	. . 3 ⊢ (∃𝑦 ∈ (LPlanes‘𝐾)∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)) ↔ ∃𝑦(𝑦 ∈ (LPlanes‘𝐾) ∧ ∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))
9		r19.41v 3195	. . . . . . . . . . 11 ⊢ (∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
10		df-3an 1105	. . . . . . . . . . . . 13 ⊢ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))
11	10	anbi2i 634	. . . . . . . . . . . 12 ⊢ ((∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
12		an13 659	. . . . . . . . . . . 12 ⊢ ((∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))))
13	11, 12	bitri 278	. . . . . . . . . . 11 ⊢ ((∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))))
14	9, 13	bitri 278	. . . . . . . . . 10 ⊢ (∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))))
15	14	exbii 1878	. . . . . . . . 9 ⊢ (∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦(𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))))
16		ovex 7443	. . . . . . . . . 10 ⊢ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ V
17		an12 657	. . . . . . . . . . . . 13 ⊢ (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ (𝑦 ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
18		eleq1 2851	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (𝑦 ∈ 𝐵 ↔ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵))
19		breq2 5113	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (𝑠 ≤ 𝑦 ↔ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)))
20	19	notbid 321	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (¬ 𝑠 ≤ 𝑦 ↔ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)))
21		oveq1 7417	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (𝑦 ∨ 𝑠) = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))
22	21	eqeq2d 2774	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (𝑋 = (𝑦 ∨ 𝑠) ↔ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))
23	20, 22	anbi12d 643	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → ((¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)) ↔ (¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
24	23	anbi2d 641	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
25		anass 473	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
26		df-3an 1105	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)))
27	26	bicomi 227	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)))
28	27	anbi1i 635	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))
29	25, 28	bitr3i 280	. . . . . . . . . . . . . . 15 ⊢ (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))
30	24, 29	bitrdi 290	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
31	18, 30	anbi12d 643	. . . . . . . . . . . . 13 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → ((𝑦 ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
32	17, 31	bitrid 286	. . . . . . . . . . . 12 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
33	32	rexbidv 3189	. . . . . . . . . . 11 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ ∃𝑠 ∈ 𝐴 (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
34		r19.42v 3197	. . . . . . . . . . 11 ⊢ (∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
35		r19.42v 3197	. . . . . . . . . . 11 ⊢ (∃𝑠 ∈ 𝐴 (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
36	33, 34, 35	3bitr3g 316	. . . . . . . . . 10 ⊢ (𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) → (((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
37	16, 36	ceqsexv 3503	. . . . . . . . 9 ⊢ (∃𝑦(𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟) ∧ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)) ∧ ∃𝑠 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
38	15, 37	bitri 278	. . . . . . . 8 ⊢ (∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
39		hllat 40137	. . . . . . . . . . 11 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
40	39	ad3antrrr 742	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → 𝐾 ∈ Lat)
41		simplll 786	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → 𝐾 ∈ HL)
42		simplrl 788	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → 𝑝 ∈ 𝐴)
43		simplrr 789	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → 𝑞 ∈ 𝐴)
44	1, 3, 4	hlatjcl 40141	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ HL ∧ 𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴) → (𝑝 ∨ 𝑞) ∈ 𝐵)
45	41, 42, 43, 44	syl3anc 1398	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → (𝑝 ∨ 𝑞) ∈ 𝐵)
46	1, 4	atbase 40063	. . . . . . . . . . 11 ⊢ (𝑟 ∈ 𝐴 → 𝑟 ∈ 𝐵)
47	46	adantl 486	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → 𝑟 ∈ 𝐵)
48	1, 3	latjcl 18490	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ (𝑝 ∨ 𝑞) ∈ 𝐵 ∧ 𝑟 ∈ 𝐵) → ((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵)
49	40, 45, 47, 48	syl3anc 1398	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → ((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵)
50	49	biantrurd 541	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → (∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)) ↔ (((𝑝 ∨ 𝑞) ∨ 𝑟) ∈ 𝐵 ∧ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)))))
51	38, 50	bitr4id 293	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) ∧ 𝑟 ∈ 𝐴) → (∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
52	51	rexbidva 3187	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → (∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
53	52	2rexbidva 3228	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
54		rexcom4 3292	. . . . . . . . 9 ⊢ (∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
55	54	rexbii 3112	. . . . . . . 8 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
56		rexcom4 3292	. . . . . . . 8 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
57	55, 56	bitri 278	. . . . . . 7 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
58	57	rexbii 3112	. . . . . 6 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
59		rexcom4 3292	. . . . . 6 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
60	58, 59	bitri 278	. . . . 5 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑦∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
61	53, 60	bitr3di 289	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
62		rexcom 3294	. . . . . . . . . . 11 ⊢ (∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
63	62	rexbii 3112	. . . . . . . . . 10 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑞 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
64		rexcom 3294	. . . . . . . . . 10 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
65	63, 64	bitri 278	. . . . . . . . 9 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
66	65	rexbii 3112	. . . . . . . 8 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
67		rexcom 3294	. . . . . . . 8 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
68	66, 67	bitri 278	. . . . . . 7 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
69	1, 2, 3, 4, 5	islpln2 40310	. . . . . . . . . . 11 ⊢ (𝐾 ∈ HL → (𝑦 ∈ (LPlanes‘𝐾) ↔ (𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
70	69	adantr 485	. . . . . . . . . 10 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑦 ∈ (LPlanes‘𝐾) ↔ (𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
71	70	anbi1d 642	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑦 ∈ (LPlanes‘𝐾) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
72		r19.42v 3197	. . . . . . . . . 10 ⊢ (∃𝑝 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
73		r19.42v 3197	. . . . . . . . . . . . 13 ⊢ (∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
74	73	rexbii 3112	. . . . . . . . . . . 12 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
75		r19.42v 3197	. . . . . . . . . . . 12 ⊢ (∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
76	74, 75	bitri 278	. . . . . . . . . . 11 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
77	76	rexbii 3112	. . . . . . . . . 10 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
78		an32 658	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
79	72, 77, 78	3bitr4ri 307	. . . . . . . . 9 ⊢ (((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
80	71, 79	bitrdi 290	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑦 ∈ (LPlanes‘𝐾) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
81	80	rexbidv 3189	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑠 ∈ 𝐴 (𝑦 ∈ (LPlanes‘𝐾) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ ∃𝑠 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
82	68, 81	bitr4id 293	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑠 ∈ 𝐴 (𝑦 ∈ (LPlanes‘𝐾) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
83		r19.42v 3197	. . . . . 6 ⊢ (∃𝑠 ∈ 𝐴 (𝑦 ∈ (LPlanes‘𝐾) ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ↔ (𝑦 ∈ (LPlanes‘𝐾) ∧ ∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))))
84	82, 83	bitrdi 290	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ (𝑦 ∈ (LPlanes‘𝐾) ∧ ∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
85	84	exbidv 1951	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠))) ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑦 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ∃𝑦(𝑦 ∈ (LPlanes‘𝐾) ∧ ∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
86	61, 85	bitrd 282	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠)) ↔ ∃𝑦(𝑦 ∈ (LPlanes‘𝐾) ∧ ∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)))))
87	8, 86	bitr4id 293	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑦 ∈ (LPlanes‘𝐾)∃𝑠 ∈ 𝐴 (¬ 𝑠 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑠)) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))
88	7, 87	bitrd 282	1 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑋 ∈ 𝑉 ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ ¬ 𝑠 ≤ ((𝑝 ∨ 𝑞) ∨ 𝑟)) ∧ 𝑋 = (((𝑝 ∨ 𝑞) ∨ 𝑟) ∨ 𝑠))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1103   = wceq 1570  ∃wex 1809   ∈ wcel 2143   ≠ wne 2958  ∃wrex 3089   class class class wbr 5109  ‘cfv 6536  (class class class)co 7410  Basecbs 17264  lecple 17312  joincjn 18362  Latclat 18482  Atomscatm 40037  HLchlt 40124  LPlanesclpl 40266  LVolsclvol 40267

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 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732

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 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-proset 18345  df-poset 18364  df-plt 18379  df-lub 18395  df-glb 18396  df-join 18397  df-meet 18398  df-p0 18474  df-lat 18483  df-clat 18550  df-oposet 39950  df-ol 39952  df-oml 39953  df-covers 40040  df-ats 40041  df-atl 40072  df-cvlat 40096  df-hlat 40125  df-llines 40272  df-lplanes 40273  df-lvols 40274

This theorem is referenced by:  islvol2  40354  lvoli2  40355