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 38449
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 38409 . . . . 5 ((𝐾 ∈ HL ∧ 𝑊𝐻) → Rel (𝐼𝑄))
433ad2ant1 1129 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → Rel (𝐼𝑄))
5 relin1 5680 . . . 4 (Rel (𝐼𝑄) → Rel ((𝐼𝑄) ∩ (𝐼𝑅)))
64, 5syl 17 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → Rel ((𝐼𝑄) ∩ (𝐼𝑅)))
7 elin 4169 . . . . . 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 3498 . . . . . . . . 9 𝑓 ∈ V
17 vex 3498 . . . . . . . . 9 𝑠 ∈ V
1810, 11, 1, 12, 13, 14, 2, 15, 16, 17dihopelvalcqat 38376 . . . . . . . 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 38376 . . . . . . . 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 6664 . . . . . . . . . . . . 13 (𝐹 = 𝐺 → (𝐹𝑃) = (𝐺𝑃))
29 simpl1 1187 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
3010, 11, 1, 12lhpocnel2 37149 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3129, 30syl 17 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
32 simpl2l 1222 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
3310, 11, 1, 13, 15ltrniotaval 37711 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → (𝐹𝑃) = 𝑄)
3429, 31, 32, 33syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹𝑃) = 𝑄)
35 simpl2r 1223 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
3610, 11, 1, 13, 21ltrniotaval 37711 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → (𝐺𝑃) = 𝑅)
3729, 31, 35, 36syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐺𝑃) = 𝑅)
3834, 37eqeq12d 2837 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → ((𝐹𝑃) = (𝐺𝑃) ↔ 𝑄 = 𝑅))
3928, 38syl5ib 246 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹 = 𝐺𝑄 = 𝑅))
4039necon3d 3037 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑄𝑅𝐹𝐺))
4127, 40mpd 15 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝐹𝐺)
42 simp2ll 1236 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑓 = (𝑠𝐹))
43 simp2rl 1238 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝑓 = (𝑠𝐺))
4442, 43eqtr3d 2858 . . . . . . . . . . . . 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 37709 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → 𝐹𝑇)
5145, 48, 49, 50syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐹𝑇)
52 simp12r 1283 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
5310, 11, 1, 13, 21ltrniotacl 37709 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → 𝐺𝑇)
5445, 48, 52, 53syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐺𝑇)
55 dihmeetlem13.b . . . . . . . . . . . . . . 15 𝐵 = (Base‘𝐾)
56 dihmeetlem13.o . . . . . . . . . . . . . . 15 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
5755, 1, 13, 14, 56tendospcanN 38153 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑠𝐸𝑠𝑂) ∧ (𝐹𝑇𝐺𝑇)) → ((𝑠𝐹) = (𝑠𝐺) ↔ 𝐹 = 𝐺))
5845, 46, 47, 51, 54, 57syl122anc 1375 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → ((𝑠𝐹) = (𝑠𝐺) ↔ 𝐹 = 𝐺))
5944, 58mpbid 234 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸)) ∧ 𝑠𝑂) → 𝐹 = 𝐺)
60593expia 1117 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑠𝑂𝐹 = 𝐺))
6160necon1d 3038 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝐹𝐺𝑠 = 𝑂))
6241, 61mpd 15 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝑠 = 𝑂)
6362fveq1d 6667 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑠𝐹) = (𝑂𝐹))
6429, 31, 32, 50syl3anc 1367 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → 𝐹𝑇)
6556, 55tendo02 37917 . . . . . . . . 9 (𝐹𝑇 → (𝑂𝐹) = ( I ↾ 𝐵))
6664, 65syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) ∧ ((𝑓 = (𝑠𝐹) ∧ 𝑠𝐸) ∧ (𝑓 = (𝑠𝐺) ∧ 𝑠𝐸))) → (𝑂𝐹) = ( I ↾ 𝐵))
6726, 63, 663eqtrd 2860 . . . . . . 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 38241 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
74733ad2ant1 1129 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 0 = ⟨( I ↾ 𝐵), 𝑂⟩)
7574sneqd 4573 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → { 0 } = {⟨( I ↾ 𝐵), 𝑂⟩})
7675eleq2d 2898 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ { 0 } ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩}))
77 opex 5349 . . . . . . 7 𝑓, 𝑠⟩ ∈ V
7877elsn 4576 . . . . . 6 (⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩} ↔ ⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩)
7916, 17opth 5361 . . . . . 6 (⟨𝑓, 𝑠⟩ = ⟨( I ↾ 𝐵), 𝑂⟩ ↔ (𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂))
8078, 79bitr2i 278 . . . . 5 ((𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂) ↔ ⟨𝑓, 𝑠⟩ ∈ {⟨( I ↾ 𝐵), 𝑂⟩})
8176, 80syl6rbbr 292 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝑓 = ( I ↾ 𝐵) ∧ 𝑠 = 𝑂) ↔ ⟨𝑓, 𝑠⟩ ∈ { 0 }))
8270, 81sylibd 241 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (⟨𝑓, 𝑠⟩ ∈ ((𝐼𝑄) ∩ (𝐼𝑅)) → ⟨𝑓, 𝑠⟩ ∈ { 0 }))
836, 82relssdv 5656 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) ⊆ { 0 })
841, 71, 8dvhlmod 38240 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑈 ∈ LMod)
85 simp2ll 1236 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑄𝐴)
8655, 11atbase 36419 . . . . . 6 (𝑄𝐴𝑄𝐵)
8785, 86syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑄𝐵)
88 eqid 2821 . . . . . 6 (LSubSp‘𝑈) = (LSubSp‘𝑈)
8955, 1, 2, 71, 88dihlss 38380 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑄𝐵) → (𝐼𝑄) ∈ (LSubSp‘𝑈))
908, 87, 89syl2anc 586 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝐼𝑄) ∈ (LSubSp‘𝑈))
91 simp2rl 1238 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑅𝐴)
9255, 11atbase 36419 . . . . . 6 (𝑅𝐴𝑅𝐵)
9391, 92syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → 𝑅𝐵)
9455, 1, 2, 71, 88dihlss 38380 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑅𝐵) → (𝐼𝑅) ∈ (LSubSp‘𝑈))
958, 93, 94syl2anc 586 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → (𝐼𝑅) ∈ (LSubSp‘𝑈))
9688lssincl 19731 . . . 4 ((𝑈 ∈ LMod ∧ (𝐼𝑄) ∈ (LSubSp‘𝑈) ∧ (𝐼𝑅) ∈ (LSubSp‘𝑈)) → ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈))
9784, 90, 95, 96syl3anc 1367 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈))
9872, 88lss0ss 19714 . . 3 ((𝑈 ∈ LMod ∧ ((𝐼𝑄) ∩ (𝐼𝑅)) ∈ (LSubSp‘𝑈)) → { 0 } ⊆ ((𝐼𝑄) ∩ (𝐼𝑅)))
9984, 97, 98syl2anc 586 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → { 0 } ⊆ ((𝐼𝑄) ∩ (𝐼𝑅)))
10083, 99eqssd 3984 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑄𝑅) → ((𝐼𝑄) ∩ (𝐼𝑅)) = { 0 })
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083   = wceq 1533  wcel 2110  wne 3016  cin 3935  wss 3936  {csn 4561  cop 4567   class class class wbr 5059  cmpt 5139   I cid 5454  cres 5552  Rel wrel 5555  cfv 6350  crio 7107  Basecbs 16477  lecple 16566  occoc 16567  0gc0g 16707  joincjn 17548  LModclmod 19628  LSubSpclss 19697  Atomscatm 36393  HLchlt 36480  LHypclh 37114  LTrncltrn 37231  TEndoctendo 37882  DVecHcdvh 38208  DIsoHcdih 38358
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2156  ax-12 2172  ax-ext 2793  ax-rep 5183  ax-sep 5196  ax-nul 5203  ax-pow 5259  ax-pr 5322  ax-un 7455  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608  ax-riotaBAD 36083
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3497  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4562  df-pr 4564  df-tp 4566  df-op 4568  df-uni 4833  df-int 4870  df-iun 4914  df-iin 4915  df-br 5060  df-opab 5122  df-mpt 5140  df-tr 5166  df-id 5455  df-eprel 5460  df-po 5469  df-so 5470  df-fr 5509  df-we 5511  df-xp 5556  df-rel 5557  df-cnv 5558  df-co 5559  df-dm 5560  df-rn 5561  df-res 5562  df-ima 5563  df-pred 6143  df-ord 6189  df-on 6190  df-lim 6191  df-suc 6192  df-iota 6309  df-fun 6352  df-fn 6353  df-f 6354  df-f1 6355  df-fo 6356  df-f1o 6357  df-fv 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-tpos 7886  df-undef 7933  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-oadd 8100  df-er 8283  df-map 8402  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-nn 11633  df-2 11694  df-3 11695  df-4 11696  df-5 11697  df-6 11698  df-n0 11892  df-z 11976  df-uz 12238  df-fz 12887  df-struct 16479  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-ress 16485  df-plusg 16572  df-mulr 16573  df-sca 16575  df-vsca 16576  df-0g 16709  df-proset 17532  df-poset 17550  df-plt 17562  df-lub 17578  df-glb 17579  df-join 17580  df-meet 17581  df-p0 17643  df-p1 17644  df-lat 17650  df-clat 17712  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-submnd 17951  df-grp 18100  df-minusg 18101  df-sbg 18102  df-subg 18270  df-cntz 18441  df-lsm 18755  df-cmn 18902  df-abl 18903  df-mgp 19234  df-ur 19246  df-ring 19293  df-oppr 19367  df-dvdsr 19385  df-unit 19386  df-invr 19416  df-dvr 19427  df-drng 19498  df-lmod 19630  df-lss 19698  df-lsp 19738  df-lvec 19869  df-oposet 36306  df-ol 36308  df-oml 36309  df-covers 36396  df-ats 36397  df-atl 36428  df-cvlat 36452  df-hlat 36481  df-llines 36628  df-lplanes 36629  df-lvols 36630  df-lines 36631  df-psubsp 36633  df-pmap 36634  df-padd 36926  df-lhyp 37118  df-laut 37119  df-ldil 37234  df-ltrn 37235  df-trl 37289  df-tendo 37885  df-edring 37887  df-disoa 38159  df-dvech 38209  df-dib 38269  df-dic 38303  df-dih 38359
This theorem is referenced by:  dihmeetlem15N  38451
  Copyright terms: Public domain W3C validator