dihglblem5apreN - Mathbox for Norm Megill

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

Theorem dihglblem5apreN 40150

Description: A conjunction property of isomorphism H. TODO: reduce antecedent size; general review for shorter proof. (Contributed by NM, 21-Mar-2014.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
dihglblem5a.b	⊢ 𝐵 = (Base‘𝐾)
dihglblem5a.m	⊢ ∧ = (meet‘𝐾)
dihglblem5a.h	⊢ 𝐻 = (LHyp‘𝐾)
dihglblem5a.i	⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
dihglblem5a.l	⊢ ≤ = (le‘𝐾)
dihglblem5a.j	⊢ ∨ = (join‘𝐾)
dihglblem5a.a	⊢ 𝐴 = (Atoms‘𝐾)
dihglblem5a.p	⊢ 𝑃 = ((oc‘𝐾)‘𝑊)
dihglblem5a.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
dihglblem5a.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
dihglblem5a.e	⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
dihglblem5a.g	⊢ 𝐺 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑞)
dihglblem5a.o	⊢ 0 = (ℎ ∈ 𝑇 ↦ ( I ↾ 𝐵))

**Assertion**
Ref	Expression
dihglblem5apreN	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑊)) = ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))

Distinct variable groups: ∧ ,𝑞 ℎ,𝑞, ≤ 𝐴,ℎ,𝑞 𝐵,ℎ,𝑞 ℎ,𝐻,𝑞 𝐼,𝑞 ℎ,𝐾,𝑞 𝑃,ℎ 𝑇,ℎ ℎ,𝑊,𝑞 𝑋,𝑞 Allowed substitution hints: 𝑃(𝑞) 𝑅(ℎ,𝑞) 𝑇(𝑞) 𝐸(ℎ,𝑞) 𝐺(ℎ,𝑞) 𝐼(ℎ) ∨ (ℎ,𝑞) ∧ (ℎ) 𝑋(ℎ) 0 (ℎ,𝑞)

