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

Theorem dihmeetlem4preN 37973
Description: Lemma for isomorphism H of a lattice meet. (Contributed by NM, 30-Mar-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
dihmeetlem4.b 𝐵 = (Base‘𝐾)
dihmeetlem4.l = (le‘𝐾)
dihmeetlem4.m = (meet‘𝐾)
dihmeetlem4.a 𝐴 = (Atoms‘𝐾)
dihmeetlem4.h 𝐻 = (LHyp‘𝐾)
dihmeetlem4.i 𝐼 = ((DIsoH‘𝐾)‘𝑊)
dihmeetlem4.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
dihmeetlem4.z 0 = (0g𝑈)
dihmeetlem4.g 𝐺 = (𝑔𝑇 (𝑔𝑃) = 𝑄)
dihmeetlem4.p 𝑃 = ((oc‘𝐾)‘𝑊)
dihmeetlem4.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
dihmeetlem4.r 𝑅 = ((trL‘𝐾)‘𝑊)
dihmeetlem4.e 𝐸 = ((TEndo‘𝐾)‘𝑊)
dihmeetlem4.o 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
Assertion
Ref Expression
dihmeetlem4preN (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) = { 0 })
Distinct variable groups:   ,𝑔   𝐴,𝑔   𝑔,,𝐻   𝐵,   𝑔,𝐾,   𝑄,𝑔   𝑇,𝑔,   𝑔,𝑊,   𝑃,𝑔
Allowed substitution hints:   𝐴()   𝐵(𝑔)   𝑃()   𝑄()   𝑅(𝑔,)   𝑈(𝑔,)   𝐸(𝑔,)   𝐺(𝑔,)   𝐼(𝑔,)   ()   (𝑔,)   𝑂(𝑔,)   𝑋(𝑔,)   0 (𝑔,)

