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

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

Proof of Theorem dihmeetlem13N
Dummy variables 𝑓 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dihmeetlem13.h . . . . . 6 𝐻 = (LHyp‘𝐾)
2 dihmeetlem13.i . . . . . 6 𝐼 = ((DIsoH‘𝐾)‘𝑊)
31, 2dihvalrel 38419 . . . . 5 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel (𝐼𝑄))
433ad2ant1 1129 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → Rel (𝐼𝑄))
5 relin1 5688 . . . 4 (Rel (𝐼𝑄) → Rel ((𝐼𝑄) ∩ (𝐼𝑅)))
64, 5syl 17 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → Rel ((𝐼𝑄) ∩ (𝐼𝑅)))
7 elin 4172 . . . . . 6 (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼𝑅)) ↔ (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼𝑅)))
8 simp1 1132 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝐾 ∈ HL ∧ 𝑊𝐻))
9 simp2l 1195 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
10 dihmeetlem13.l . . . . . . . . 9 = (le‘𝐾)
11 dihmeetlem13.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
12 dihmeetlem13.p . . . . . . . . 9 𝑃 = ((oc‘𝐾)‘𝑊)
13 dihmeetlem13.t . . . . . . . . 9 𝑇 = ((LTrn‘𝐾)‘𝑊)
14 dihmeetlem13.e . . . . . . . . 9 𝐸 = ((TEndo‘𝐾)‘𝑊)
15 dihmeetlem13.f . . . . . . . . 9 𝐹 = (𝑇 (𝑃) = 𝑄)
16 vex 3500 . . . . . . . . 9 𝑓 ∈ V
17 vex 3500 . . . . . . . . 9 𝑠 ∈ V
1810, 11, 1, 12, 13, 14, 2, 15, 16, 17dihopelvalcqat 38386 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ↔ (𝑓 = (𝑠𝐹) ∧ 𝑠𝐸)))
198, 9, 18syl2anc 586 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ↔ (𝑓 = (𝑠𝐹) ∧ 𝑠𝐸)))
20 simp2r 1196 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
21 dihmeetlem13.g . . . . . . . . 9 𝐺 = (𝑇 (𝑃) = 𝑅)
2210, 11, 1, 12, 13, 14, 2, 21, 16, 17dihopelvalcqat 38386 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑅) ↔ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)))
238, 20, 22syl2anc 586 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ (𝐼𝑅) ↔ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)))
2419, 23anbi12d 632 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((⟨𝑓, 𝑠⟩ ∈ (𝐼𝑄) ∧ ⟨𝑓, 𝑠⟩ ∈ (𝐼𝑅)) ↔ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))))
257, 24syl5bb 285 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼𝑅)) ↔ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))))
26 simprll 777 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝑓 = (𝑠𝐹))
27 simpl3 1189 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝑄𝑅)
28 fveq1 6672 . . . . . . . . . . . . 13 (𝐹 = 𝐺 → (𝐹𝑃) = (𝐺𝑃))
29 simpl1 1187 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
3010, 11, 1, 12lhpocnel2 37159 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3129, 30syl 17 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
32 simpl2l 1222 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
3310, 11, 1, 13, 15ltrniotaval 37721 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (𝐹𝑃) = 𝑄)
3429, 31, 32, 33syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹𝑃) = 𝑄)
35 simpl2r 1223 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
3610, 11, 1, 13, 21ltrniotaval 37721 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → (𝐺𝑃) = 𝑅)
3729, 31, 35, 36syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐺𝑃) = 𝑅)
3834, 37eqeq12d 2840 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → ((𝐹𝑃) = (𝐺𝑃) ↔ 𝑄 = 𝑅))
3928, 38syl5ib 246 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹 = 𝐺𝑄 = 𝑅))
4039necon3d 3040 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑄𝑅𝐹𝐺))
4127, 40mpd 15 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝐹𝐺)
42 simp2ll 1236 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑓 = (𝑠𝐹))
43 simp2rl 1238 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑓 = (𝑠𝐺))
4442, 43eqtr3d 2861 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝑠𝐹) = (𝑠𝐺))
45 simp11 1199 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝐾 ∈ HL ∧ 𝑊𝐻))
46 simp2rr 1239 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑠𝐸)
47 simp3 1134 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑠𝑂)
4845, 30syl 17 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
49 simp12l 1282 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
5010, 11, 1, 13, 15ltrniotacl 37719 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝐹𝑇)
5145, 48, 49, 50syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐹𝑇)
52 simp12r 1283 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
5310, 11, 1, 13, 21ltrniotacl 37719 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → 𝐺𝑇)
5445, 48, 52, 53syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐺𝑇)
55 dihmeetlem13.b . . . . . . . . . . . . . . 15 𝐵 = (Base‘𝐾)
56 dihmeetlem13.o . . . . . . . . . . . . . . 15 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
5755, 1, 13, 14, 56tendospcanN 38163 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑠𝐸𝑠𝑂) ∧ (𝐹𝑇𝐺𝑇)) → ((𝑠𝐹) = (𝑠𝐺) ↔ 𝐹 = 𝐺))
5845, 46, 47, 51, 54, 57syl122anc 1375 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → ((𝑠𝐹) = (𝑠𝐺) ↔ 𝐹 = 𝐺))
5944, 58mpbid 234 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐹 = 𝐺)
60593expia 1117 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑠𝑂𝐹 = 𝐺))
6160necon1d 3041 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹𝐺𝑠 = 𝑂))
6241, 61mpd 15 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝑠 = 𝑂)
6362fveq1d 6675 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑠𝐹) = (𝑂𝐹))
6429, 31, 32, 50syl3anc 1367 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝐹𝑇)
6556, 55tendo02 37927 . . . . . . . . 9 (𝐹𝑇 → (𝑂𝐹) = ( I ↾ 𝐵))
6664, 65syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑂𝐹) = ( I ↾ 𝐵))
6726, 63, 663eqtrd 2863 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝑓 = ( I ↾ 𝐵))
6867, 62jca 514 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂))
6968ex 415 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) → (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)))
7025, 69sylbid 242 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼𝑅)) → (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂)))
71 dihmeetlem13.u . . . . . . . . 9 𝑈 = ((DVecH‘𝐾)‘𝑊)
72 dihmeetlem13.z . . . . . . . . 9 0 = (0g𝑈)
7355, 1, 13, 71, 72, 56dvh0g 38251 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
74733ad2ant1 1129 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
7574sneqd 4582 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → { 0 } = {⟨( I ↾ 𝐵), 𝑂⟩})
7675eleq2d 2901 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ { 0 } ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩}))
77 opex 5359 . . . . . . 7 𝑓, 𝑠⟩ ∈ V
7877elsn 4585 . . . . . 6 (⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩} ↔ ⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩)
7916, 17opth 5371 . . . . . 6 (⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩ ↔ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂))
8078, 79bitr2i 278 . . . . 5 ((𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂) ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩})
8176, 80syl6rbbr 292 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂) ↔ ⟨𝑓, 𝑠⟩ ∈ { 0 }))
8270, 81sylibd 241 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼𝑅)) → ⟨𝑓, 𝑠⟩ ∈ { 0 }))
836, 82relssdv 5664 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) ⊆ { 0 })
841, 71, 8dvhlmod 38250 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑈 ∈ LMod)
85 simp2ll 1236 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑄𝐴)
8655, 11atbase 36429 . . . . . 6 (𝑄𝐴𝑄𝐵)
8785, 86syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑄𝐵)
88 eqid 2824 . . . . . 6 (LSubSp‘𝑈) = (LSubSp‘𝑈)
8955, 1, 2, 71, 88dihlss 38390 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑄𝐵) → (𝐼𝑄) ∈ (LSubSp‘𝑈))
908, 87, 89syl2anc 586 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝐼𝑄) ∈ (LSubSp‘𝑈))
91 simp2rl 1238 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑅𝐴)
9255, 11atbase 36429 . . . . . 6 (𝑅𝐴𝑅𝐵)
9391, 92syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑅𝐵)
9455, 1, 2, 71, 88dihlss 38390 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑅𝐵) → (𝐼𝑅) ∈ (LSubSp‘𝑈))
958, 93, 94syl2anc 586 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝐼𝑅) ∈ (LSubSp‘𝑈))
9688lssincl 19740 . . . 4 ((𝑈 ∈ LMod ∧ (𝐼𝑄) ∈ (LSubSp‘𝑈) ∧ (𝐼𝑅) ∈ (LSubSp‘𝑈)) → ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈))
9784, 90, 95, 96syl3anc 1367 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈))
9872, 88lss0ss 19723 . . 3 ((𝑈 ∈ LMod ∧ ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈)) → { 0 } ⊆ ((𝐼𝑄) ∩ (𝐼𝑅)))
9984, 97, 98syl2anc 586 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → { 0 } ⊆ ((𝐼𝑄) ∩ (𝐼𝑅)))
10083, 99eqssd 3987 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) = { 0 })
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083   = wceq 1536  wcel 2113  wne 3019  cin 3938  wss 3939  {csn 4570  cop 4576   class class class wbr 5069  cmpt 5149   I cid 5462  cres 5560  Rel wrel 5563  cfv 6358  crio 7116  Basecbs 16486  lecple 16575  occoc 16576  0gc0g 16716  joincjn 17557  LModclmod 19637  LSubSpclss 19706  Atomscatm 36403  HLchlt 36490  LHypclh 37124  LTrncltrn 37241  TEndoctendo 37892  DVecHcdvh 38218  DIsoHcdih 38368
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464  ax-cnex 10596  ax-resscn 10597  ax-1cn 10598  ax-icn 10599  ax-addcl 10600  ax-addrcl 10601  ax-mulcl 10602  ax-mulrcl 10603  ax-mulcom 10604  ax-addass 10605  ax-mulass 10606  ax-distr 10607  ax-i2m1 10608  ax-1ne0 10609  ax-1rid 10610  ax-rnegex 10611  ax-rrecex 10612  ax-cnre 10613  ax-pre-lttri 10614  ax-pre-lttrn 10615  ax-pre-ltadd 10616  ax-pre-mulgt0 10617  ax-riotaBAD 36093
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-fal 1549  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-nel 3127  df-ral 3146  df-rex 3147  df-reu 3148  df-rmo 3149  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-tp 4575  df-op 4577  df-uni 4842  df-int 4880  df-iun 4924  df-iin 4925  df-br 5070  df-opab 5132  df-mpt 5150  df-tr 5176  df-id 5463  df-eprel 5468  df-po 5477  df-so 5478  df-fr 5517  df-we 5519  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-pred 6151  df-ord 6197  df-on 6198  df-lim 6199  df-suc 6200  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7117  df-ov 7162  df-oprab 7163  df-mpo 7164  df-om 7584  df-1st 7692  df-2nd 7693  df-tpos 7895  df-undef 7942  df-wrecs 7950  df-recs 8011  df-rdg 8049  df-1o 8105  df-oadd 8109  df-er 8292  df-map 8411  df-en 8513  df-dom 8514  df-sdom 8515  df-fin 8516  df-pnf 10680  df-mnf 10681  df-xr 10682  df-ltxr 10683  df-le 10684  df-sub 10875  df-neg 10876  df-nn 11642  df-2 11703  df-3 11704  df-4 11705  df-5 11706  df-6 11707  df-n0 11901  df-z 11985  df-uz 12247  df-fz 12896  df-struct 16488  df-ndx 16489  df-slot 16490  df-base 16492  df-sets 16493  df-ress 16494  df-plusg 16581  df-mulr 16582  df-sca 16584  df-vsca 16585  df-0g 16718  df-proset 17541  df-poset 17559  df-plt 17571  df-lub 17587  df-glb 17588  df-join 17589  df-meet 17590  df-p0 17652  df-p1 17653  df-lat 17659  df-clat 17721  df-mgm 17855  df-sgrp 17904  df-mnd 17915  df-submnd 17960  df-grp 18109  df-minusg 18110  df-sbg 18111  df-subg 18279  df-cntz 18450  df-lsm 18764  df-cmn 18911  df-abl 18912  df-mgp 19243  df-ur 19255  df-ring 19302  df-oppr 19376  df-dvdsr 19394  df-unit 19395  df-invr 19425  df-dvr 19436  df-drng 19507  df-lmod 19639  df-lss 19707  df-lsp 19747  df-lvec 19878  df-oposet 36316  df-ol 36318  df-oml 36319  df-covers 36406  df-ats 36407  df-atl 36438  df-cvlat 36462  df-hlat 36491  df-llines 36638  df-lplanes 36639  df-lvols 36640  df-lines 36641  df-psubsp 36643  df-pmap 36644  df-padd 36936  df-lhyp 37128  df-laut 37129  df-ldil 37244  df-ltrn 37245  df-trl 37299  df-tendo 37895  df-edring 37897  df-disoa 38169  df-dvech 38219  df-dib 38279  df-dic 38313  df-dih 38369
This theorem is referenced by:  dihmeetlem15N  38461
  Copyright terms: Public domain W3C validator