Proof of Theorem dihglblem5apreN Dummy variables 𝑓 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		hllat 38221	. . . . . 6 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
2	1	ad2antrr 724	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → 𝐾 ∈ Lat)
3		simprl 769	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → 𝑋 ∈ 𝐵)
4		dihglblem5a.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
5		dihglblem5a.h	. . . . . . 7 ⊢ 𝐻 = (LHyp‘𝐾)
6	4, 5	lhpbase 38857	. . . . . 6 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ 𝐵)
7	6	ad2antlr 725	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → 𝑊 ∈ 𝐵)
8		dihglblem5a.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
9		dihglblem5a.m	. . . . . 6 ⊢ ∧ = (meet‘𝐾)
10	4, 8, 9	latmle1 18413	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → (𝑋 ∧ 𝑊) ≤ 𝑋)
11	2, 3, 7, 10	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝑋 ∧ 𝑊) ≤ 𝑋)
12		simpl 483	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
13	4, 9	latmcl 18389	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → (𝑋 ∧ 𝑊) ∈ 𝐵)
14	2, 3, 7, 13	syl3anc 1371	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝑋 ∧ 𝑊) ∈ 𝐵)
15		dihglblem5a.i	. . . . . 6 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
16	4, 8, 5, 15	dihord 40123	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑊) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → ((𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑋) ↔ (𝑋 ∧ 𝑊) ≤ 𝑋))
17	12, 14, 3, 16	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → ((𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑋) ↔ (𝑋 ∧ 𝑊) ≤ 𝑋))
18	11, 17	mpbird 256	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑋))
19	4, 8, 9	latmle2 18414	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → (𝑋 ∧ 𝑊) ≤ 𝑊)
20	2, 3, 7, 19	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝑋 ∧ 𝑊) ≤ 𝑊)
21	4, 8, 5, 15	dihord 40123	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑊) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → ((𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑊) ↔ (𝑋 ∧ 𝑊) ≤ 𝑊))
22	12, 14, 7, 21	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → ((𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑊) ↔ (𝑋 ∧ 𝑊) ≤ 𝑊))
23	20, 22	mpbird 256	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑊)) ⊆ (𝐼‘𝑊))
24	18, 23	ssind 4231	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑊)) ⊆ ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))
25	5, 15	dihvalrel 40138	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → Rel (𝐼‘𝑋))
26		relin1 5810	. . . . 5 ⊢ (Rel (𝐼‘𝑋) → Rel ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))
27	25, 26	syl 17	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → Rel ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))
28	27	adantr 481	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → Rel ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))
29		elin 3963	. . . 4 ⊢ (⟨𝑓, 𝑠⟩ ∈ ((𝐼‘𝑋) ∩ (𝐼‘𝑊)) ↔ (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)))
30		dihglblem5a.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
31		dihglblem5a.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
32	4, 8, 30, 9, 31, 5	lhpmcvr2 38883	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → ∃𝑞 ∈ 𝐴 (¬ 𝑞 ≤ 𝑊 ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋))
33		dihglblem5a.p	. . . . . . . . . . . 12 ⊢ 𝑃 = ((oc‘𝐾)‘𝑊)
34		dihglblem5a.t	. . . . . . . . . . . 12 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
35		dihglblem5a.r	. . . . . . . . . . . 12 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
36		dihglblem5a.e	. . . . . . . . . . . 12 ⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
37		dihglblem5a.g	. . . . . . . . . . . 12 ⊢ 𝐺 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑞)
38		vex 3478	. . . . . . . . . . . 12 ⊢ 𝑓 ∈ V
39		vex 3478	. . . . . . . . . . . 12 ⊢ 𝑠 ∈ V
40	4, 8, 30, 9, 31, 5, 33, 34, 35, 36, 15, 37, 38, 39	dihopelvalc 40108	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ↔ ((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋)))
41		id 22	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
42	6	adantl 482	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → 𝑊 ∈ 𝐵)
43	4, 8	latref 18390	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ Lat ∧ 𝑊 ∈ 𝐵) → 𝑊 ≤ 𝑊)
44	1, 6, 43	syl2an 596	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → 𝑊 ≤ 𝑊)
45		dihglblem5a.o	. . . . . . . . . . . . . 14 ⊢ 0 = (ℎ ∈ 𝑇 ↦ ( I ↾ 𝐵))
46	4, 8, 5, 34, 35, 45, 15	dihopelvalbN 40097	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑊 ∈ 𝐵 ∧ 𝑊 ≤ 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 )))
47	41, 42, 44, 46	syl12anc 835	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 )))
48	47	3ad2ant1 1133	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 )))
49	40, 48	anbi12d 631	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) ↔ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))))
50		simprll 777	. . . . . . . . . . . . . 14 ⊢ ((((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 )) → 𝑓 ∈ 𝑇)
51	50	adantl 482	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑓 ∈ 𝑇)
52		simprrr 780	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑠 = 0 )
53	52	fveq1d 6890	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑠‘𝐺) = ( 0 ‘𝐺))
54		simpl1 1191	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
55	8, 31, 5, 33	lhpocnel2 38878	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
56	54, 55	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
57		simpl3l 1228	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊))
58	8, 31, 5, 34, 37	ltrniotacl 39438	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊)) → 𝐺 ∈ 𝑇)
59	54, 56, 57, 58	syl3anc 1371	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝐺 ∈ 𝑇)
60	45, 4	tendo02 39646	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝐺 ∈ 𝑇 → ( 0 ‘𝐺) = ( I ↾ 𝐵))
61	59, 60	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → ( 0 ‘𝐺) = ( I ↾ 𝐵))
62	53, 61	eqtrd 2772	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑠‘𝐺) = ( I ↾ 𝐵))
63	62	cnveqd 5873	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → ^◡(𝑠‘𝐺) = ^◡( I ↾ 𝐵))
64		cnvresid 6624	. . . . . . . . . . . . . . . . . . 19 ⊢ ^◡( I ↾ 𝐵) = ( I ↾ 𝐵)
65	63, 64	eqtrdi 2788	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → ^◡(𝑠‘𝐺) = ( I ↾ 𝐵))
66	65	coeq2d 5860	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑓 ∘ ^◡(𝑠‘𝐺)) = (𝑓 ∘ ( I ↾ 𝐵)))
67	4, 5, 34	ltrn1o 38983	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑓 ∈ 𝑇) → 𝑓:𝐵–1-1-onto→𝐵)
68	54, 51, 67	syl2anc 584	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑓:𝐵–1-1-onto→𝐵)
69		f1of 6830	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓:𝐵–1-1-onto→𝐵 → 𝑓:𝐵⟶𝐵)
70		fcoi1 6762	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓:𝐵⟶𝐵 → (𝑓 ∘ ( I ↾ 𝐵)) = 𝑓)
71	68, 69, 70	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑓 ∘ ( I ↾ 𝐵)) = 𝑓)
72	66, 71	eqtrd 2772	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑓 ∘ ^◡(𝑠‘𝐺)) = 𝑓)
73	72	fveq2d 6892	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) = (𝑅‘𝑓))
74		simprlr 778	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋)
75	73, 74	eqbrtrrd 5171	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘𝑓) ≤ 𝑋)
76	8, 5, 34, 35	trlle 39043	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑓 ∈ 𝑇) → (𝑅‘𝑓) ≤ 𝑊)
77	54, 51, 76	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘𝑓) ≤ 𝑊)
78		simpl1l 1224	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝐾 ∈ HL)
79	78	hllatd 38222	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝐾 ∈ Lat)
80	4, 5, 34, 35	trlcl 39023	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑓 ∈ 𝑇) → (𝑅‘𝑓) ∈ 𝐵)
81	54, 51, 80	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘𝑓) ∈ 𝐵)
82		simpl2l 1226	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑋 ∈ 𝐵)
83		simpl1r 1225	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑊 ∈ 𝐻)
84	83, 6	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → 𝑊 ∈ 𝐵)
85	4, 8, 9	latlem12 18415	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ Lat ∧ ((𝑅‘𝑓) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵)) → (((𝑅‘𝑓) ≤ 𝑋 ∧ (𝑅‘𝑓) ≤ 𝑊) ↔ (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊)))
86	79, 81, 82, 84, 85	syl13anc 1372	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (((𝑅‘𝑓) ≤ 𝑋 ∧ (𝑅‘𝑓) ≤ 𝑊) ↔ (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊)))
87	75, 77, 86	mpbi2and 710	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊))
88	51, 87	jca 512	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊)))
89	79, 82, 84, 13	syl3anc 1371	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑋 ∧ 𝑊) ∈ 𝐵)
90	79, 82, 84, 19	syl3anc 1371	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (𝑋 ∧ 𝑊) ≤ 𝑊)
91	4, 8, 5, 34, 35, 45, 15	dihopelvalbN 40097	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑋 ∧ 𝑊) ∈ 𝐵 ∧ (𝑋 ∧ 𝑊) ≤ 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊)) ∧ 𝑠 = 0 )))
92	54, 89, 90, 91	syl12anc 835	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ (𝑋 ∧ 𝑊)) ∧ 𝑠 = 0 )))
93	88, 52, 92	mpbir2and 711	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) ∧ (((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 ))) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)))
94	93	ex 413	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) → ((((𝑓 ∈ 𝑇 ∧ 𝑠 ∈ 𝐸) ∧ (𝑅‘(𝑓 ∘ ^◡(𝑠‘𝐺))) ≤ 𝑋) ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑊) ∧ 𝑠 = 0 )) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊))))
95	49, 94	sylbid 239	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊) ∧ ((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊))))
96	95	3expia 1121	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (((𝑞 ∈ 𝐴 ∧ ¬ 𝑞 ≤ 𝑊) ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)))))
97	96	exp4c 433	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝑞 ∈ 𝐴 → (¬ 𝑞 ≤ 𝑊 → ((𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋 → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)))))))
98	97	imp4a 423	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝑞 ∈ 𝐴 → ((¬ 𝑞 ≤ 𝑊 ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊))))))
99	98	rexlimdv 3153	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (∃𝑞 ∈ 𝐴 (¬ 𝑞 ≤ 𝑊 ∧ (𝑞 ∨ (𝑋 ∧ 𝑊)) = 𝑋) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊)))))
100	32, 99	mpd 15	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑋) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊))))
101	29, 100	biimtrid 241	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼‘𝑋) ∩ (𝐼‘𝑊)) → ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 ∧ 𝑊))))
102	28, 101	relssdv 5786	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → ((𝐼‘𝑋) ∩ (𝐼‘𝑊)) ⊆ (𝐼‘(𝑋 ∧ 𝑊)))
103	24, 102	eqssd 3998	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ ¬ 𝑋 ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑊)) = ((𝐼‘𝑋) ∩ (𝐼‘𝑊)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 ∃wrex 3070 ∩ cin 3946 ⊆ wss 3947 ⟨cop 4633 class class class wbr 5147 ↦ cmpt 5230 I cid 5572 ^◡ccnv 5674 ↾ cres 5677 ∘ ccom 5679 Rel wrel 5680 ⟶wf 6536 –1-1-onto→wf1o 6539 ‘cfv 6540 ℩crio 7360 (class class class)co 7405 Basecbs 17140 lecple 17200 occoc 17201 joincjn 18260 meetcmee 18261 Latclat 18380 Atomscatm 38121 HLchlt 38208 LHypclh 38843 LTrncltrn 38960 trLctrl 39017 TEndoctendo 39611 DIsoHcdih 40087

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2703 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7721 ax-cnex 11162 ax-resscn 11163 ax-1cn 11164 ax-icn 11165 ax-addcl 11166 ax-addrcl 11167 ax-mulcl 11168 ax-mulrcl 11169 ax-mulcom 11170 ax-addass 11171 ax-mulass 11172 ax-distr 11173 ax-i2m1 11174 ax-1ne0 11175 ax-1rid 11176 ax-rnegex 11177 ax-rrecex 11178 ax-cnre 11179 ax-pre-lttri 11180 ax-pre-lttrn 11181 ax-pre-ltadd 11182 ax-pre-mulgt0 11183 ax-riotaBAD 37811

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2534 df-eu 2563 df-clab 2710 df-cleq 2724 df-clel 2810 df-nfc 2885 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3376 df-reu 3377 df-rab 3433 df-v 3476 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-tp 4632 df-op 4634 df-uni 4908 df-int 4950 df-iun 4998 df-iin 4999 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5573 df-eprel 5579 df-po 5587 df-so 5588 df-fr 5630 df-we 5632 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-pred 6297 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6492 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-riota 7361 df-ov 7408 df-oprab 7409 df-mpo 7410 df-om 7852 df-1st 7971 df-2nd 7972 df-tpos 8207 df-undef 8254 df-frecs 8262 df-wrecs 8293 df-recs 8367 df-rdg 8406 df-1o 8462 df-er 8699 df-map 8818 df-en 8936 df-dom 8937 df-sdom 8938 df-fin 8939 df-pnf 11246 df-mnf 11247 df-xr 11248 df-ltxr 11249 df-le 11250 df-sub 11442 df-neg 11443 df-nn 12209 df-2 12271 df-3 12272 df-4 12273 df-5 12274 df-6 12275 df-n0 12469 df-z 12555 df-uz 12819 df-fz 13481 df-struct 17076 df-sets 17093 df-slot 17111 df-ndx 17123 df-base 17141 df-ress 17170 df-plusg 17206 df-mulr 17207 df-sca 17209 df-vsca 17210 df-0g 17383 df-proset 18244 df-poset 18262 df-plt 18279 df-lub 18295 df-glb 18296 df-join 18297 df-meet 18298 df-p0 18374 df-p1 18375 df-lat 18381 df-clat 18448 df-mgm 18557 df-sgrp 18606 df-mnd 18622 df-submnd 18668 df-grp 18818 df-minusg 18819 df-sbg 18820 df-subg 18997 df-cntz 19175 df-lsm 19498 df-cmn 19644 df-abl 19645 df-mgp 19982 df-ur 19999 df-ring 20051 df-oppr 20142 df-dvdsr 20163 df-unit 20164 df-invr 20194 df-dvr 20207 df-drng 20309 df-lmod 20465 df-lss 20535 df-lsp 20575 df-lvec 20706 df-oposet 38034 df-ol 38036 df-oml 38037 df-covers 38124 df-ats 38125 df-atl 38156 df-cvlat 38180 df-hlat 38209 df-llines 38357 df-lplanes 38358 df-lvols 38359 df-lines 38360 df-psubsp 38362 df-pmap 38363 df-padd 38655 df-lhyp 38847 df-laut 38848 df-ldil 38963 df-ltrn 38964 df-trl 39018 df-tendo 39614 df-edring 39616 df-disoa 39888 df-dvech 39938 df-dib 39998 df-dic 40032 df-dih 40088

This theorem is referenced by: dihglblem5aN 40151

W3C validator