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

Theorem islshpat 35684
Description: Hyperplane properties expressed with subspace sum and an atom. TODO: can proof be shortened? Seems long for a simple variation of islshpsm 35647. (Contributed by NM, 11-Jan-2015.)
Hypotheses
Ref Expression
islshpat.v 𝑉 = (Base‘𝑊)
islshpat.s 𝑆 = (LSubSp‘𝑊)
islshpat.p = (LSSum‘𝑊)
islshpat.h 𝐻 = (LSHyp‘𝑊)
islshpat.a 𝐴 = (LSAtoms‘𝑊)
islshpat.w (𝜑𝑊 ∈ LMod)
Assertion
Ref Expression
islshpat (𝜑 → (𝑈𝐻 ↔ (𝑈𝑆𝑈𝑉 ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉)))
Distinct variable groups:   ,𝑞   𝑆,𝑞   𝑈,𝑞   𝑉,𝑞   𝑊,𝑞   𝜑,𝑞
Allowed substitution hints:   𝐴(𝑞)   𝐻(𝑞)

Proof of Theorem islshpat
Dummy variable 𝑣 is distinct from all other variables.
StepHypRef Expression
1 islshpat.v . . 3 𝑉 = (Base‘𝑊)
2 eqid 2795 . . 3 (LSpan‘𝑊) = (LSpan‘𝑊)
3 islshpat.s . . 3 𝑆 = (LSubSp‘𝑊)
4 islshpat.p . . 3 = (LSSum‘𝑊)
5 islshpat.h . . 3 𝐻 = (LSHyp‘𝑊)
6 islshpat.w . . 3 (𝜑𝑊 ∈ LMod)
71, 2, 3, 4, 5, 6islshpsm 35647 . 2 (𝜑 → (𝑈𝐻 ↔ (𝑈𝑆𝑈𝑉 ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
8 df-3an 1082 . . . . 5 ((𝑈𝑆𝑈𝑉 ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))
9 r19.42v 3311 . . . . 5 (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))
108, 9bitr4i 279 . . . 4 ((𝑈𝑆𝑈𝑉 ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))
11 df-rex 3111 . . . . . . . 8 (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑣(𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
12 simpr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → 𝑣 = (0g𝑊))
1312sneqd 4484 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → {𝑣} = {(0g𝑊)})
1413fveq2d 6542 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → ((LSpan‘𝑊)‘{𝑣}) = ((LSpan‘𝑊)‘{(0g𝑊)}))
156ad3antrrr 726 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → 𝑊 ∈ LMod)
16 eqid 2795 . . . . . . . . . . . . . . . . . . . . 21 (0g𝑊) = (0g𝑊)
1716, 2lspsn0 19470 . . . . . . . . . . . . . . . . . . . 20 (𝑊 ∈ LMod → ((LSpan‘𝑊)‘{(0g𝑊)}) = {(0g𝑊)})
1815, 17syl 17 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → ((LSpan‘𝑊)‘{(0g𝑊)}) = {(0g𝑊)})
1914, 18eqtrd 2831 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → ((LSpan‘𝑊)‘{𝑣}) = {(0g𝑊)})
2019oveq2d 7032 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → (𝑈 ((LSpan‘𝑊)‘{𝑣})) = (𝑈 {(0g𝑊)}))
21 simplrl 773 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → 𝑈𝑆)
223lsssubg 19419 . . . . . . . . . . . . . . . . . . 19 ((𝑊 ∈ LMod ∧ 𝑈𝑆) → 𝑈 ∈ (SubGrp‘𝑊))
2315, 21, 22syl2anc 584 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → 𝑈 ∈ (SubGrp‘𝑊))
2416, 4lsm01 18524 . . . . . . . . . . . . . . . . . 18 (𝑈 ∈ (SubGrp‘𝑊) → (𝑈 {(0g𝑊)}) = 𝑈)
2523, 24syl 17 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → (𝑈 {(0g𝑊)}) = 𝑈)
2620, 25eqtrd 2831 . . . . . . . . . . . . . . . 16 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑈)
27 simplrr 774 . . . . . . . . . . . . . . . 16 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → 𝑈𝑉)
2826, 27eqnetrd 3051 . . . . . . . . . . . . . . 15 ((((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) ∧ 𝑣 = (0g𝑊)) → (𝑈 ((LSpan‘𝑊)‘{𝑣})) ≠ 𝑉)
2928ex 413 . . . . . . . . . . . . . 14 (((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) → (𝑣 = (0g𝑊) → (𝑈 ((LSpan‘𝑊)‘{𝑣})) ≠ 𝑉))
3029necon2d 3007 . . . . . . . . . . . . 13 (((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) → ((𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉𝑣 ≠ (0g𝑊)))
3130pm4.71rd 563 . . . . . . . . . . . 12 (((𝜑𝑣𝑉) ∧ (𝑈𝑆𝑈𝑉)) → ((𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉 ↔ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
3231pm5.32da 579 . . . . . . . . . . 11 ((𝜑𝑣𝑉) → (((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
3332pm5.32da 579 . . . . . . . . . 10 (𝜑 → ((𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ (𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))))
34 eldifsn 4626 . . . . . . . . . . . 12 (𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ↔ (𝑣𝑉𝑣 ≠ (0g𝑊)))
3534anbi1i 623 . . . . . . . . . . 11 ((𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ ((𝑣𝑉𝑣 ≠ (0g𝑊)) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
36 anass 469 . . . . . . . . . . . 12 (((𝑣𝑉𝑣 ≠ (0g𝑊)) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ (𝑣𝑉 ∧ (𝑣 ≠ (0g𝑊) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
37 an12 641 . . . . . . . . . . . . 13 ((𝑣 ≠ (0g𝑊) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
3837anbi2i 622 . . . . . . . . . . . 12 ((𝑣𝑉 ∧ (𝑣 ≠ (0g𝑊) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))) ↔ (𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
3936, 38bitri 276 . . . . . . . . . . 11 (((𝑣𝑉𝑣 ≠ (0g𝑊)) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ (𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
4035, 39bitr2i 277 . . . . . . . . . 10 ((𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑣 ≠ (0g𝑊) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))) ↔ (𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
4133, 40syl6bb 288 . . . . . . . . 9 (𝜑 → ((𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ (𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
4241exbidv 1899 . . . . . . . 8 (𝜑 → (∃𝑣(𝑣𝑉 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ ∃𝑣(𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
4311, 42syl5bb 284 . . . . . . 7 (𝜑 → (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑣(𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
44 fvex 6551 . . . . . . . . . 10 ((LSpan‘𝑊)‘{𝑣}) ∈ V
4544rexcom4b 3467 . . . . . . . . 9 (∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ∧ 𝑞 = ((LSpan‘𝑊)‘{𝑣})) ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))
46 df-rex 3111 . . . . . . . . 9 (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑣(𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
4745, 46bitr2i 277 . . . . . . . 8 (∃𝑣(𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ ∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ∧ 𝑞 = ((LSpan‘𝑊)‘{𝑣})))
48 ancom 461 . . . . . . . . . 10 ((((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ∧ 𝑞 = ((LSpan‘𝑊)‘{𝑣})) ↔ (𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
4948rexbii 3211 . . . . . . . . 9 (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ∧ 𝑞 = ((LSpan‘𝑊)‘{𝑣})) ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5049exbii 1829 . . . . . . . 8 (∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ∧ 𝑞 = ((LSpan‘𝑊)‘{𝑣})) ↔ ∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5147, 50bitri 276 . . . . . . 7 (∃𝑣(𝑣 ∈ (𝑉 ∖ {(0g𝑊)}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)) ↔ ∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5243, 51syl6bb 288 . . . . . 6 (𝜑 → (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))))
53 r19.41v 3308 . . . . . . . 8 (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)))
54 oveq2 7024 . . . . . . . . . . . 12 (𝑞 = ((LSpan‘𝑊)‘{𝑣}) → (𝑈 𝑞) = (𝑈 ((LSpan‘𝑊)‘{𝑣})))
5554eqeq1d 2797 . . . . . . . . . . 11 (𝑞 = ((LSpan‘𝑊)‘{𝑣}) → ((𝑈 𝑞) = 𝑉 ↔ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉))
5655anbi2d 628 . . . . . . . . . 10 (𝑞 = ((LSpan‘𝑊)‘{𝑣}) → (((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5756pm5.32i 575 . . . . . . . . 9 ((𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ (𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5857rexbii 3211 . . . . . . . 8 (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
5953, 58bitr3i 278 . . . . . . 7 ((∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
6059exbii 1829 . . . . . 6 (∃𝑞(∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ ∃𝑞𝑣 ∈ (𝑉 ∖ {(0g𝑊)})(𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉)))
6152, 60syl6bbr 290 . . . . 5 (𝜑 → (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑞(∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉))))
62 islshpat.a . . . . . . . . 9 𝐴 = (LSAtoms‘𝑊)
631, 2, 16, 62islsat 35658 . . . . . . . 8 (𝑊 ∈ LMod → (𝑞𝐴 ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣})))
646, 63syl 17 . . . . . . 7 (𝜑 → (𝑞𝐴 ↔ ∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣})))
6564anbi1d 629 . . . . . 6 (𝜑 → ((𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ (∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉))))
6665exbidv 1899 . . . . 5 (𝜑 → (∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ ∃𝑞(∃𝑣 ∈ (𝑉 ∖ {(0g𝑊)})𝑞 = ((LSpan‘𝑊)‘{𝑣}) ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉))))
6761, 66bitr4d 283 . . . 4 (𝜑 → (∃𝑣𝑉 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉))))
6810, 67syl5bb 284 . . 3 (𝜑 → ((𝑈𝑆𝑈𝑉 ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ ∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉))))
69 df-3an 1082 . . . 4 ((𝑈𝑆𝑈𝑉 ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉))
70 r19.42v 3311 . . . . 5 (∃𝑞𝐴 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉) ↔ ((𝑈𝑆𝑈𝑉) ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉))
71 df-rex 3111 . . . . 5 (∃𝑞𝐴 ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉) ↔ ∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)))
7270, 71bitr3i 278 . . . 4 (((𝑈𝑆𝑈𝑉) ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉) ↔ ∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)))
7369, 72bitr2i 277 . . 3 (∃𝑞(𝑞𝐴 ∧ ((𝑈𝑆𝑈𝑉) ∧ (𝑈 𝑞) = 𝑉)) ↔ (𝑈𝑆𝑈𝑉 ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉))
7468, 73syl6bb 288 . 2 (𝜑 → ((𝑈𝑆𝑈𝑉 ∧ ∃𝑣𝑉 (𝑈 ((LSpan‘𝑊)‘{𝑣})) = 𝑉) ↔ (𝑈𝑆𝑈𝑉 ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉)))
757, 74bitrd 280 1 (𝜑 → (𝑈𝐻 ↔ (𝑈𝑆𝑈𝑉 ∧ ∃𝑞𝐴 (𝑈 𝑞) = 𝑉)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wex 1761  wcel 2081  wne 2984  wrex 3106  cdif 3856  {csn 4472  cfv 6225  (class class class)co 7016  Basecbs 16312  0gc0g 16542  SubGrpcsubg 18027  LSSumclsm 18489  LModclmod 19324  LSubSpclss 19393  LSpanclspn 19433  LSAtomsclsa 35641  LSHypclsh 35642
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
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  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-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-wrecs 7798  df-recs 7860  df-rdg 7898  df-er 8139  df-en 8358  df-dom 8359  df-sdom 8360  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-ndx 16315  df-slot 16316  df-base 16318  df-sets 16319  df-ress 16320  df-plusg 16407  df-0g 16544  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-lmod 19326  df-lss 19394  df-lsp 19434  df-lsatoms 35643  df-lshyp 35644
This theorem is referenced by:  islshpcv  35720
  Copyright terms: Public domain W3C validator