Theorem chirredlem3 31633

Description: Lemma for chirredi 31635. (Contributed by NM, 15-Jun-2006.) (New usage is discouraged.)

Hypotheses

Ref	Expression
chirred.1	⊢ 𝐴 ∈ Cℋ
chirred.2	⊢ (𝑥 ∈ Cℋ → 𝐴 𝐶ℋ 𝑥)

Assertion

Ref	Expression
chirredlem3	⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ (𝑟 ∈ HAtoms ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ⊆ 𝐴 → 𝑟 = 𝑝))

Distinct variable group:   𝑞,𝑝,𝑟,𝑥,𝐴

Proof of Theorem chirredlem3

Step	Hyp	Ref	Expression
1		atelch 31585	. . 3 ⊢ (𝑞 ∈ HAtoms → 𝑞 ∈ Cℋ )
2		chirred.1	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ Cℋ
3	2	chirredlem2 31632	. . . . . . . . . . 11 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞)) = 𝑞)
4	3	oveq2d 7422	. . . . . . . . . 10 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ∨ℋ ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞))) = (𝑟 ∨ℋ 𝑞))
5		atelch 31585	. . . . . . . . . . . . . 14 ⊢ (𝑟 ∈ HAtoms → 𝑟 ∈ Cℋ )
6	5	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) → 𝑟 ∈ Cℋ )
7		atelch 31585	. . . . . . . . . . . . . . 15 ⊢ (𝑝 ∈ HAtoms → 𝑝 ∈ Cℋ )
8		chjcl 30598	. . . . . . . . . . . . . . 15 ⊢ ((𝑝 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) → (𝑝 ∨ℋ 𝑞) ∈ Cℋ )
9	7, 8	sylan 581	. . . . . . . . . . . . . 14 ⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ∈ Cℋ ) → (𝑝 ∨ℋ 𝑞) ∈ Cℋ )
10	9	ad2ant2r 746	. . . . . . . . . . . . 13 ⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) → (𝑝 ∨ℋ 𝑞) ∈ Cℋ )
11		id 22	. . . . . . . . . . . . 13 ⊢ (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))
12		pjoml2 30852	. . . . . . . . . . . . 13 ⊢ ((𝑟 ∈ Cℋ ∧ (𝑝 ∨ℋ 𝑞) ∈ Cℋ ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝑟 ∨ℋ ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞))) = (𝑝 ∨ℋ 𝑞))
13	6, 10, 11, 12	syl3an 1161	. . . . . . . . . . . 12 ⊢ (((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ ((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝑟 ∨ℋ ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞))) = (𝑝 ∨ℋ 𝑞))
14	13	3com12 1124	. . . . . . . . . . 11 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ (𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝑟 ∨ℋ ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞))) = (𝑝 ∨ℋ 𝑞))
15	14	3expb 1121	. . . . . . . . . 10 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ∨ℋ ((⊥‘𝑟) ∩ (𝑝 ∨ℋ 𝑞))) = (𝑝 ∨ℋ 𝑞))
16	4, 15	eqtr3d 2775	. . . . . . . . 9 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ∨ℋ 𝑞) = (𝑝 ∨ℋ 𝑞))
17	16	ineq2d 4212	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = (𝐴 ∩ (𝑝 ∨ℋ 𝑞)))
18		breq2 5152	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑟 → (𝐴 𝐶ℋ 𝑥 ↔ 𝐴 𝐶ℋ 𝑟))
19		chirred.2	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ Cℋ → 𝐴 𝐶ℋ 𝑥)
20	18, 19	vtoclga 3566	. . . . . . . . . . . . . . 15 ⊢ (𝑟 ∈ Cℋ → 𝐴 𝐶ℋ 𝑟)
21		breq2 5152	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑞 → (𝐴 𝐶ℋ 𝑥 ↔ 𝐴 𝐶ℋ 𝑞))
22	21, 19	vtoclga 3566	. . . . . . . . . . . . . . 15 ⊢ (𝑞 ∈ Cℋ → 𝐴 𝐶ℋ 𝑞)
23	20, 22	anim12i 614	. . . . . . . . . . . . . 14 ⊢ ((𝑟 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) → (𝐴 𝐶ℋ 𝑟 ∧ 𝐴 𝐶ℋ 𝑞))
24		fh1 30859	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Cℋ ∧ 𝑟 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) ∧ (𝐴 𝐶ℋ 𝑟 ∧ 𝐴 𝐶ℋ 𝑞)) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
25	2, 24	mp3anl1 1456	. . . . . . . . . . . . . 14 ⊢ (((𝑟 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) ∧ (𝐴 𝐶ℋ 𝑟 ∧ 𝐴 𝐶ℋ 𝑞)) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
26	23, 25	mpdan 686	. . . . . . . . . . . . 13 ⊢ ((𝑟 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
27	5, 26	sylan 581	. . . . . . . . . . . 12 ⊢ ((𝑟 ∈ HAtoms ∧ 𝑞 ∈ Cℋ ) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
28	27	ancoms 460	. . . . . . . . . . 11 ⊢ ((𝑞 ∈ Cℋ ∧ 𝑟 ∈ HAtoms) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
29	28	adantrr 716	. . . . . . . . . 10 ⊢ ((𝑞 ∈ Cℋ ∧ (𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴)) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
30	29	ad2ant2r 746	. . . . . . . . 9 ⊢ (((𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴)) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
31	30	adantll 713	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ (𝑟 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)))
32		breq2 5152	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑝 → (𝐴 𝐶ℋ 𝑥 ↔ 𝐴 𝐶ℋ 𝑝))
33	32, 19	vtoclga 3566	. . . . . . . . . . . . 13 ⊢ (𝑝 ∈ Cℋ → 𝐴 𝐶ℋ 𝑝)
34	33, 22	anim12i 614	. . . . . . . . . . . 12 ⊢ ((𝑝 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) → (𝐴 𝐶ℋ 𝑝 ∧ 𝐴 𝐶ℋ 𝑞))
35		fh1 30859	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Cℋ ∧ 𝑝 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) ∧ (𝐴 𝐶ℋ 𝑝 ∧ 𝐴 𝐶ℋ 𝑞)) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
36	2, 35	mp3anl1 1456	. . . . . . . . . . . 12 ⊢ (((𝑝 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) ∧ (𝐴 𝐶ℋ 𝑝 ∧ 𝐴 𝐶ℋ 𝑞)) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
37	34, 36	mpdan 686	. . . . . . . . . . 11 ⊢ ((𝑝 ∈ Cℋ ∧ 𝑞 ∈ Cℋ ) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
38	7, 37	sylan 581	. . . . . . . . . 10 ⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ∈ Cℋ ) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
39	38	ad2ant2r 746	. . . . . . . . 9 ⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
40	39	adantr 482	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ (𝑝 ∨ℋ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
41	17, 31, 40	3eqtr3d 2781	. . . . . . 7 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)) = ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)))
42		sseqin2 4215	. . . . . . . . . . 11 ⊢ (𝑟 ⊆ 𝐴 ↔ (𝐴 ∩ 𝑟) = 𝑟)
43	42	biimpi 215	. . . . . . . . . 10 ⊢ (𝑟 ⊆ 𝐴 → (𝐴 ∩ 𝑟) = 𝑟)
44	43	ad2antlr 726	. . . . . . . . 9 ⊢ (((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝐴 ∩ 𝑟) = 𝑟)
45	44	adantl 483	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ 𝑟) = 𝑟)
46		incom 4201	. . . . . . . . . 10 ⊢ (𝐴 ∩ 𝑞) = (𝑞 ∩ 𝐴)
47		chsh 30465	. . . . . . . . . . . 12 ⊢ (𝑞 ∈ Cℋ → 𝑞 ∈ Sℋ )
48	2	chshii 30468	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ Sℋ
49		orthin 30687	. . . . . . . . . . . 12 ⊢ ((𝑞 ∈ Sℋ ∧ 𝐴 ∈ Sℋ ) → (𝑞 ⊆ (⊥‘𝐴) → (𝑞 ∩ 𝐴) = 0ℋ))
50	47, 48, 49	sylancl 587	. . . . . . . . . . 11 ⊢ (𝑞 ∈ Cℋ → (𝑞 ⊆ (⊥‘𝐴) → (𝑞 ∩ 𝐴) = 0ℋ))
51	50	imp 408	. . . . . . . . . 10 ⊢ ((𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴)) → (𝑞 ∩ 𝐴) = 0ℋ)
52	46, 51	eqtrid 2785	. . . . . . . . 9 ⊢ ((𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴)) → (𝐴 ∩ 𝑞) = 0ℋ)
53	52	ad2antlr 726	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ 𝑞) = 0ℋ)
54	45, 53	oveq12d 7424	. . . . . . 7 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → ((𝐴 ∩ 𝑟) ∨ℋ (𝐴 ∩ 𝑞)) = (𝑟 ∨ℋ 0ℋ))
55		sseqin2 4215	. . . . . . . . . . 11 ⊢ (𝑝 ⊆ 𝐴 ↔ (𝐴 ∩ 𝑝) = 𝑝)
56	55	biimpi 215	. . . . . . . . . 10 ⊢ (𝑝 ⊆ 𝐴 → (𝐴 ∩ 𝑝) = 𝑝)
57	56	adantl 483	. . . . . . . . 9 ⊢ ((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) → (𝐴 ∩ 𝑝) = 𝑝)
58	57	ad2antrr 725	. . . . . . . 8 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝐴 ∩ 𝑝) = 𝑝)
59	58, 53	oveq12d 7424	. . . . . . 7 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → ((𝐴 ∩ 𝑝) ∨ℋ (𝐴 ∩ 𝑞)) = (𝑝 ∨ℋ 0ℋ))
60	41, 54, 59	3eqtr3d 2781	. . . . . 6 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ∨ℋ 0ℋ) = (𝑝 ∨ℋ 0ℋ))
61		chj0 30738	. . . . . . . . 9 ⊢ (𝑟 ∈ Cℋ → (𝑟 ∨ℋ 0ℋ) = 𝑟)
62	5, 61	syl 17	. . . . . . . 8 ⊢ (𝑟 ∈ HAtoms → (𝑟 ∨ℋ 0ℋ) = 𝑟)
63	62	ad2antrr 725	. . . . . . 7 ⊢ (((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝑟 ∨ℋ 0ℋ) = 𝑟)
64	63	adantl 483	. . . . . 6 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ∨ℋ 0ℋ) = 𝑟)
65		chj0 30738	. . . . . . . 8 ⊢ (𝑝 ∈ Cℋ → (𝑝 ∨ℋ 0ℋ) = 𝑝)
66	7, 65	syl 17	. . . . . . 7 ⊢ (𝑝 ∈ HAtoms → (𝑝 ∨ℋ 0ℋ) = 𝑝)
67	66	ad3antrrr 729	. . . . . 6 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑝 ∨ℋ 0ℋ) = 𝑝)
68	60, 64, 67	3eqtr3d 2781	. . . . 5 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ ((𝑟 ∈ HAtoms ∧ 𝑟 ⊆ 𝐴) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → 𝑟 = 𝑝)
69	68	exp44 439	. . . 4 ⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) → (𝑟 ∈ HAtoms → (𝑟 ⊆ 𝐴 → (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → 𝑟 = 𝑝))))
70	69	com34 91	. . 3 ⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ Cℋ ∧ 𝑞 ⊆ (⊥‘𝐴))) → (𝑟 ∈ HAtoms → (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → (𝑟 ⊆ 𝐴 → 𝑟 = 𝑝))))
71	1, 70	sylanr1 681	. 2 ⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → (𝑟 ∈ HAtoms → (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → (𝑟 ⊆ 𝐴 → 𝑟 = 𝑝))))
72	71	imp32 420	1 ⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ (𝑟 ∈ HAtoms ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 ⊆ 𝐴 → 𝑟 = 𝑝))

