lkrpssN - Mathbox for Norm Megill

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

Theorem lkrpssN 38033

Description: Proper subset relation between kernels. (Contributed by NM, 16-Feb-2015.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
lkrpss.f	⊢ 𝐹 = (LFnl‘𝑊)
lkrpss.k	⊢ 𝐾 = (LKer‘𝑊)
lkrpss.d	⊢ 𝐷 = (LDual‘𝑊)
lkrpss.o	⊢ 0 = (0_g‘𝐷)
lkrpss.w	⊢ (𝜑 → 𝑊 ∈ LVec)
lkrpss.g	⊢ (𝜑 → 𝐺 ∈ 𝐹)
lkrpss.h	⊢ (𝜑 → 𝐻 ∈ 𝐹)

**Assertion**
Ref	Expression
lkrpssN	⊢ (𝜑 → ((𝐾‘𝐺) ⊊ (𝐾‘𝐻) ↔ (𝐺 ≠ 0 ∧ 𝐻 = 0 )))

**Proof of Theorem lkrpssN**
Step	Hyp	Ref	Expression
1		df-pss 3968	. . 3 ⊢ ((𝐾‘𝐺) ⊊ (𝐾‘𝐻) ↔ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻)))
2		simpr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ⊊ (𝐾‘𝐻))
3		eqid 2733	. . . . . . . . . 10 ⊢ (Base‘𝑊) = (Base‘𝑊)
4		lkrpss.f	. . . . . . . . . 10 ⊢ 𝐹 = (LFnl‘𝑊)
5		lkrpss.k	. . . . . . . . . 10 ⊢ 𝐾 = (LKer‘𝑊)
6		lkrpss.w	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑊 ∈ LVec)
7		lveclmod 20717	. . . . . . . . . . 11 ⊢ (𝑊 ∈ LVec → 𝑊 ∈ LMod)
8	6, 7	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑊 ∈ LMod)
9		lkrpss.h	. . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ 𝐹)
10	3, 4, 5, 8, 9	lkrssv 37966	. . . . . . . . 9 ⊢ (𝜑 → (𝐾‘𝐻) ⊆ (Base‘𝑊))
11	10	adantr 482	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐻) ⊆ (Base‘𝑊))
12	2, 11	psssstrd 4110	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ⊊ (Base‘𝑊))
13	12	pssned 4099	. . . . . 6 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ≠ (Base‘𝑊))
14	1, 13	sylan2br 596	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (𝐾‘𝐺) ≠ (Base‘𝑊))
15		simplr 768	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
16		eqid 2733	. . . . . . . . . . 11 ⊢ (LSHyp‘𝑊) = (LSHyp‘𝑊)
17	6	ad2antrr 725	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → 𝑊 ∈ LVec)
18		simpr 486	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
19		simplr 768	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
20	10	ad3antrrr 729	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) ⊆ (Base‘𝑊))
21		simpr 486	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) = (Base‘𝑊))
22		simpllr 775	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
23	21, 22	eqsstrrd 4022	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (Base‘𝑊) ⊆ (𝐾‘𝐻))
24	20, 23	eqssd 4000	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) = (Base‘𝑊))
25	3, 16, 4, 5, 6, 9	lkrshp4 37978	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝐾‘𝐻) ≠ (Base‘𝑊) ↔ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
26	25	ad3antrrr 729	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → ((𝐾‘𝐻) ≠ (Base‘𝑊) ↔ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
27	26	necon1bbid 2981	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
28	24, 27	mpbird 257	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
29	19, 28	pm2.21dd 194	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
30		lkrpss.g	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐺 ∈ 𝐹)
31	3, 16, 4, 5, 6, 30	lkrshpor 37977	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐾‘𝐺) ∈ (LSHyp‘𝑊) ∨ (𝐾‘𝐺) = (Base‘𝑊)))
32	31	ad2antrr 725	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → ((𝐾‘𝐺) ∈ (LSHyp‘𝑊) ∨ (𝐾‘𝐺) = (Base‘𝑊)))
33	18, 29, 32	mpjaodan 958	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
34		simpr 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
35	16, 17, 33, 34	lshpcmp 37858	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ↔ (𝐾‘𝐺) = (𝐾‘𝐻)))
36	15, 35	mpbid 231	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) = (𝐾‘𝐻))
37	36	ex 414	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) → ((𝐾‘𝐻) ∈ (LSHyp‘𝑊) → (𝐾‘𝐺) = (𝐾‘𝐻)))
38	37	necon3ad 2954	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) → ((𝐾‘𝐺) ≠ (𝐾‘𝐻) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
39	38	impr 456	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
40	25	necon1bbid 2981	. . . . . . 7 ⊢ (𝜑 → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
41	40	adantr 482	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
42	39, 41	mpbid 231	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (𝐾‘𝐻) = (Base‘𝑊))
43	14, 42	jca 513	. . . 4 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊)))
44	3, 4, 5, 8, 30	lkrssv 37966	. . . . . . 7 ⊢ (𝜑 → (𝐾‘𝐺) ⊆ (Base‘𝑊))
45	44	adantr 482	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ⊆ (Base‘𝑊))
46		simprr 772	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐻) = (Base‘𝑊))
47	46	eqcomd 2739	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (Base‘𝑊) = (𝐾‘𝐻))
48	45, 47	sseqtrd 4023	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
49		simprl 770	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ≠ (Base‘𝑊))
50	49, 47	neeqtrd 3011	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ≠ (𝐾‘𝐻))
51	48, 50	jca 513	. . . 4 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻)))
52	43, 51	impbida 800	. . 3 ⊢ (𝜑 → (((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻)) ↔ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))))
53	1, 52	bitrid 283	. 2 ⊢ (𝜑 → ((𝐾‘𝐺) ⊊ (𝐾‘𝐻) ↔ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))))
54		lkrpss.d	. . . . 5 ⊢ 𝐷 = (LDual‘𝑊)
55		lkrpss.o	. . . . 5 ⊢ 0 = (0_g‘𝐷)
56	3, 4, 5, 54, 55, 8, 30	lkr0f2 38031	. . . 4 ⊢ (𝜑 → ((𝐾‘𝐺) = (Base‘𝑊) ↔ 𝐺 = 0 ))
57	56	necon3bid 2986	. . 3 ⊢ (𝜑 → ((𝐾‘𝐺) ≠ (Base‘𝑊) ↔ 𝐺 ≠ 0 ))
58	3, 4, 5, 54, 55, 8, 9	lkr0f2 38031	. . 3 ⊢ (𝜑 → ((𝐾‘𝐻) = (Base‘𝑊) ↔ 𝐻 = 0 ))
59	57, 58	anbi12d 632	. 2 ⊢ (𝜑 → (((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊)) ↔ (𝐺 ≠ 0 ∧ 𝐻 = 0 )))
60	53, 59	bitrd 279	1 ⊢ (𝜑 → ((𝐾‘𝐺) ⊊ (𝐾‘𝐻) ↔ (𝐺 ≠ 0 ∧ 𝐻 = 0 )))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 397 ∨ wo 846 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 ⊆ wss 3949 ⊊ wpss 3950 ‘cfv 6544 Basecbs 17144 0_gc0g 17385 LModclmod 20471 LVecclvec 20713 LSHypclsh 37845 LFnlclfn 37927 LKerclk 37955 LDualcld 37993

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-om 7856 df-1st 7975 df-2nd 7976 df-tpos 8211 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-er 8703 df-map 8822 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-nn 12213 df-2 12275 df-3 12276 df-4 12277 df-5 12278 df-6 12279 df-n0 12473 df-z 12559 df-uz 12823 df-fz 13485 df-struct 17080 df-sets 17097 df-slot 17115 df-ndx 17127 df-base 17145 df-ress 17174 df-plusg 17210 df-mulr 17211 df-sca 17213 df-vsca 17214 df-0g 17387 df-mgm 18561 df-sgrp 18610 df-mnd 18626 df-submnd 18672 df-grp 18822 df-minusg 18823 df-sbg 18824 df-subg 19003 df-cntz 19181 df-lsm 19504 df-cmn 19650 df-abl 19651 df-mgp 19988 df-ur 20005 df-ring 20058 df-oppr 20150 df-dvdsr 20171 df-unit 20172 df-invr 20202 df-drng 20359 df-lmod 20473 df-lss 20543 df-lsp 20583 df-lvec 20714 df-lshyp 37847 df-lfl 37928 df-lkr 37956 df-ldual 37994

This theorem is referenced by: lkrss2N 38039 lkreqN 38040

W3C validator