cdlemkid1 - Mathbox for Norm Megill

	Mathbox for Norm Megill		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > cdlemkid1		Structured version Visualization version GIF version

Theorem cdlemkid1 40306

Description: Lemma for cdlemkid 40320. (Contributed by NM, 24-Jul-2013.)

**Hypotheses**
Ref	Expression
cdlemk5.b	⊢ 𝐵 = (Base‘𝐾)
cdlemk5.l	⊢ ≤ = (le‘𝐾)
cdlemk5.j	⊢ ∨ = (join‘𝐾)
cdlemk5.m	⊢ ∧ = (meet‘𝐾)
cdlemk5.a	⊢ 𝐴 = (Atoms‘𝐾)
cdlemk5.h	⊢ 𝐻 = (LHyp‘𝐾)
cdlemk5.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk5.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk5.z	⊢ 𝑍 = ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))))

**Assertion**
Ref	Expression
cdlemkid1	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑍 ∨ (𝑅‘𝑏)) = (𝑃 ∨ (𝑅‘𝑏)))

**Proof of Theorem cdlemkid1**
Step	Hyp	Ref	Expression
1		cdlemk5.z	. . 3 ⊢ 𝑍 = ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))))
2	1	oveq1i 7415	. 2 ⊢ (𝑍 ∨ (𝑅‘𝑏)) = (((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹)))) ∨ (𝑅‘𝑏))
3		simp1l 1194	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ HL)
4		simp1 1133	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
5		simp3rl 1243	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝑏 ∈ 𝑇)
6		simp3rr 1244	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝑏 ≠ ( I ↾ 𝐵))
7		cdlemk5.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝐾)
8		cdlemk5.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
9		cdlemk5.h	. . . . . 6 ⊢ 𝐻 = (LHyp‘𝐾)
10		cdlemk5.t	. . . . . 6 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
11		cdlemk5.r	. . . . . 6 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
12	7, 8, 9, 10, 11	trlnidat 39557	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)) → (𝑅‘𝑏) ∈ 𝐴)
13	4, 5, 6, 12	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘𝑏) ∈ 𝐴)
14		simp3ll 1241	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃 ∈ 𝐴)
15		cdlemk5.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
16	7, 15, 8	hlatjcl 38750	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ (𝑅‘𝑏) ∈ 𝐴) → (𝑃 ∨ (𝑅‘𝑏)) ∈ 𝐵)
17	3, 14, 13, 16	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 ∨ (𝑅‘𝑏)) ∈ 𝐵)
18	3	hllatd 38747	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ Lat)
19		simp22 1204	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝑁 ∈ 𝑇)
20	7, 8	atbase 38672	. . . . . . 7 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ 𝐵)
21	14, 20	syl 17	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃 ∈ 𝐵)
22	7, 9, 10	ltrncl 39509	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑁 ∈ 𝑇 ∧ 𝑃 ∈ 𝐵) → (𝑁‘𝑃) ∈ 𝐵)
23	4, 19, 21, 22	syl3anc 1368	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑁‘𝑃) ∈ 𝐵)
24		simp21 1203	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → 𝐹 ∈ 𝑇)
25	9, 10	ltrncnv 39530	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ^◡𝐹 ∈ 𝑇)
26	4, 24, 25	syl2anc 583	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ^◡𝐹 ∈ 𝑇)
27	9, 10	ltrnco 40103	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑏 ∈ 𝑇 ∧ ^◡𝐹 ∈ 𝑇) → (𝑏 ∘ ^◡𝐹) ∈ 𝑇)
28	4, 5, 26, 27	syl3anc 1368	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑏 ∘ ^◡𝐹) ∈ 𝑇)
29	7, 9, 10, 11	trlcl 39548	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑏 ∘ ^◡𝐹) ∈ 𝑇) → (𝑅‘(𝑏 ∘ ^◡𝐹)) ∈ 𝐵)
30	4, 28, 29	syl2anc 583	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘(𝑏 ∘ ^◡𝐹)) ∈ 𝐵)
31	7, 15	latjcl 18404	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑁‘𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏 ∘ ^◡𝐹)) ∈ 𝐵) → ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∈ 𝐵)
32	18, 23, 30, 31	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∈ 𝐵)
33		cdlemk5.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
34	33, 15, 8	hlatlej2 38759	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ (𝑅‘𝑏) ∈ 𝐴) → (𝑅‘𝑏) ≤ (𝑃 ∨ (𝑅‘𝑏)))
35	3, 14, 13, 34	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘𝑏) ≤ (𝑃 ∨ (𝑅‘𝑏)))
36		cdlemk5.m	. . . . 5 ⊢ ∧ = (meet‘𝐾)
37	7, 33, 15, 36, 8	atmod2i1 39245	. . . 4 ⊢ ((𝐾 ∈ HL ∧ ((𝑅‘𝑏) ∈ 𝐴 ∧ (𝑃 ∨ (𝑅‘𝑏)) ∈ 𝐵 ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∈ 𝐵) ∧ (𝑅‘𝑏) ≤ (𝑃 ∨ (𝑅‘𝑏))) → (((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹)))) ∨ (𝑅‘𝑏)) = ((𝑃 ∨ (𝑅‘𝑏)) ∧ (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏))))
38	3, 13, 17, 32, 35, 37	syl131anc 1380	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹)))) ∨ (𝑅‘𝑏)) = ((𝑃 ∨ (𝑅‘𝑏)) ∧ (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏))))
39	7, 8	atbase 38672	. . . . . . . 8 ⊢ ((𝑅‘𝑏) ∈ 𝐴 → (𝑅‘𝑏) ∈ 𝐵)
40	13, 39	syl 17	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘𝑏) ∈ 𝐵)
41	7, 9, 10, 11	trlcl 39548	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑁 ∈ 𝑇) → (𝑅‘𝑁) ∈ 𝐵)
42	4, 19, 41	syl2anc 583	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘𝑁) ∈ 𝐵)
43	7, 15	latj32 18450	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ 𝐵 ∧ (𝑅‘𝑏) ∈ 𝐵 ∧ (𝑅‘𝑁) ∈ 𝐵)) → ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁)) = ((𝑃 ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)))
44	18, 21, 40, 42, 43	syl13anc 1369	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁)) = ((𝑃 ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)))
45		simp3l 1198	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
46	33, 15, 8, 9, 10, 11	trljat3 39552	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑁 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → (𝑃 ∨ (𝑅‘𝑁)) = ((𝑁‘𝑃) ∨ (𝑅‘𝑁)))
47	4, 19, 45, 46	syl3anc 1368	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 ∨ (𝑅‘𝑁)) = ((𝑁‘𝑃) ∨ (𝑅‘𝑁)))
48	47	oveq1d 7420	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)) = (((𝑁‘𝑃) ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)))
49	7, 15	latjass 18448	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ ((𝑁‘𝑃) ∈ 𝐵 ∧ (𝑅‘𝑁) ∈ 𝐵 ∧ (𝑅‘𝑏) ∈ 𝐵)) → (((𝑁‘𝑃) ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)) = ((𝑁‘𝑃) ∨ ((𝑅‘𝑁) ∨ (𝑅‘𝑏))))
50	18, 23, 42, 40, 49	syl13anc 1369	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁‘𝑃) ∨ (𝑅‘𝑁)) ∨ (𝑅‘𝑏)) = ((𝑁‘𝑃) ∨ ((𝑅‘𝑁) ∨ (𝑅‘𝑏))))
51	44, 48, 50	3eqtrd 2770	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁)) = ((𝑁‘𝑃) ∨ ((𝑅‘𝑁) ∨ (𝑅‘𝑏))))
52	7, 15	latjass 18448	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ ((𝑁‘𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏 ∘ ^◡𝐹)) ∈ 𝐵 ∧ (𝑅‘𝑏) ∈ 𝐵)) → (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏)) = ((𝑁‘𝑃) ∨ ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏))))
53	18, 23, 30, 40, 52	syl13anc 1369	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏)) = ((𝑁‘𝑃) ∨ ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏))))
54	7, 15	latjcom 18412	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ (𝑅‘𝑁) ∈ 𝐵 ∧ (𝑅‘𝑏) ∈ 𝐵) → ((𝑅‘𝑁) ∨ (𝑅‘𝑏)) = ((𝑅‘𝑏) ∨ (𝑅‘𝑁)))
55	18, 42, 40, 54	syl3anc 1368	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑁) ∨ (𝑅‘𝑏)) = ((𝑅‘𝑏) ∨ (𝑅‘𝑁)))
56	9, 10, 11	trlcnv 39549	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
57	4, 24, 56	syl2anc 583	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
58		simp23 1205	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘𝐹) = (𝑅‘𝑁))
59	57, 58	eqtrd 2766	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘^◡𝐹) = (𝑅‘𝑁))
60	59	oveq2d 7421	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑏) ∨ (𝑅‘^◡𝐹)) = ((𝑅‘𝑏) ∨ (𝑅‘𝑁)))
61	55, 60	eqtr4d 2769	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑁) ∨ (𝑅‘𝑏)) = ((𝑅‘𝑏) ∨ (𝑅‘^◡𝐹)))
62	15, 9, 10, 11	trljco 40124	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑏 ∈ 𝑇 ∧ ^◡𝐹 ∈ 𝑇) → ((𝑅‘𝑏) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) = ((𝑅‘𝑏) ∨ (𝑅‘^◡𝐹)))
63	4, 5, 26, 62	syl3anc 1368	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑏) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) = ((𝑅‘𝑏) ∨ (𝑅‘^◡𝐹)))
64	7, 15	latjcom 18412	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ (𝑅‘𝑏) ∈ 𝐵 ∧ (𝑅‘(𝑏 ∘ ^◡𝐹)) ∈ 𝐵) → ((𝑅‘𝑏) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) = ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏)))
65	18, 40, 30, 64	syl3anc 1368	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑏) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) = ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏)))
66	61, 63, 65	3eqtr2d 2772	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅‘𝑁) ∨ (𝑅‘𝑏)) = ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏)))
67	66	oveq2d 7421	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁‘𝑃) ∨ ((𝑅‘𝑁) ∨ (𝑅‘𝑏))) = ((𝑁‘𝑃) ∨ ((𝑅‘(𝑏 ∘ ^◡𝐹)) ∨ (𝑅‘𝑏))))
68	53, 67	eqtr4d 2769	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏)) = ((𝑁‘𝑃) ∨ ((𝑅‘𝑁) ∨ (𝑅‘𝑏))))
69	51, 68	eqtr4d 2769	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁)) = (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏)))
70	69	oveq2d 7421	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁))) = ((𝑃 ∨ (𝑅‘𝑏)) ∧ (((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))) ∨ (𝑅‘𝑏))))
71	7, 15, 36	latabs2 18441	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ (𝑅‘𝑏)) ∈ 𝐵 ∧ (𝑅‘𝑁) ∈ 𝐵) → ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁))) = (𝑃 ∨ (𝑅‘𝑏)))
72	18, 17, 42, 71	syl3anc 1368	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑃 ∨ (𝑅‘𝑏)) ∨ (𝑅‘𝑁))) = (𝑃 ∨ (𝑅‘𝑏)))
73	38, 70, 72	3eqtr2d 2772	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹)))) ∨ (𝑅‘𝑏)) = (𝑃 ∨ (𝑅‘𝑏)))
74	2, 73	eqtrid 2778	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑏 ∈ 𝑇 ∧ 𝑏 ≠ ( I ↾ 𝐵)))) → (𝑍 ∨ (𝑅‘𝑏)) = (𝑃 ∨ (𝑅‘𝑏)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 395 ∧ w3a 1084 = wceq 1533 ∈ wcel 2098 ≠ wne 2934 class class class wbr 5141 I cid 5566 ^◡ccnv 5668 ↾ cres 5671 ∘ ccom 5673 ‘cfv 6537 (class class class)co 7405 Basecbs 17153 lecple 17213 joincjn 18276 meetcmee 18277 Latclat 18396 Atomscatm 38646 HLchlt 38733 LHypclh 39368 LTrncltrn 39485 trLctrl 39542

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-10 2129 ax-11 2146 ax-12 2163 ax-ext 2697 ax-rep 5278 ax-sep 5292 ax-nul 5299 ax-pow 5356 ax-pr 5420 ax-un 7722 ax-riotaBAD 38336

This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3or 1085 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2528 df-eu 2557 df-clab 2704 df-cleq 2718 df-clel 2804 df-nfc 2879 df-ne 2935 df-ral 3056 df-rex 3065 df-rmo 3370 df-reu 3371 df-rab 3427 df-v 3470 df-sbc 3773 df-csb 3889 df-dif 3946 df-un 3948 df-in 3950 df-ss 3960 df-nul 4318 df-if 4524 df-pw 4599 df-sn 4624 df-pr 4626 df-op 4630 df-uni 4903 df-iun 4992 df-iin 4993 df-br 5142 df-opab 5204 df-mpt 5225 df-id 5567 df-xp 5675 df-rel 5676 df-cnv 5677 df-co 5678 df-dm 5679 df-rn 5680 df-res 5681 df-ima 5682 df-iota 6489 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-riota 7361 df-ov 7408 df-oprab 7409 df-mpo 7410 df-1st 7974 df-2nd 7975 df-undef 8259 df-map 8824 df-proset 18260 df-poset 18278 df-plt 18295 df-lub 18311 df-glb 18312 df-join 18313 df-meet 18314 df-p0 18390 df-p1 18391 df-lat 18397 df-clat 18464 df-oposet 38559 df-ol 38561 df-oml 38562 df-covers 38649 df-ats 38650 df-atl 38681 df-cvlat 38705 df-hlat 38734 df-llines 38882 df-lplanes 38883 df-lvols 38884 df-lines 38885 df-psubsp 38887 df-pmap 38888 df-padd 39180 df-lhyp 39372 df-laut 39373 df-ldil 39488 df-ltrn 39489 df-trl 39543

This theorem is referenced by: cdlemkid2 40308

W3C validator