Syntax hints:   → wi 4   ∧ wa 397   = wceq 1542   ∈ wcel 2107   ∩ cin 3947   ⊆ wss 3948   class class class wbr 5148  ‘cfv 6541  (class class class)co 7406   S_ℋ csh 30169   C_ℋ cch 30170  ⊥cort 30171   ∨_ℋ chj 30174  0_ℋc0h 30176   𝐶_ℋ ccm 30177  HAtomscat 30206

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-inf2 9633  ax-cc 10427  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185  ax-addf 11186  ax-mulf 11187  ax-hilex 30240  ax-hfvadd 30241  ax-hvcom 30242  ax-hvass 30243  ax-hv0cl 30244  ax-hvaddid 30245  ax-hfvmul 30246  ax-hvmulid 30247  ax-hvmulass 30248  ax-hvdistr1 30249  ax-hvdistr2 30250  ax-hvmul0 30251  ax-hfi 30320  ax-his1 30323  ax-his2 30324  ax-his3 30325  ax-his4 30326  ax-hcompl 30443

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-tp 4633  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-of 7667  df-om 7853  df-1st 7972  df-2nd 7973  df-supp 8144  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-2o 8464  df-oadd 8467  df-omul 8468  df-er 8700  df-map 8819  df-pm 8820  df-ixp 8889  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-fsupp 9359  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9502  df-card 9931  df-acn 9934  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-clim 15429  df-rlim 15430  df-sum 15630  df-struct 17077  df-sets 17094  df-slot 17112  df-ndx 17124  df-base 17142  df-ress 17171  df-plusg 17207  df-mulr 17208  df-starv 17209  df-sca 17210  df-vsca 17211  df-ip 17212  df-tset 17213  df-ple 17214  df-ds 17216  df-unif 17217  df-hom 17218  df-cco 17219  df-rest 17365  df-topn 17366  df-0g 17384  df-gsum 17385  df-topgen 17386  df-pt 17387  df-prds 17390  df-xrs 17445  df-qtop 17450  df-imas 17451  df-xps 17453  df-mre 17527  df-mrc 17528  df-acs 17530  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-submnd 18669  df-mulg 18946  df-cntz 19176  df-cmn 19645  df-psmet 20929  df-xmet 20930  df-met 20931  df-bl 20932  df-mopn 20933  df-fbas 20934  df-fg 20935  df-cnfld 20938  df-top 22388  df-topon 22405  df-topsp 22427  df-bases 22441  df-cld 22515  df-ntr 22516  df-cls 22517  df-nei 22594  df-cn 22723  df-cnp 22724  df-lm 22725  df-haus 22811  df-tx 23058  df-hmeo 23251  df-fil 23342  df-fm 23434  df-flim 23435  df-flf 23436  df-xms 23818  df-ms 23819  df-tms 23820  df-cfil 24764  df-cau 24765  df-cmet 24766  df-grpo 29734  df-gid 29735  df-ginv 29736  df-gdiv 29737  df-ablo 29786  df-vc 29800  df-nv 29833  df-va 29836  df-ba 29837  df-sm 29838  df-0v 29839  df-vs 29840  df-nmcv 29841  df-ims 29842  df-dip 29942  df-ssp 29963  df-ph 30054  df-cbn 30104  df-hnorm 30209  df-hba 30210  df-hvsub 30212  df-hlim 30213  df-hcau 30214  df-sh 30448  df-ch 30462  df-oc 30493  df-ch0 30494  df-shs 30549  df-span 30550  df-chj 30551  df-chsup 30552  df-pjh 30636  df-cm 30824  df-cv 31520  df-at 31579

This theorem is referenced by:  chirredlem4  31634