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 39181

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 3920	. . 3 ⊢ ((𝐾‘𝐺) ⊊ (𝐾‘𝐻) ↔ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻)))
2		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ⊊ (𝐾‘𝐻))
3		eqid 2730	. . . . . . . . . 10 ⊢ (Base‘𝑊) = (Base‘𝑊)
4		lkrpss.f	. . . . . . . . . 10 ⊢ 𝐹 = (LFnl‘𝑊)
5		lkrpss.k	. . . . . . . . . 10 ⊢ 𝐾 = (LKer‘𝑊)
6		lkrpss.w	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑊 ∈ LVec)
7		lveclmod 21033	. . . . . . . . . . 11 ⊢ (𝑊 ∈ LVec → 𝑊 ∈ LMod)
8	6, 7	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑊 ∈ LMod)
9		lkrpss.h	. . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ 𝐹)
10	3, 4, 5, 8, 9	lkrssv 39114	. . . . . . . . 9 ⊢ (𝜑 → (𝐾‘𝐻) ⊆ (Base‘𝑊))
11	10	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐻) ⊆ (Base‘𝑊))
12	2, 11	psssstrd 4060	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ⊊ (Base‘𝑊))
13	12	pssned 4049	. . . . . 6 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊊ (𝐾‘𝐻)) → (𝐾‘𝐺) ≠ (Base‘𝑊))
14	1, 13	sylan2br 595	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (𝐾‘𝐺) ≠ (Base‘𝑊))
15		simplr 768	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
16		eqid 2730	. . . . . . . . . . 11 ⊢ (LSHyp‘𝑊) = (LSHyp‘𝑊)
17	6	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → 𝑊 ∈ LVec)
18		simpr 484	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
19		simplr 768	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
20	10	ad3antrrr 730	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) ⊆ (Base‘𝑊))
21		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) = (Base‘𝑊))
22		simpllr 775	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
23	21, 22	eqsstrrd 3968	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (Base‘𝑊) ⊆ (𝐾‘𝐻))
24	20, 23	eqssd 3950	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐻) = (Base‘𝑊))
25	3, 16, 4, 5, 6, 9	lkrshp4 39126	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝐾‘𝐻) ≠ (Base‘𝑊) ↔ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
26	25	ad3antrrr 730	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → ((𝐾‘𝐻) ≠ (Base‘𝑊) ↔ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
27	26	necon1bbid 2965	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
28	24, 27	mpbird 257	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
29	19, 28	pm2.21dd 195	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) ∧ (𝐾‘𝐺) = (Base‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
30		lkrpss.g	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐺 ∈ 𝐹)
31	3, 16, 4, 5, 6, 30	lkrshpor 39125	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐾‘𝐺) ∈ (LSHyp‘𝑊) ∨ (𝐾‘𝐺) = (Base‘𝑊)))
32	31	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → ((𝐾‘𝐺) ∈ (LSHyp‘𝑊) ∨ (𝐾‘𝐺) = (Base‘𝑊)))
33	18, 29, 32	mpjaodan 960	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) ∈ (LSHyp‘𝑊))
34		simpr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
35	16, 17, 33, 34	lshpcmp 39006	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ↔ (𝐾‘𝐺) = (𝐾‘𝐻)))
36	15, 35	mpbid 232	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) ∧ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)) → (𝐾‘𝐺) = (𝐾‘𝐻))
37	36	ex 412	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) → ((𝐾‘𝐻) ∈ (LSHyp‘𝑊) → (𝐾‘𝐺) = (𝐾‘𝐻)))
38	37	necon3ad 2939	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾‘𝐺) ⊆ (𝐾‘𝐻)) → ((𝐾‘𝐺) ≠ (𝐾‘𝐻) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊)))
39	38	impr 454	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → ¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊))
40	25	necon1bbid 2965	. . . . . . 7 ⊢ (𝜑 → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
41	40	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (¬ (𝐾‘𝐻) ∈ (LSHyp‘𝑊) ↔ (𝐾‘𝐻) = (Base‘𝑊)))
42	39, 41	mpbid 232	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → (𝐾‘𝐻) = (Base‘𝑊))
43	14, 42	jca 511	. . . 4 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ⊆ (𝐾‘𝐻) ∧ (𝐾‘𝐺) ≠ (𝐾‘𝐻))) → ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊)))
44	3, 4, 5, 8, 30	lkrssv 39114	. . . . . . 7 ⊢ (𝜑 → (𝐾‘𝐺) ⊆ (Base‘𝑊))
45	44	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ⊆ (Base‘𝑊))
46		simprr 772	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐻) = (Base‘𝑊))
47	46	eqcomd 2736	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (Base‘𝑊) = (𝐾‘𝐻))
48	45, 47	sseqtrd 3969	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ⊆ (𝐾‘𝐻))
49		simprl 770	. . . . . 6 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ≠ (Base‘𝑊))
50	49, 47	neeqtrd 2995	. . . . 5 ⊢ ((𝜑 ∧ ((𝐾‘𝐺) ≠ (Base‘𝑊) ∧ (𝐾‘𝐻) = (Base‘𝑊))) → (𝐾‘𝐺) ≠ (𝐾‘𝐻))
51	48, 50	jca 511	. . . 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 39179	. . . 4 ⊢ (𝜑 → ((𝐾‘𝐺) = (Base‘𝑊) ↔ 𝐺 = 0 ))
57	56	necon3bid 2970	. . 3 ⊢ (𝜑 → ((𝐾‘𝐺) ≠ (Base‘𝑊) ↔ 𝐺 ≠ 0 ))
58	3, 4, 5, 54, 55, 8, 9	lkr0f2 39179	. . 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 206 ∧ wa 395 ∨ wo 847 = wceq 1541 ∈ wcel 2110 ≠ wne 2926 ⊆ wss 3900 ⊊ wpss 3901 ‘cfv 6477 Basecbs 17112 0_gc0g 17335 LModclmod 20786 LVecclvec 21029 LSHypclsh 38993 LFnlclfn 39075 LKerclk 39103 LDualcld 39141

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2112 ax-9 2120 ax-10 2143 ax-11 2159 ax-12 2179 ax-ext 2702 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7663 ax-cnex 11054 ax-resscn 11055 ax-1cn 11056 ax-icn 11057 ax-addcl 11058 ax-addrcl 11059 ax-mulcl 11060 ax-mulrcl 11061 ax-mulcom 11062 ax-addass 11063 ax-mulass 11064 ax-distr 11065 ax-i2m1 11066 ax-1ne0 11067 ax-1rid 11068 ax-rnegex 11069 ax-rrecex 11070 ax-cnre 11071 ax-pre-lttri 11072 ax-pre-lttrn 11073 ax-pre-ltadd 11074 ax-pre-mulgt0 11075

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2067 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3344 df-reu 3345 df-rab 3394 df-v 3436 df-sbc 3740 df-csb 3849 df-dif 3903 df-un 3905 df-in 3907 df-ss 3917 df-pss 3920 df-nul 4282 df-if 4474 df-pw 4550 df-sn 4575 df-pr 4577 df-tp 4579 df-op 4581 df-uni 4858 df-int 4896 df-iun 4941 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6244 df-ord 6305 df-on 6306 df-lim 6307 df-suc 6308 df-iota 6433 df-fun 6479 df-fn 6480 df-f 6481 df-f1 6482 df-fo 6483 df-f1o 6484 df-fv 6485 df-riota 7298 df-ov 7344 df-oprab 7345 df-mpo 7346 df-of 7605 df-om 7792 df-1st 7916 df-2nd 7917 df-tpos 8151 df-frecs 8206 df-wrecs 8237 df-recs 8286 df-rdg 8324 df-1o 8380 df-er 8617 df-map 8747 df-en 8865 df-dom 8866 df-sdom 8867 df-fin 8868 df-pnf 11140 df-mnf 11141 df-xr 11142 df-ltxr 11143 df-le 11144 df-sub 11338 df-neg 11339 df-nn 12118 df-2 12180 df-3 12181 df-4 12182 df-5 12183 df-6 12184 df-n0 12374 df-z 12461 df-uz 12725 df-fz 13400 df-struct 17050 df-sets 17067 df-slot 17085 df-ndx 17097 df-base 17113 df-ress 17134 df-plusg 17166 df-mulr 17167 df-sca 17169 df-vsca 17170 df-0g 17337 df-mgm 18540 df-sgrp 18619 df-mnd 18635 df-submnd 18684 df-grp 18841 df-minusg 18842 df-sbg 18843 df-subg 19028 df-cntz 19222 df-lsm 19541 df-cmn 19687 df-abl 19688 df-mgp 20052 df-rng 20064 df-ur 20093 df-ring 20146 df-oppr 20248 df-dvdsr 20268 df-unit 20269 df-invr 20299 df-drng 20639 df-lmod 20788 df-lss 20858 df-lsp 20898 df-lvec 21030 df-lshyp 38995 df-lfl 39076 df-lkr 39104 df-ldual 39142

This theorem is referenced by: lkrss2N 39187 lkreqN 39188

W3C validator