Theorem dihjatcclem4 37442

Description: Lemma for isomorphism H of lattice join of two atoms not under the fiducial hyperplane. (Contributed by NM, 29-Sep-2014.)

Hypotheses

Ref	Expression
dihjatcclem.b	⊢ 𝐵 = (Base‘𝐾)
dihjatcclem.l	⊢ ≤ = (le‘𝐾)
dihjatcclem.h	⊢ 𝐻 = (LHyp‘𝐾)
dihjatcclem.j	⊢ ∨ = (join‘𝐾)
dihjatcclem.m	⊢ ∧ = (meet‘𝐾)
dihjatcclem.a	⊢ 𝐴 = (Atoms‘𝐾)
dihjatcclem.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
dihjatcclem.s	⊢ ⊕ = (LSSum‘𝑈)
dihjatcclem.i	⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
dihjatcclem.v	⊢ 𝑉 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
dihjatcclem.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
dihjatcclem.p	⊢ (𝜑 → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
dihjatcclem.q	⊢ (𝜑 → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
dihjatcc.w	⊢ 𝐶 = ((oc‘𝐾)‘𝑊)
dihjatcc.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
dihjatcc.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
dihjatcc.e	⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
dihjatcc.g	⊢ 𝐺 = (℩𝑑 ∈ 𝑇 (𝑑‘𝐶) = 𝑃)
dihjatcc.dd	⊢ 𝐷 = (℩𝑑 ∈ 𝑇 (𝑑‘𝐶) = 𝑄)
dihjatcc.n	⊢ 𝑁 = (𝑎 ∈ 𝐸 ↦ (𝑑 ∈ 𝑇 ↦ ◡(𝑎‘𝑑)))
dihjatcc.o	⊢ 0 = (𝑑 ∈ 𝑇 ↦ ( I ↾ 𝐵))
dihjatcc.d	⊢ 𝐽 = (𝑎 ∈ 𝐸, 𝑏 ∈ 𝐸 ↦ (𝑑 ∈ 𝑇 ↦ ((𝑎‘𝑑) ∘ (𝑏‘𝑑))))

Assertion

Ref	Expression
dihjatcclem4	⊢ (𝜑 → (𝐼‘𝑉) ⊆ ((𝐼‘𝑃) ⊕ (𝐼‘𝑄)))

Distinct variable groups:   ≤ ,𝑑   𝐴,𝑑   𝐵,𝑑   𝐶,𝑑   𝑎,𝑏,𝐸   𝐻,𝑑   𝑃,𝑑   𝑎,𝑑,𝐾,𝑏   𝑄,𝑑   𝑇,𝑎,𝑏,𝑑   𝑊,𝑎,𝑏,𝑑

Allowed substitution hints:   𝜑(𝑎,𝑏,𝑑)   𝐴(𝑎,𝑏)   𝐵(𝑎,𝑏)   𝐶(𝑎,𝑏)   𝐷(𝑎,𝑏,𝑑)   𝑃(𝑎,𝑏)   ⊕ (𝑎,𝑏,𝑑)   𝑄(𝑎,𝑏)   𝑅(𝑎,𝑏,𝑑)   𝑈(𝑎,𝑏,𝑑)   𝐸(𝑑)   𝐺(𝑎,𝑏,𝑑)   𝐻(𝑎,𝑏)   𝐼(𝑎,𝑏,𝑑)   𝐽(𝑎,𝑏,𝑑)   ∨ (𝑎,𝑏,𝑑)   ≤ (𝑎,𝑏)   ∧ (𝑎,𝑏,𝑑)   𝑁(𝑎,𝑏,𝑑)   𝑉(𝑎,𝑏,𝑑)   0 (𝑎,𝑏,𝑑)

Proof of Theorem dihjatcclem4

Dummy variables 𝑡 𝑓 𝑠 𝑔 ℎ 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dihjatcclem.k	. . 3 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		dihjatcclem.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
3		dihjatcclem.i	. . . 4 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
4	2, 3	dihvalrel 37300	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → Rel (𝐼‘𝑉))
5	1, 4	syl 17	. 2 ⊢ (𝜑 → Rel (𝐼‘𝑉))
6	1	adantr 473	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
7		dihjatcclem.l	. . . . . . . . . . . 12 ⊢ ≤ = (le‘𝐾)
8		dihjatcclem.a	. . . . . . . . . . . 12 ⊢ 𝐴 = (Atoms‘𝐾)
9		dihjatcc.w	. . . . . . . . . . . 12 ⊢ 𝐶 = ((oc‘𝐾)‘𝑊)
10	7, 8, 2, 9	lhpocnel2 36040	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝐶 ∈ 𝐴 ∧ ¬ 𝐶 ≤ 𝑊))
11	1, 10	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐶 ∈ 𝐴 ∧ ¬ 𝐶 ≤ 𝑊))
12		dihjatcclem.p	. . . . . . . . . 10 ⊢ (𝜑 → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
13		dihjatcc.t	. . . . . . . . . . 11 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
14		dihjatcc.g	. . . . . . . . . . 11 ⊢ 𝐺 = (℩𝑑 ∈ 𝑇 (𝑑‘𝐶) = 𝑃)
15	7, 8, 2, 13, 14	ltrniotacl 36600	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐶 ∈ 𝐴 ∧ ¬ 𝐶 ≤ 𝑊) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → 𝐺 ∈ 𝑇)
16	1, 11, 12, 15	syl3anc 1491	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 ∈ 𝑇)
17		dihjatcclem.q	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
18		dihjatcc.dd	. . . . . . . . . . . 12 ⊢ 𝐷 = (℩𝑑 ∈ 𝑇 (𝑑‘𝐶) = 𝑄)
19	7, 8, 2, 13, 18	ltrniotacl 36600	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐶 ∈ 𝐴 ∧ ¬ 𝐶 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐷 ∈ 𝑇)
20	1, 11, 17, 19	syl3anc 1491	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ 𝑇)
21	2, 13	ltrncnv 36167	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐷 ∈ 𝑇) → ◡𝐷 ∈ 𝑇)
22	1, 20, 21	syl2anc 580	. . . . . . . . 9 ⊢ (𝜑 → ◡𝐷 ∈ 𝑇)
23	2, 13	ltrnco 36740	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ ◡𝐷 ∈ 𝑇) → (𝐺 ∘ ◡𝐷) ∈ 𝑇)
24	1, 16, 22, 23	syl3anc 1491	. . . . . . . 8 ⊢ (𝜑 → (𝐺 ∘ ◡𝐷) ∈ 𝑇)
25	24	adantr 473	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (𝐺 ∘ ◡𝐷) ∈ 𝑇)
26		simprll 798	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → 𝑓 ∈ 𝑇)
27		simprlr 799	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (𝑅‘𝑓) ≤ 𝑉)
28		dihjatcclem.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐾)
29		dihjatcclem.j	. . . . . . . . . 10 ⊢ ∨ = (join‘𝐾)
30		dihjatcclem.m	. . . . . . . . . 10 ⊢ ∧ = (meet‘𝐾)
31		dihjatcclem.u	. . . . . . . . . 10 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
32		dihjatcclem.s	. . . . . . . . . 10 ⊢ ⊕ = (LSSum‘𝑈)
33		dihjatcclem.v	. . . . . . . . . 10 ⊢ 𝑉 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
34		dihjatcc.r	. . . . . . . . . 10 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
35		dihjatcc.e	. . . . . . . . . 10 ⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
36	28, 7, 2, 29, 30, 8, 31, 32, 3, 33, 1, 12, 17, 9, 13, 34, 35, 14, 18	dihjatcclem3 37441	. . . . . . . . 9 ⊢ (𝜑 → (𝑅‘(𝐺 ∘ ◡𝐷)) = 𝑉)
37	36	adantr 473	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (𝑅‘(𝐺 ∘ ◡𝐷)) = 𝑉)
38	27, 37	breqtrrd 4871	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (𝑅‘𝑓) ≤ (𝑅‘(𝐺 ∘ ◡𝐷)))
39	7, 2, 13, 34, 35	tendoex 36996	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝐺 ∘ ◡𝐷) ∈ 𝑇 ∧ 𝑓 ∈ 𝑇) ∧ (𝑅‘𝑓) ≤ (𝑅‘(𝐺 ∘ ◡𝐷))) → ∃𝑡 ∈ 𝐸 (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)
40	6, 25, 26, 38, 39	syl121anc 1495	. . . . . 6 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → ∃𝑡 ∈ 𝐸 (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)
41		df-rex 3095	. . . . . 6 ⊢ (∃𝑡 ∈ 𝐸 (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓 ↔ ∃𝑡(𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓))
42	40, 41	sylib 210	. . . . 5 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → ∃𝑡(𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓))
43		eqidd 2800	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑡‘𝐺) = (𝑡‘𝐺))
44		simprl 788	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝑡 ∈ 𝐸)
45	1	ad2antrr 718	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
46	12	ad2antrr 718	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
47		fvex 6424	. . . . . . . . . . . 12 ⊢ (𝑡‘𝐺) ∈ V
48		vex 3388	. . . . . . . . . . . 12 ⊢ 𝑡 ∈ V
49	7, 8, 2, 9, 13, 35, 3, 14, 47, 48	dihopelvalcqat 37267	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → (⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ↔ ((𝑡‘𝐺) = (𝑡‘𝐺) ∧ 𝑡 ∈ 𝐸)))
50	45, 46, 49	syl2anc 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ↔ ((𝑡‘𝐺) = (𝑡‘𝐺) ∧ 𝑡 ∈ 𝐸)))
51	43, 44, 50	mpbir2and 705	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃))
52		eqidd 2800	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ((𝑁‘𝑡)‘𝐷) = ((𝑁‘𝑡)‘𝐷))
53		dihjatcc.n	. . . . . . . . . . . 12 ⊢ 𝑁 = (𝑎 ∈ 𝐸 ↦ (𝑑 ∈ 𝑇 ↦ ◡(𝑎‘𝑑)))
54	2, 13, 35, 53	tendoicl 36817	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑡 ∈ 𝐸) → (𝑁‘𝑡) ∈ 𝐸)
55	45, 44, 54	syl2anc 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑁‘𝑡) ∈ 𝐸)
56	17	ad2antrr 718	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
57		fvex 6424	. . . . . . . . . . . 12 ⊢ ((𝑁‘𝑡)‘𝐷) ∈ V
58		fvex 6424	. . . . . . . . . . . 12 ⊢ (𝑁‘𝑡) ∈ V
59	7, 8, 2, 9, 13, 35, 3, 18, 57, 58	dihopelvalcqat 37267	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄) ↔ (((𝑁‘𝑡)‘𝐷) = ((𝑁‘𝑡)‘𝐷) ∧ (𝑁‘𝑡) ∈ 𝐸)))
60	45, 56, 59	syl2anc 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄) ↔ (((𝑁‘𝑡)‘𝐷) = ((𝑁‘𝑡)‘𝐷) ∧ (𝑁‘𝑡) ∈ 𝐸)))
61	52, 55, 60	mpbir2and 705	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄))
62	16	ad2antrr 718	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝐺 ∈ 𝑇)
63	22	ad2antrr 718	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ◡𝐷 ∈ 𝑇)
64	2, 13, 35	tendospdi1 37041	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑡 ∈ 𝐸 ∧ 𝐺 ∈ 𝑇 ∧ ◡𝐷 ∈ 𝑇)) → (𝑡‘(𝐺 ∘ ◡𝐷)) = ((𝑡‘𝐺) ∘ (𝑡‘◡𝐷)))
65	45, 44, 62, 63, 64	syl13anc 1492	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑡‘(𝐺 ∘ ◡𝐷)) = ((𝑡‘𝐺) ∘ (𝑡‘◡𝐷)))
66		simprr 790	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)
67	20	ad2antrr 718	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝐷 ∈ 𝑇)
68	53, 13	tendoi2 36816	. . . . . . . . . . . . 13 ⊢ ((𝑡 ∈ 𝐸 ∧ 𝐷 ∈ 𝑇) → ((𝑁‘𝑡)‘𝐷) = ◡(𝑡‘𝐷))
69	44, 67, 68	syl2anc 580	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ((𝑁‘𝑡)‘𝐷) = ◡(𝑡‘𝐷))
70	2, 13, 35	tendocnv 37042	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑡 ∈ 𝐸 ∧ 𝐷 ∈ 𝑇) → ◡(𝑡‘𝐷) = (𝑡‘◡𝐷))
71	45, 44, 67, 70	syl3anc 1491	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ◡(𝑡‘𝐷) = (𝑡‘◡𝐷))
72	69, 71	eqtr2d 2834	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑡‘◡𝐷) = ((𝑁‘𝑡)‘𝐷))
73	72	coeq2d 5488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ((𝑡‘𝐺) ∘ (𝑡‘◡𝐷)) = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)))
74	65, 66, 73	3eqtr3d 2841	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)))
75		simplrr 797	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝑠 = 0 )
76		dihjatcc.d	. . . . . . . . . . . 12 ⊢ 𝐽 = (𝑎 ∈ 𝐸, 𝑏 ∈ 𝐸 ↦ (𝑑 ∈ 𝑇 ↦ ((𝑎‘𝑑) ∘ (𝑏‘𝑑))))
77		dihjatcc.o	. . . . . . . . . . . 12 ⊢ 0 = (𝑑 ∈ 𝑇 ↦ ( I ↾ 𝐵))
78	2, 13, 35, 53, 28, 76, 77	tendoipl2 36819	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑡 ∈ 𝐸) → (𝑡𝐽(𝑁‘𝑡)) = 0 )
79	45, 44, 78	syl2anc 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → (𝑡𝐽(𝑁‘𝑡)) = 0 )
80	75, 79	eqtr4d 2836	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → 𝑠 = (𝑡𝐽(𝑁‘𝑡)))
81		opeq1 4593	. . . . . . . . . . . . . . 15 ⊢ (𝑔 = (𝑡‘𝐺) → ⟨𝑔, 𝑡⟩ = ⟨(𝑡‘𝐺), 𝑡⟩)
82	81	eleq1d 2863	. . . . . . . . . . . . . 14 ⊢ (𝑔 = (𝑡‘𝐺) → (⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ↔ ⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃)))
83	82	anbi1d 624	. . . . . . . . . . . . 13 ⊢ (𝑔 = (𝑡‘𝐺) → ((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ↔ (⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄))))
84		coeq1 5483	. . . . . . . . . . . . . . 15 ⊢ (𝑔 = (𝑡‘𝐺) → (𝑔 ∘ ℎ) = ((𝑡‘𝐺) ∘ ℎ))
85	84	eqeq2d 2809	. . . . . . . . . . . . . 14 ⊢ (𝑔 = (𝑡‘𝐺) → (𝑓 = (𝑔 ∘ ℎ) ↔ 𝑓 = ((𝑡‘𝐺) ∘ ℎ)))
86	85	anbi1d 624	. . . . . . . . . . . . 13 ⊢ (𝑔 = (𝑡‘𝐺) → ((𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)) ↔ (𝑓 = ((𝑡‘𝐺) ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))))
87	83, 86	anbi12d 625	. . . . . . . . . . . 12 ⊢ (𝑔 = (𝑡‘𝐺) → (((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))) ↔ ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
88		opeq1 4593	. . . . . . . . . . . . . . 15 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → ⟨ℎ, 𝑢⟩ = ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩)
89	88	eleq1d 2863	. . . . . . . . . . . . . 14 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → (⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄) ↔ ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄)))
90	89	anbi2d 623	. . . . . . . . . . . . 13 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ↔ (⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄))))
91		coeq2 5484	. . . . . . . . . . . . . . 15 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → ((𝑡‘𝐺) ∘ ℎ) = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)))
92	91	eqeq2d 2809	. . . . . . . . . . . . . 14 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → (𝑓 = ((𝑡‘𝐺) ∘ ℎ) ↔ 𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷))))
93	92	anbi1d 624	. . . . . . . . . . . . 13 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → ((𝑓 = ((𝑡‘𝐺) ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)) ↔ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽𝑢))))
94	90, 93	anbi12d 625	. . . . . . . . . . . 12 ⊢ (ℎ = ((𝑁‘𝑡)‘𝐷) → (((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))) ↔ ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽𝑢)))))
95		opeq2 4594	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = (𝑁‘𝑡) → ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ = ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩)
96	95	eleq1d 2863	. . . . . . . . . . . . . 14 ⊢ (𝑢 = (𝑁‘𝑡) → (⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄) ↔ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄)))
97	96	anbi2d 623	. . . . . . . . . . . . 13 ⊢ (𝑢 = (𝑁‘𝑡) → ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄)) ↔ (⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄))))
98		oveq2 6886	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = (𝑁‘𝑡) → (𝑡𝐽𝑢) = (𝑡𝐽(𝑁‘𝑡)))
99	98	eqeq2d 2809	. . . . . . . . . . . . . 14 ⊢ (𝑢 = (𝑁‘𝑡) → (𝑠 = (𝑡𝐽𝑢) ↔ 𝑠 = (𝑡𝐽(𝑁‘𝑡))))
100	99	anbi2d 623	. . . . . . . . . . . . 13 ⊢ (𝑢 = (𝑁‘𝑡) → ((𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽𝑢)) ↔ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽(𝑁‘𝑡)))))
101	97, 100	anbi12d 625	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑁‘𝑡) → (((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽𝑢))) ↔ ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽(𝑁‘𝑡))))))
102	87, 94, 101	syl3an9b 1559	. . . . . . . . . . 11 ⊢ ((𝑔 = (𝑡‘𝐺) ∧ ℎ = ((𝑁‘𝑡)‘𝐷) ∧ 𝑢 = (𝑁‘𝑡)) → (((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))) ↔ ((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽(𝑁‘𝑡))))))
103	102	spc3egv 3485	. . . . . . . . . 10 ⊢ (((𝑡‘𝐺) ∈ V ∧ ((𝑁‘𝑡)‘𝐷) ∈ V ∧ (𝑁‘𝑡) ∈ V) → (((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽(𝑁‘𝑡)))) → ∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
104	47, 57, 58, 103	mp3an 1586	. . . . . . . . 9 ⊢ (((⟨(𝑡‘𝐺), 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨((𝑁‘𝑡)‘𝐷), (𝑁‘𝑡)⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = ((𝑡‘𝐺) ∘ ((𝑁‘𝑡)‘𝐷)) ∧ 𝑠 = (𝑡𝐽(𝑁‘𝑡)))) → ∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))))
105	51, 61, 74, 80, 104	syl22anc 868	. . . . . . . 8 ⊢ (((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) ∧ (𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓)) → ∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))))
106	105	ex 402	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → ((𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓) → ∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
107	106	eximdv 2013	. . . . . 6 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (∃𝑡(𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓) → ∃𝑡∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
108		excom 2205	. . . . . 6 ⊢ (∃𝑡∃𝑔∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))) ↔ ∃𝑔∃𝑡∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))))
109	107, 108	syl6ib 243	. . . . 5 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → (∃𝑡(𝑡 ∈ 𝐸 ∧ (𝑡‘(𝐺 ∘ ◡𝐷)) = 𝑓) → ∃𝑔∃𝑡∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
110	42, 109	mpd 15	. . . 4 ⊢ ((𝜑 ∧ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )) → ∃𝑔∃𝑡∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢))))
111	110	ex 402	. . 3 ⊢ (𝜑 → (((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 ) → ∃𝑔∃𝑡∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
112	1	simpld 489	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ HL)
113	112	hllatd 35385	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ Lat)
114	12	simpld 489	. . . . . . . . 9 ⊢ (𝜑 → 𝑃 ∈ 𝐴)
115	17	simpld 489	. . . . . . . . 9 ⊢ (𝜑 → 𝑄 ∈ 𝐴)
116	28, 29, 8	hlatjcl 35388	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑃 ∨ 𝑄) ∈ 𝐵)
117	112, 114, 115, 116	syl3anc 1491	. . . . . . . 8 ⊢ (𝜑 → (𝑃 ∨ 𝑄) ∈ 𝐵)
118	1	simprd 490	. . . . . . . . 9 ⊢ (𝜑 → 𝑊 ∈ 𝐻)
119	28, 2	lhpbase 36019	. . . . . . . . 9 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ 𝐵)
120	118, 119	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑊 ∈ 𝐵)
121	28, 30	latmcl 17367	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → ((𝑃 ∨ 𝑄) ∧ 𝑊) ∈ 𝐵)
122	113, 117, 120, 121	syl3anc 1491	. . . . . . 7 ⊢ (𝜑 → ((𝑃 ∨ 𝑄) ∧ 𝑊) ∈ 𝐵)
123	33, 122	syl5eqel 2882	. . . . . 6 ⊢ (𝜑 → 𝑉 ∈ 𝐵)
124	28, 7, 30	latmle2 17392	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → ((𝑃 ∨ 𝑄) ∧ 𝑊) ≤ 𝑊)
125	113, 117, 120, 124	syl3anc 1491	. . . . . . 7 ⊢ (𝜑 → ((𝑃 ∨ 𝑄) ∧ 𝑊) ≤ 𝑊)
126	33, 125	syl5eqbr 4878	. . . . . 6 ⊢ (𝜑 → 𝑉 ≤ 𝑊)
127		eqid 2799	. . . . . . 7 ⊢ ((DIsoB‘𝐾)‘𝑊) = ((DIsoB‘𝐾)‘𝑊)
128	28, 7, 2, 3, 127	dihvalb 37258	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑉 ∈ 𝐵 ∧ 𝑉 ≤ 𝑊)) → (𝐼‘𝑉) = (((DIsoB‘𝐾)‘𝑊)‘𝑉))
129	1, 123, 126, 128	syl12anc 866	. . . . 5 ⊢ (𝜑 → (𝐼‘𝑉) = (((DIsoB‘𝐾)‘𝑊)‘𝑉))
130	129	eleq2d 2864	. . . 4 ⊢ (𝜑 → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑉) ↔ ⟨𝑓, 𝑠⟩ ∈ (((DIsoB‘𝐾)‘𝑊)‘𝑉)))
131	28, 7, 2, 13, 34, 77, 127	dibopelval3 37169	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑉 ∈ 𝐵 ∧ 𝑉 ≤ 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (((DIsoB‘𝐾)‘𝑊)‘𝑉) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )))
132	1, 123, 126, 131	syl12anc 866	. . . 4 ⊢ (𝜑 → (⟨𝑓, 𝑠⟩ ∈ (((DIsoB‘𝐾)‘𝑊)‘𝑉) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )))
133	130, 132	bitrd 271	. . 3 ⊢ (𝜑 → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑉) ↔ ((𝑓 ∈ 𝑇 ∧ (𝑅‘𝑓) ≤ 𝑉) ∧ 𝑠 = 0 )))
134		eqid 2799	. . . 4 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
135	28, 8	atbase 35310	. . . . 5 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ 𝐵)
136	114, 135	syl 17	. . . 4 ⊢ (𝜑 → 𝑃 ∈ 𝐵)
137	28, 8	atbase 35310	. . . . 5 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ 𝐵)
138	115, 137	syl 17	. . . 4 ⊢ (𝜑 → 𝑄 ∈ 𝐵)
139	28, 2, 13, 35, 76, 31, 134, 32, 3, 1, 136, 138	dihopellsm 37276	. . 3 ⊢ (𝜑 → (⟨𝑓, 𝑠⟩ ∈ ((𝐼‘𝑃) ⊕ (𝐼‘𝑄)) ↔ ∃𝑔∃𝑡∃ℎ∃𝑢((⟨𝑔, 𝑡⟩ ∈ (𝐼‘𝑃) ∧ ⟨ℎ, 𝑢⟩ ∈ (𝐼‘𝑄)) ∧ (𝑓 = (𝑔 ∘ ℎ) ∧ 𝑠 = (𝑡𝐽𝑢)))))
140	111, 133, 139	3imtr4d 286	. 2 ⊢ (𝜑 → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘𝑉) → ⟨𝑓, 𝑠⟩ ∈ ((𝐼‘𝑃) ⊕ (𝐼‘𝑄))))
141	5, 140	relssdv 5416	1 ⊢ (𝜑 → (𝐼‘𝑉) ⊆ ((𝐼‘𝑃) ⊕ (𝐼‘𝑄)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 198   ∧ wa 385   = wceq 1653  ∃wex 1875   ∈ wcel 2157  ∃wrex 3090  Vcvv 3385   ⊆ wss 3769  ⟨cop 4374   class class class wbr 4843   ↦ cmpt 4922   I cid 5219  ^◡ccnv 5311   ↾ cres 5314   ∘ ccom 5316  Rel wrel 5317  ‘cfv 6101  ℩crio 6838  (class class class)co 6878   ↦ cmpt2 6880  Basecbs 16184  lecple 16274  occoc 16275  joincjn 17259  meetcmee 17260  Latclat 17360  LSSumclsm 18362  LSubSpclss 19250  Atomscatm 35284  HLchlt 35371  LHypclh 36005  LTrncltrn 36122  trLctrl 36179  TEndoctendo 36773  DVecHcdvh 37099  DIsoBcdib 37159  DIsoHcdih 37249

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-8 2159  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2377  ax-ext 2777  ax-rep 4964  ax-sep 4975  ax-nul 4983  ax-pow 5035  ax-pr 5097  ax-un 7183  ax-cnex 10280  ax-resscn 10281  ax-1cn 10282  ax-icn 10283  ax-addcl 10284  ax-addrcl 10285  ax-mulcl 10286  ax-mulrcl 10287  ax-mulcom 10288  ax-addass 10289  ax-mulass 10290  ax-distr 10291  ax-i2m1 10292  ax-1ne0 10293  ax-1rid 10294  ax-rnegex 10295  ax-rrecex 10296  ax-cnre 10297  ax-pre-lttri 10298  ax-pre-lttrn 10299  ax-pre-ltadd 10300  ax-pre-mulgt0 10301  ax-riotaBAD 34974

This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3or 1109  df-3an 1110  df-tru 1657  df-fal 1667  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2591  df-eu 2609  df-clab 2786  df-cleq 2792  df-clel 2795  df-nfc 2930  df-ne 2972  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3387  df-sbc 3634  df-csb 3729  df-dif 3772  df-un 3774  df-in 3776  df-ss 3783  df-pss 3785  df-nul 4116  df-if 4278  df-pw 4351  df-sn 4369  df-pr 4371  df-tp 4373  df-op 4375  df-uni 4629  df-int 4668  df-iun 4712  df-iin 4713  df-br 4844  df-opab 4906  df-mpt 4923  df-tr 4946  df-id 5220  df-eprel 5225  df-po 5233  df-so 5234  df-fr 5271  df-we 5273  df-xp 5318  df-rel 5319  df-cnv 5320  df-co 5321  df-dm 5322  df-rn 5323  df-res 5324  df-ima 5325  df-pred 5898  df-ord 5944  df-on 5945  df-lim 5946  df-suc 5947  df-iota 6064  df-fun 6103  df-fn 6104  df-f 6105  df-f1 6106  df-fo 6107  df-f1o 6108  df-fv 6109  df-riota 6839  df-ov 6881  df-oprab 6882  df-mpt2 6883  df-om 7300  df-1st 7401  df-2nd 7402  df-tpos 7590  df-undef 7637  df-wrecs 7645  df-recs 7707  df-rdg 7745  df-1o 7799  df-oadd 7803  df-er 7982  df-map 8097  df-en 8196  df-dom 8197  df-sdom 8198  df-fin 8199  df-pnf 10365  df-mnf 10366  df-xr 10367  df-ltxr 10368  df-le 10369  df-sub 10558  df-neg 10559  df-nn 11313  df-2 11376  df-3 11377  df-4 11378  df-5 11379  df-6 11380  df-n0 11581  df-z 11667  df-uz 11931  df-fz 12581  df-struct 16186  df-ndx 16187  df-slot 16188  df-base 16190  df-sets 16191  df-ress 16192  df-plusg 16280  df-mulr 16281  df-sca 16283  df-vsca 16284  df-0g 16417  df-proset 17243  df-poset 17261  df-plt 17273  df-lub 17289  df-glb 17290  df-join 17291  df-meet 17292  df-p0 17354  df-p1 17355  df-lat 17361  df-clat 17423  df-mgm 17557  df-sgrp 17599  df-mnd 17610  df-submnd 17651  df-grp 17741  df-minusg 17742  df-sbg 17743  df-subg 17904  df-cntz 18062  df-lsm 18364  df-cmn 18510  df-abl 18511  df-mgp 18806  df-ur 18818  df-ring 18865  df-oppr 18939  df-dvdsr 18957  df-unit 18958  df-invr 18988  df-dvr 18999  df-drng 19067  df-lmod 19183  df-lss 19251  df-lsp 19293  df-lvec 19424  df-oposet 35197  df-ol 35199  df-oml 35200  df-covers 35287  df-ats 35288  df-atl 35319  df-cvlat 35343  df-hlat 35372  df-llines 35519  df-lplanes 35520  df-lvols 35521  df-lines 35522  df-psubsp 35524  df-pmap 35525  df-padd 35817  df-lhyp 36009  df-laut 36010  df-ldil 36125  df-ltrn 36126  df-trl 36180  df-tendo 36776  df-edring 36778  df-disoa 37050  df-dvech 37100  df-dib 37160  df-dic 37194  df-dih 37250

This theorem is referenced by:  dihjatcc  37443