Proof of Theorem dihmeetlem4preN
Dummy variables 𝑓 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dihmeetlem4.h . . . . 5 𝐻 = (LHyp‘𝐾)
2 dihmeetlem4.i . . . . 5 𝐼 = ((DIsoH‘𝐾)‘𝑊)
31, 2dihvalrel 37946 . . . 4 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel (𝐼𝑄))
4 relin1 5571 . . . 4 (Rel (𝐼𝑄) → Rel ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))))
53, 4syl 17 . . 3 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))))
653ad2ant1 1126 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → Rel ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))))
71, 2dihvalrel 37946 . . . 4 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel (𝐼‘(0.‘𝐾)))
8 eqid 2795 . . . . . 6 (0.‘𝐾) = (0.‘𝐾)
9 dihmeetlem4.u . . . . . 6 𝑈 = ((DVecH‘𝐾)‘𝑊)
10 dihmeetlem4.z . . . . . 6 0 = (0g𝑈)
118, 1, 2, 9, 10dih0 37947 . . . . 5 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝐼‘(0.‘𝐾)) = { 0 })
1211releqd 5539 . . . 4 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (Rel (𝐼‘(0.‘𝐾)) ↔ Rel { 0 }))
137, 12mpbid 233 . . 3 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel { 0 })
14133ad2ant1 1126 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → Rel { 0 })
15 id 22 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)))
16 elin 4090 . . . 4 (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) ↔ (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊))))
17 dihmeetlem4.l . . . . . . . . . 10 = (le‘𝐾)
18 dihmeetlem4.a . . . . . . . . . 10 𝐴 = (Atoms‘𝐾)
19 dihmeetlem4.p . . . . . . . . . 10 𝑃 = ((oc‘𝐾)‘𝑊)
20 dihmeetlem4.t . . . . . . . . . 10 𝑇 = ((LTrn‘𝐾)‘𝑊)
21 dihmeetlem4.e . . . . . . . . . 10 𝐸 = ((TEndo‘𝐾)‘𝑊)
22 dihmeetlem4.g . . . . . . . . . 10 𝐺 = (𝑔𝑇 (𝑔𝑃) = 𝑄)
23 vex 3440 . . . . . . . . . 10 𝑓 ∈ V
24 vex 3440 . . . . . . . . . 10 𝑠 ∈ V
2517, 18, 1, 19, 20, 21, 2, 22, 23, 24dihopelvalcqat 37913 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ↔ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)))
26253adant2 1124 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ↔ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)))
27 simp1 1129 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
28 simp1l 1190 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝐾 ∈ HL)
2928hllatd 36031 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝐾 ∈ Lat)
30 simp2l 1192 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝑋𝐵)
31 simp1r 1191 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝑊𝐻)
32 dihmeetlem4.b . . . . . . . . . . . 12 𝐵 = (Base‘𝐾)
3332, 1lhpbase 36665 . . . . . . . . . . 11 (𝑊𝐻𝑊𝐵)
3431, 33syl 17 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝑊𝐵)
35 dihmeetlem4.m . . . . . . . . . . 11 = (meet‘𝐾)
3632, 35latmcl 17491 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑊𝐵) → (𝑋 𝑊) ∈ 𝐵)
3729, 30, 34, 36syl3anc 1364 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (𝑋 𝑊) ∈ 𝐵)
3832, 17, 35latmle2 17516 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑊𝐵) → (𝑋 𝑊) 𝑊)
3929, 30, 34, 38syl3anc 1364 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (𝑋 𝑊) 𝑊)
40 dihmeetlem4.r . . . . . . . . . 10 𝑅 = ((trL‘𝐾)‘𝑊)
41 dihmeetlem4.o . . . . . . . . . 10 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
4232, 17, 1, 20, 40, 41, 2dihopelvalbN 37905 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑋 𝑊) ∈ 𝐵 ∧ (𝑋 𝑊) 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊)) ↔ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂)))
4327, 37, 39, 42syl12anc 833 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊)) ↔ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂)))
4426, 43anbi12d 630 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊))) ↔ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))))
45 simprll 775 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → 𝑓 = (𝑠𝐺))
46 simprrr 778 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → 𝑠 = 𝑂)
4746fveq1d 6540 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝑠𝐺) = (𝑂𝐺))
48 simpl1 1184 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
4917, 18, 1, 19lhpocnel2 36686 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
5048, 49syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
51 simpl3 1186 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
5217, 18, 1, 20, 22ltrniotacl 37246 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝐺𝑇)
5348, 50, 51, 52syl3anc 1364 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → 𝐺𝑇)
5441, 32tendo02 37454 . . . . . . . . . . 11 (𝐺𝑇 → (𝑂𝐺) = ( I ↾ 𝐵))
5553, 54syl 17 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝑂𝐺) = ( I ↾ 𝐵))
5645, 47, 553eqtrd 2835 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → 𝑓 = ( I ↾ 𝐵))
5756, 46jca 512 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))) → (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂))
58 simpl1 1184 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5958, 49syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
60 simpl3 1186 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
6158, 59, 60, 52syl3anc 1364 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝐺𝑇)
6261, 54syl 17 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑂𝐺) = ( I ↾ 𝐵))
63 simprr 769 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑠 = 𝑂)
6463fveq1d 6540 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑠𝐺) = (𝑂𝐺))
65 simprl 767 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑓 = ( I ↾ 𝐵))
6662, 64, 653eqtr4rd 2842 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑓 = (𝑠𝐺))
6732, 1, 20, 21, 41tendo0cl 37457 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 𝑂𝐸)
6858, 67syl 17 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑂𝐸)
6963, 68eqeltrd 2883 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑠𝐸)
7032, 1, 20idltrn 36817 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑊𝐻) → ( I ↾ 𝐵) ∈ 𝑇)
7158, 70syl 17 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → ( I ↾ 𝐵) ∈ 𝑇)
7265, 71eqeltrd 2883 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝑓𝑇)
7365fveq2d 6542 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑅𝑓) = (𝑅‘( I ↾ 𝐵)))
7432, 8, 1, 40trlid0 36843 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑅‘( I ↾ 𝐵)) = (0.‘𝐾))
7558, 74syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑅‘( I ↾ 𝐵)) = (0.‘𝐾))
7673, 75eqtrd 2831 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑅𝑓) = (0.‘𝐾))
77 simpl1l 1217 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝐾 ∈ HL)
78 hlatl 36027 . . . . . . . . . . . . 13 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
7977, 78syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → 𝐾 ∈ AtLat)
8037adantr 481 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑋 𝑊) ∈ 𝐵)
8132, 17, 8atl0le 35971 . . . . . . . . . . . 12 ((𝐾 ∈ AtLat ∧ (𝑋 𝑊) ∈ 𝐵) → (0.‘𝐾) (𝑋 𝑊))
8279, 80, 81syl2anc 584 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (0.‘𝐾) (𝑋 𝑊))
8376, 82eqbrtrd 4984 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → (𝑅𝑓) (𝑋 𝑊))
8472, 83, 63jca31 515 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂))
8566, 69, 84jca31 515 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)) → ((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂)))
8657, 85impbida 797 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (((𝑓 = (𝑠𝐺) ∧ 𝑠𝐸) ∧ ((𝑓𝑇 ∧ (𝑅𝑓) (𝑋 𝑊)) ∧ 𝑠 = 𝑂)) ↔ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)))
8744, 86bitrd 280 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊))) ↔ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)))
88 opex 5248 . . . . . . . 8 𝑓, 𝑠⟩ ∈ V
8988elsn 4487 . . . . . . 7 (⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩} ↔ ⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩)
9023, 24opth 5260 . . . . . . 7 (⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩ ↔ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂))
9189, 90bitr2i 277 . . . . . 6 ((𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂) ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩})
9287, 91syl6bb 288 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊))) ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩}))
9332, 1, 20, 9, 10, 41dvh0g 37778 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
94933ad2ant1 1126 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
9594sneqd 4484 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → { 0 } = {⟨( I ↾ 𝐵), 𝑂⟩})
9695eleq2d 2868 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ { 0 } ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩}))
9792, 96bitr4d 283 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼‘(𝑋 𝑊))) ↔ ⟨𝑓, 𝑠⟩ ∈ { 0 }))
9816, 97syl5bb 284 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) ↔ ⟨𝑓, 𝑠⟩ ∈ { 0 }))
9998eqrelrdv2 5554 . 2 (((Rel ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) ∧ Rel { 0 }) ∧ ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊))) → ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) = { 0 })
1006, 14, 15, 99syl21anc 834 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ((𝐼𝑄) ∩ (𝐼‘(𝑋 𝑊))) = { 0 })
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2081  cin 3858  {csn 4472  cop 4478   class class class wbr 4962  cmpt 5041   I cid 5347  cres 5445  Rel wrel 5448  cfv 6225  crio 6976  (class class class)co 7016  Basecbs 16312  lecple 16401  occoc 16402  0gc0g 16542  meetcmee 17384  0.cp0 17476  Latclat 17484  Atomscatm 35930  AtLatcal 35931  HLchlt 36017  LHypclh 36651  LTrncltrn 36768  trLctrl 36825  TEndoctendo 37419  DVecHcdvh 37745  DIsoHcdih 37895
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460  ax-riotaBAD 35620
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-fal 1535  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-int 4783  df-iun 4827  df-iin 4828  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-om 7437  df-1st 7545  df-2nd 7546  df-tpos 7743  df-undef 7790  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-1o 7953  df-oadd 7957  df-er 8139  df-map 8258  df-en 8358  df-dom 8359  df-sdom 8360  df-fin 8361  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-nn 11487  df-2 11548  df-3 11549  df-4 11550  df-5 11551  df-6 11552  df-n0 11746  df-z 11830  df-uz 12094  df-fz 12743  df-struct 16314  df-ndx 16315  df-slot 16316  df-base 16318  df-sets 16319  df-ress 16320  df-plusg 16407  df-mulr 16408  df-sca 16410  df-vsca 16411  df-0g 16544  df-proset 17367  df-poset 17385  df-plt 17397  df-lub 17413  df-glb 17414  df-join 17415  df-meet 17416  df-p0 17478  df-p1 17479  df-lat 17485  df-clat 17547  df-mgm 17681  df-sgrp 17723  df-mnd 17734  df-submnd 17775  df-grp 17864  df-minusg 17865  df-sbg 17866  df-subg 18030  df-cntz 18188  df-lsm 18491  df-cmn 18635  df-abl 18636  df-mgp 18930  df-ur 18942  df-ring 18989  df-oppr 19063  df-dvdsr 19081  df-unit 19082  df-invr 19112  df-dvr 19123  df-drng 19194  df-lmod 19326  df-lss 19394  df-lsp 19434  df-lvec 19565  df-oposet 35843  df-ol 35845  df-oml 35846  df-covers 35933  df-ats 35934  df-atl 35965  df-cvlat 35989  df-hlat 36018  df-llines 36165  df-lplanes 36166  df-lvols 36167  df-lines 36168  df-psubsp 36170  df-pmap 36171  df-padd 36463  df-lhyp 36655  df-laut 36656  df-ldil 36771  df-ltrn 36772  df-trl 36826  df-tendo 37422  df-edring 37424  df-disoa 37696  df-dvech 37746  df-dib 37806  df-dic 37840  df-dih 37896
This theorem is referenced by:  dihmeetlem4N  37974
  Copyright terms: Public domain W3C validator