Theorem islpln5 39475

Description: The predicate "is a lattice plane" in terms of atoms. (Contributed by NM, 24-Jun-2012.)

Hypotheses

Ref	Expression
islpln5.b	⊢ 𝐵 = (Base‘𝐾)
islpln5.l	⊢ ≤ = (le‘𝐾)
islpln5.j	⊢ ∨ = (join‘𝐾)
islpln5.a	⊢ 𝐴 = (Atoms‘𝐾)
islpln5.p	⊢ 𝑃 = (LPlanes‘𝐾)

Assertion

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

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

Allowed substitution hints:   𝑃(𝑟,𝑞,𝑝)

Proof of Theorem islpln5

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		islpln5.b	. . 3 ⊢ 𝐵 = (Base‘𝐾)
2		islpln5.l	. . 3 ⊢ ≤ = (le‘𝐾)
3		islpln5.j	. . 3 ⊢ ∨ = (join‘𝐾)
4		islpln5.a	. . 3 ⊢ 𝐴 = (Atoms‘𝐾)
5		eqid 2734	. . 3 ⊢ (LLines‘𝐾) = (LLines‘𝐾)
6		islpln5.p	. . 3 ⊢ 𝑃 = (LPlanes‘𝐾)
7	1, 2, 3, 4, 5, 6	islpln3 39473	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑋 ∈ 𝑃 ↔ ∃𝑦 ∈ (LLines‘𝐾)∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))
8		df-rex 3060	. . 3 ⊢ (∃𝑦 ∈ (LLines‘𝐾)∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)) ↔ ∃𝑦(𝑦 ∈ (LLines‘𝐾) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))
9		r19.41v 3172	. . . . . . . . . 10 ⊢ (∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ (∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
10		an13 647	. . . . . . . . . 10 ⊢ ((∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ (𝑦 = (𝑝 ∨ 𝑞) ∧ (𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))))
11	9, 10	bitri 275	. . . . . . . . 9 ⊢ (∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ (𝑦 = (𝑝 ∨ 𝑞) ∧ (𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))))
12	11	exbii 1847	. . . . . . . 8 ⊢ (∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑦(𝑦 = (𝑝 ∨ 𝑞) ∧ (𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))))
13		ovex 7432	. . . . . . . . 9 ⊢ (𝑝 ∨ 𝑞) ∈ V
14		an12 645	. . . . . . . . . . . 12 ⊢ ((𝑝 ≠ 𝑞 ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ (𝑦 ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
15		eleq1 2821	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (𝑦 ∈ 𝐵 ↔ (𝑝 ∨ 𝑞) ∈ 𝐵))
16		breq2 5120	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (𝑟 ≤ 𝑦 ↔ 𝑟 ≤ (𝑝 ∨ 𝑞)))
17	16	notbid 318	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (¬ 𝑟 ≤ 𝑦 ↔ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞)))
18		oveq1 7406	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (𝑦 ∨ 𝑟) = ((𝑝 ∨ 𝑞) ∨ 𝑟))
19	18	eqeq2d 2745	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (𝑋 = (𝑦 ∨ 𝑟) ↔ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))
20	17, 19	anbi12d 632	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)) ↔ (¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
21	20	anbi2d 630	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ (𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
22		3anass 1094	. . . . . . . . . . . . . 14 ⊢ ((𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ (𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
23	21, 22	bitr4di 289	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
24	15, 23	anbi12d 632	. . . . . . . . . . . 12 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((𝑦 ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
25	14, 24	bitrid 283	. . . . . . . . . . 11 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((𝑝 ≠ 𝑞 ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
26	25	rexbidv 3162	. . . . . . . . . 10 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → (∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ ∃𝑟 ∈ 𝐴 ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
27		r19.42v 3174	. . . . . . . . . 10 ⊢ (∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ (𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
28		r19.42v 3174	. . . . . . . . . 10 ⊢ (∃𝑟 ∈ 𝐴 ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
29	26, 27, 28	3bitr3g 313	. . . . . . . . 9 ⊢ (𝑦 = (𝑝 ∨ 𝑞) → ((𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
30	13, 29	ceqsexv 3509	. . . . . . . 8 ⊢ (∃𝑦(𝑦 = (𝑝 ∨ 𝑞) ∧ (𝑝 ≠ 𝑞 ∧ ∃𝑟 ∈ 𝐴 (𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
31	12, 30	bitri 275	. . . . . . 7 ⊢ (∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
32		simpll 766	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → 𝐾 ∈ HL)
33		simprl 770	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → 𝑝 ∈ 𝐴)
34		simprr 772	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → 𝑞 ∈ 𝐴)
35	1, 3, 4	hlatjcl 39306	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴) → (𝑝 ∨ 𝑞) ∈ 𝐵)
36	32, 33, 34, 35	syl3anc 1372	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → (𝑝 ∨ 𝑞) ∈ 𝐵)
37	36	biantrurd 532	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → (∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ ((𝑝 ∨ 𝑞) ∈ 𝐵 ∧ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)))))
38	31, 37	bitr4id 290	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) ∧ (𝑝 ∈ 𝐴 ∧ 𝑞 ∈ 𝐴)) → (∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
39	38	2rexbidva 3202	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
40		rexcom4 3267	. . . . . . 7 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
41	40	rexbii 3082	. . . . . 6 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
42		rexcom4 3267	. . . . . 6 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑦∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
43	41, 42	bitri 275	. . . . 5 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑦∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
44	39, 43	bitr3di 286	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ ∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞)))))
45		rexcom 3269	. . . . . . . . 9 ⊢ (∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑟 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
46	45	rexbii 3082	. . . . . . . 8 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
47		rexcom 3269	. . . . . . . 8 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑟 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
48	46, 47	bitri 275	. . . . . . 7 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑟 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
49	1, 3, 4, 5	islln2 39451	. . . . . . . . . . 11 ⊢ (𝐾 ∈ HL → (𝑦 ∈ (LLines‘𝐾) ↔ (𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞)))))
50	49	adantr 480	. . . . . . . . . 10 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑦 ∈ (LLines‘𝐾) ↔ (𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞)))))
51	50	anbi1d 631	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑦 ∈ (LLines‘𝐾) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
52		r19.42v 3174	. . . . . . . . . 10 ⊢ (∃𝑝 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
53		r19.42v 3174	. . . . . . . . . . 11 ⊢ (∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
54	53	rexbii 3082	. . . . . . . . . 10 ⊢ (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑝 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
55		an32 646	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
56	52, 54, 55	3bitr4ri 304	. . . . . . . . 9 ⊢ (((𝑦 ∈ 𝐵 ∧ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))))
57	51, 56	bitrdi 287	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑦 ∈ (LLines‘𝐾) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞)))))
58	57	rexbidv 3162	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑟 ∈ 𝐴 (𝑦 ∈ (LLines‘𝐾) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ ∃𝑟 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞)))))
59	48, 58	bitr4id 290	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑟 ∈ 𝐴 (𝑦 ∈ (LLines‘𝐾) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
60		r19.42v 3174	. . . . . 6 ⊢ (∃𝑟 ∈ 𝐴 (𝑦 ∈ (LLines‘𝐾) ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ↔ (𝑦 ∈ (LLines‘𝐾) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))))
61	59, 60	bitrdi 287	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ (𝑦 ∈ (LLines‘𝐾) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
62	61	exbidv 1920	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑦∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 ((𝑦 ∈ 𝐵 ∧ (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟))) ∧ (𝑝 ≠ 𝑞 ∧ 𝑦 = (𝑝 ∨ 𝑞))) ↔ ∃𝑦(𝑦 ∈ (LLines‘𝐾) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
63	44, 62	bitrd 279	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟)) ↔ ∃𝑦(𝑦 ∈ (LLines‘𝐾) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)))))
64	8, 63	bitr4id 290	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (∃𝑦 ∈ (LLines‘𝐾)∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑦 ∧ 𝑋 = (𝑦 ∨ 𝑟)) ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))
65	7, 64	bitrd 279	1 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → (𝑋 ∈ 𝑃 ↔ ∃𝑝 ∈ 𝐴 ∃𝑞 ∈ 𝐴 ∃𝑟 ∈ 𝐴 (𝑝 ≠ 𝑞 ∧ ¬ 𝑟 ≤ (𝑝 ∨ 𝑞) ∧ 𝑋 = ((𝑝 ∨ 𝑞) ∨ 𝑟))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1539  ∃wex 1778   ∈ wcel 2107   ≠ wne 2931  ∃wrex 3059   class class class wbr 5116  ‘cfv 6527  (class class class)co 7399  Basecbs 17213  lecple 17263  joincjn 18308  Atomscatm 39202  HLchlt 39289  LLinesclln 39431  LPlanesclpl 39432

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2706  ax-rep 5246  ax-sep 5263  ax-nul 5273  ax-pow 5332  ax-pr 5399  ax-un 7723

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2808  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-rmo 3357  df-reu 3358  df-rab 3414  df-v 3459  df-sbc 3764  df-csb 3873  df-dif 3927  df-un 3929  df-in 3931  df-ss 3941  df-nul 4307  df-if 4499  df-pw 4575  df-sn 4600  df-pr 4602  df-op 4606  df-uni 4881  df-iun 4966  df-br 5117  df-opab 5179  df-mpt 5199  df-id 5545  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-iota 6480  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-riota 7356  df-ov 7402  df-oprab 7403  df-proset 18291  df-poset 18310  df-plt 18325  df-lub 18341  df-glb 18342  df-join 18343  df-meet 18344  df-p0 18420  df-lat 18427  df-clat 18494  df-oposet 39115  df-ol 39117  df-oml 39118  df-covers 39205  df-ats 39206  df-atl 39237  df-cvlat 39261  df-hlat 39290  df-llines 39438  df-lplanes 39439

This theorem is referenced by:  islpln2  39476  lplni2  39477