Theorem mapdrvallem2 42229

Description: Lemma for mapdrval 42231. TODO: very long antecedents are dragged through proof in some places - see if it shortens proof to remove unused conjuncts. (Contributed by NM, 2-Feb-2015.)

Hypotheses

Ref	Expression
mapdrval.h	⊢ 𝐻 = (LHyp‘𝐾)
mapdrval.o	⊢ 𝑂 = ((ocH‘𝐾)‘𝑊)
mapdrval.m	⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
mapdrval.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
mapdrval.s	⊢ 𝑆 = (LSubSp‘𝑈)
mapdrval.f	⊢ 𝐹 = (LFnl‘𝑈)
mapdrval.l	⊢ 𝐿 = (LKer‘𝑈)
mapdrval.d	⊢ 𝐷 = (LDual‘𝑈)
mapdrval.t	⊢ 𝑇 = (LSubSp‘𝐷)
mapdrval.c	⊢ 𝐶 = {𝑔 ∈ 𝐹 ∣ (𝑂‘(𝑂‘(𝐿‘𝑔))) = (𝐿‘𝑔)}
mapdrval.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
mapdrval.r	⊢ (𝜑 → 𝑅 ∈ 𝑇)
mapdrval.e	⊢ (𝜑 → 𝑅 ⊆ 𝐶)
mapdrval.q	⊢ 𝑄 = ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ))
mapdrval.v	⊢ 𝑉 = (Base‘𝑈)
mapdrvallem2.a	⊢ 𝐴 = (LSAtoms‘𝑈)
mapdrvallem2.n	⊢ 𝑁 = (LSpan‘𝑈)
mapdrvallem2.z	⊢ 0 = (0g‘𝑈)
mapdrvallem2.y	⊢ 𝑌 = (0g‘𝐷)

Assertion

Ref	Expression
mapdrvallem2	⊢ (𝜑 → {𝑓 ∈ 𝐶 ∣ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄} ⊆ 𝑅)

Distinct variable groups:   𝐶,𝑓   𝑓,𝑔,𝐹   𝑓,𝐾   𝑔,ℎ,𝐿   𝑔,𝑂,ℎ   𝑄,𝑓,ℎ   𝑅,𝑓,ℎ   𝑈,𝑔   𝑓,𝑊   𝜑,𝑓   𝐶,ℎ   ℎ,𝑁   𝑄,ℎ   𝑈,ℎ   ℎ,𝑉   ℎ,𝑌   0 ,ℎ   𝜑,ℎ

Allowed substitution hints:   𝜑(𝑔)   𝐴(𝑓,𝑔,ℎ)   𝐶(𝑔)   𝐷(𝑓,𝑔,ℎ)   𝑄(𝑔)   𝑅(𝑔)   𝑆(𝑓,𝑔,ℎ)   𝑇(𝑓,𝑔,ℎ)   𝑈(𝑓)   𝐹(ℎ)   𝐻(𝑓,𝑔,ℎ)   𝐾(𝑔,ℎ)   𝐿(𝑓)   𝑀(𝑓,𝑔,ℎ)   𝑁(𝑓,𝑔)   𝑂(𝑓)   𝑉(𝑓,𝑔)   𝑊(𝑔,ℎ)   𝑌(𝑓,𝑔)   0 (𝑓,𝑔)

Proof of Theorem mapdrvallem2

Dummy variables 𝑟 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eleq1 2849	. . 3 ⊢ (𝑓 = 𝑌 → (𝑓 ∈ 𝑅 ↔ 𝑌 ∈ 𝑅))
2		mapdrval.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
3		mapdrval.o	. . . . 5 ⊢ 𝑂 = ((ocH‘𝐾)‘𝑊)
4		mapdrval.u	. . . . 5 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
5		mapdrval.v	. . . . 5 ⊢ 𝑉 = (Base‘𝑈)
6		mapdrvallem2.n	. . . . 5 ⊢ 𝑁 = (LSpan‘𝑈)
7		mapdrvallem2.z	. . . . 5 ⊢ 0 = (0g‘𝑈)
8		mapdrval.f	. . . . 5 ⊢ 𝐹 = (LFnl‘𝑈)
9		mapdrval.l	. . . . 5 ⊢ 𝐿 = (LKer‘𝑈)
10		mapdrval.d	. . . . 5 ⊢ 𝐷 = (LDual‘𝑈)
11		mapdrvallem2.y	. . . . 5 ⊢ 𝑌 = (0g‘𝐷)
12		mapdrval.c	. . . . 5 ⊢ 𝐶 = {𝑔 ∈ 𝐹 ∣ (𝑂‘(𝑂‘(𝐿‘𝑔))) = (𝐿‘𝑔)}
13		mapdrval.k	. . . . . . 7 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
14	13	3ad2ant1 1145	. . . . . 6 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
15	14	adantr 484	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
16		simpl2 1205	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝐶)
17		simpr 488	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ≠ 𝑌)
18		eldifsn 4743	. . . . . 6 ⊢ (𝑓 ∈ (𝐶 ∖ {𝑌}) ↔ (𝑓 ∈ 𝐶 ∧ 𝑓 ≠ 𝑌))
19	16, 17, 18	sylanbrc 592	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ (𝐶 ∖ {𝑌}))
20	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 15, 19	lcfl8b 42088	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → ∃𝑥 ∈ (𝑉 ∖ { 0 })(𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}))
21		simp1l3 1281	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄)
22		eqimss2 3993	. . . . . . . . . . . . 13 ⊢ ((𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓)))
23	22	3ad2ant3 1147	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓)))
24		mapdrval.s	. . . . . . . . . . . . 13 ⊢ 𝑆 = (LSubSp‘𝑈)
25	2, 4, 13	dvhlmod 41694	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑈 ∈ LMod)
26	25	3ad2ant1 1145	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑈 ∈ LMod)
27	26	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑈 ∈ LMod)
28	27	3ad2ant1 1145	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑈 ∈ LMod)
29	15	3ad2ant1 1145	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
30	12	lcfl1lem 42075	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑓 ∈ 𝐶 ↔ (𝑓 ∈ 𝐹 ∧ (𝑂‘(𝑂‘(𝐿‘𝑓))) = (𝐿‘𝑓)))
31	30	simplbi 500	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓 ∈ 𝐶 → 𝑓 ∈ 𝐹)
32	31	3ad2ant2 1146	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑓 ∈ 𝐹)
33	32	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝐹)
34	33	3ad2ant1 1145	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝐹)
35	5, 8, 9, 28, 34	lkrssv 39680	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝐿‘𝑓) ⊆ 𝑉)
36	2, 4, 5, 24, 3	dochlss 41938	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐿‘𝑓) ⊆ 𝑉) → (𝑂‘(𝐿‘𝑓)) ∈ 𝑆)
37	29, 35, 36	syl2anc 593	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑂‘(𝐿‘𝑓)) ∈ 𝑆)
38		eldifi 4082	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (𝑉 ∖ { 0 }) → 𝑥 ∈ 𝑉)
39	38	3ad2ant2 1146	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ 𝑉)
40	5, 24, 6, 28, 37, 39	ellspsn5b 21049	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑥 ∈ (𝑂‘(𝐿‘𝑓)) ↔ (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓))))
41	23, 40	mpbird 259	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ (𝑂‘(𝐿‘𝑓)))
42	21, 41	sseldd 3935	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ 𝑄)
43		mapdrval.q	. . . . . . . . . 10 ⊢ 𝑄 = ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ))
44	42, 43	eleqtrdi 2871	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ)))
45		eliun 4950	. . . . . . . . 9 ⊢ (𝑥 ∈ ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ)) ↔ ∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
46	44, 45	sylib 220	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → ∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
47		eqid 2761	. . . . . . . . . . 11 ⊢ (Scalar‘𝑈) = (Scalar‘𝑈)
48		eqid 2761	. . . . . . . . . . 11 ⊢ (Base‘(Scalar‘𝑈)) = (Base‘(Scalar‘𝑈))
49		eqid 2761	. . . . . . . . . . 11 ⊢ ( ·𝑠 ‘𝐷) = ( ·𝑠 ‘𝐷)
50	2, 4, 13	dvhlvec 41693	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑈 ∈ LVec)
51	50	3ad2ant1 1145	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑈 ∈ LVec)
52	51	adantr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑈 ∈ LVec)
53	52	3ad2ant1 1145	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑈 ∈ LVec)
54	53	ad2antrr 736	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑈 ∈ LVec)
55		simpr 488	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝑅)
56		simp1l1 1279	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝜑)
57	56	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → 𝜑)
58		mapdrval.e	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑅 ⊆ 𝐶)
59	57, 58	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → 𝑅 ⊆ 𝐶)
60	59	sseld 3933	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (ℎ ∈ 𝑅 → ℎ ∈ 𝐶))
61	12	lcfl1lem 42075	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐶 ↔ (ℎ ∈ 𝐹 ∧ (𝑂‘(𝑂‘(𝐿‘ℎ))) = (𝐿‘ℎ)))
62	61	simplbi 500	. . . . . . . . . . . . . 14 ⊢ (ℎ ∈ 𝐶 → ℎ ∈ 𝐹)
63	60, 62	syl6 35	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (ℎ ∈ 𝑅 → ℎ ∈ 𝐹))
64	55, 63	mpd 15	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝐹)
65	64	adantr 484	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ℎ ∈ 𝐹)
66	34	ad2antrr 736	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑓 ∈ 𝐹)
67		simpll3 1227	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}))
68	28	ad2antrr 736	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑈 ∈ LMod)
69	29	ad2antrr 736	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
70	5, 8, 9, 68, 65	lkrssv 39680	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) ⊆ 𝑉)
71	2, 4, 5, 24, 3	dochlss 41938	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐿‘ℎ) ⊆ 𝑉) → (𝑂‘(𝐿‘ℎ)) ∈ 𝑆)
72	69, 70, 71	syl2anc 593	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘ℎ)) ∈ 𝑆)
73		simpr 488	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
74	24, 6, 68, 72, 73	ellspsn5 21050	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘ℎ)))
75		mapdrvallem2.a	. . . . . . . . . . . . . . 15 ⊢ 𝐴 = (LSAtoms‘𝑈)
76		simpll2 1226	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑥 ∈ (𝑉 ∖ { 0 }))
77	5, 6, 7, 75, 68, 76	lsatlspsn 39577	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) ∈ 𝐴)
78	2, 3, 4, 7, 75, 8, 9, 69, 65	dochsat0 42041	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑂‘(𝐿‘ℎ)) ∈ 𝐴 ∨ (𝑂‘(𝐿‘ℎ)) = { 0 }))
79	7, 75, 54, 77, 78	lsatcmp2 39588	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘ℎ)) ↔ (𝑁‘{𝑥}) = (𝑂‘(𝐿‘ℎ))))
80	74, 79	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) = (𝑂‘(𝐿‘ℎ)))
81	67, 80	eqtr2d 2797	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘ℎ)) = (𝑂‘(𝐿‘𝑓)))
82		eqid 2761	. . . . . . . . . . . . 13 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
83	56, 58	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑅 ⊆ 𝐶)
84	83	sselda 3934	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝐶)
85	84	adantr 484	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ℎ ∈ 𝐶)
86	2, 82, 3, 4, 8, 9, 12, 69, 65	lcfl5 42080	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (ℎ ∈ 𝐶 ↔ (𝐿‘ℎ) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
87	85, 86	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) ∈ ran ((DIsoH‘𝐾)‘𝑊))
88		simp1l2 1280	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝐶)
89	88	ad2antrr 736	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑓 ∈ 𝐶)
90	2, 82, 3, 4, 8, 9, 12, 69, 66	lcfl5 42080	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑓 ∈ 𝐶 ↔ (𝐿‘𝑓) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
91	89, 90	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘𝑓) ∈ ran ((DIsoH‘𝐾)‘𝑊))
92	2, 82, 3, 69, 87, 91	doch11 41957	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑂‘(𝐿‘ℎ)) = (𝑂‘(𝐿‘𝑓)) ↔ (𝐿‘ℎ) = (𝐿‘𝑓)))
93	81, 92	mpbid 234	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) = (𝐿‘𝑓))
94	47, 48, 8, 9, 10, 49, 54, 65, 66, 93	eqlkr4 39749	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ))
95	94	ex 416	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (𝑥 ∈ (𝑂‘(𝐿‘ℎ)) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ)))
96	95	reximdva 3174	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ)))
97	46, 96	mpd 15	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ))
98		eleq1 2849	. . . . . . . . . 10 ⊢ (𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
99	98	reximi 3099	. . . . . . . . 9 ⊢ (∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
100	99	reximi 3099	. . . . . . . 8 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
101		rexcom 3290	. . . . . . . . 9 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ ∈ 𝑅 (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
102		df-rex 3086	. . . . . . . . . 10 ⊢ (∃ℎ ∈ 𝑅 (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
103	102	rexbii 3108	. . . . . . . . 9 ⊢ (∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ ∈ 𝑅 (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
104	101, 103	bitri 277	. . . . . . . 8 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
105	100, 104	sylib 220	. . . . . . 7 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
106	97, 105	syl 17	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
107		mapdrval.t	. . . . . . . . . . . 12 ⊢ 𝑇 = (LSubSp‘𝐷)
108	27	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑈 ∈ LMod)
109		mapdrval.r	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ 𝑇)
110	109	3ad2ant1 1145	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑅 ∈ 𝑇)
111	110	adantr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑅 ∈ 𝑇)
112	111	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑅 ∈ 𝑇)
113		simplr 778	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑟 ∈ (Base‘(Scalar‘𝑈)))
114		simprl 780	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → ℎ ∈ 𝑅)
115	47, 48, 10, 49, 107, 108, 112, 113, 114	ldualssvscl 39742	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)
116		biimpr 222	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) → ((𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅 → 𝑓 ∈ 𝑅))
117	116	ad2antll 739	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → ((𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅 → 𝑓 ∈ 𝑅))
118	115, 117	mpd 15	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑓 ∈ 𝑅)
119	118	ex 416	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) → ((ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
120	119	exlimdv 1952	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) → (∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
121	120	rexlimdva 3162	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
122	121	3ad2ant1 1145	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
123	106, 122	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝑅)
124	123	rexlimdv3a 3166	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (∃𝑥 ∈ (𝑉 ∖ { 0 })(𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}) → 𝑓 ∈ 𝑅))
125	20, 124	mpd 15	. . 3 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝑅)
126	10, 25	lduallmod 39737	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ LMod)
127	126	3ad2ant1 1145	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝐷 ∈ LMod)
128	11, 107	lss0cl 21001	. . . 4 ⊢ ((𝐷 ∈ LMod ∧ 𝑅 ∈ 𝑇) → 𝑌 ∈ 𝑅)
129	127, 110, 128	syl2anc 593	. . 3 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑌 ∈ 𝑅)
130	1, 125, 129	pm2.61ne 3041	. 2 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑓 ∈ 𝑅)
131	130	rabssdv 4025	1 ⊢ (𝜑 → {𝑓 ∈ 𝐶 ∣ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄} ⊆ 𝑅)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1097   = wceq 1559  ∃wex 1798   ∈ wcel 2141   ≠ wne 2956  ∃wrex 3085  {crab 3413   ∖ cdif 3899   ⊆ wss 3902  {csn 4579  ∪ ciun 4946  ran crn 5644  ‘cfv 6515  (class class class)co 7390  Basecbs 17235  Scalarcsca 17279   ·_𝑠 cvsca 17280  0_gc0g 17458  LModclmod 20914  LSubSpclss 20985  LSpanclspn 21025  LVecclvec 21156  LSAtomsclsa 39558  LFnlclfn 39641  LKerclk 39669  LDualcld 39707  HLchlt 39934  LHypclh 40568  DVecHcdvh 41662  DIsoHcdih 41812  ocHcoch 41931  mapdcmpd 42208

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7712  ax-cnex 11122  ax-resscn 11123  ax-1cn 11124  ax-icn 11125  ax-addcl 11126  ax-addrcl 11127  ax-mulcl 11128  ax-mulrcl 11129  ax-mulcom 11130  ax-addass 11131  ax-mulass 11132  ax-distr 11133  ax-i2m1 11134  ax-1ne0 11135  ax-1rid 11136  ax-rnegex 11137  ax-rrecex 11138  ax-cnre 11139  ax-pre-lttri 11140  ax-pre-lttrn 11141  ax-pre-ltadd 11142  ax-pre-mulgt0 11143  ax-riotaBAD 39537

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-tp 4584  df-op 4586  df-uni 4863  df-int 4903  df-iun 4948  df-iin 4949  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6282  df-ord 6343  df-on 6344  df-lim 6345  df-suc 6346  df-iota 6471  df-fun 6517  df-fn 6518  df-f 6519  df-f1 6520  df-fo 6521  df-f1o 6522  df-fv 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-of 7654  df-om 7841  df-1st 7964  df-2nd 7965  df-tpos 8199  df-undef 8246  df-frecs 8255  df-wrecs 8286  df-recs 8335  df-rdg 8374  df-1o 8430  df-er 8671  df-map 8803  df-en 8921  df-dom 8922  df-sdom 8923  df-fin 8924  df-pnf 11211  df-mnf 11212  df-xr 11213  df-ltxr 11214  df-le 11215  df-sub 11409  df-neg 11410  df-nn 12204  df-2 12273  df-3 12274  df-4 12275  df-5 12276  df-6 12277  df-n0 12475  df-z 12562  df-uz 12833  df-fz 13506  df-struct 17173  df-sets 17190  df-slot 17208  df-ndx 17220  df-base 17236  df-ress 17257  df-plusg 17289  df-mulr 17290  df-sca 17292  df-vsca 17293  df-0g 17460  df-proset 18316  df-poset 18335  df-plt 18350  df-lub 18366  df-glb 18367  df-join 18368  df-meet 18369  df-p0 18445  df-p1 18446  df-lat 18454  df-clat 18521  df-mgm 18664  df-sgrp 18743  df-mnd 18759  df-submnd 18808  df-grp 18968  df-minusg 18969  df-sbg 18970  df-subg 19155  df-cntz 19347  df-lsm 19666  df-cmn 19812  df-abl 19813  df-mgp 20177  df-rng 20189  df-ur 20218  df-ring 20271  df-oppr 20372  df-dvdsr 20392  df-unit 20393  df-invr 20423  df-dvr 20436  df-drng 20767  df-lmod 20916  df-lss 20986  df-lsp 21026  df-lvec 21157  df-lsatoms 39560  df-lshyp 39561  df-lfl 39642  df-lkr 39670  df-ldual 39708  df-oposet 39760  df-ol 39762  df-oml 39763  df-covers 39850  df-ats 39851  df-atl 39882  df-cvlat 39906  df-hlat 39935  df-llines 40082  df-lplanes 40083  df-lvols 40084  df-lines 40085  df-psubsp 40087  df-pmap 40088  df-padd 40380  df-lhyp 40572  df-laut 40573  df-ldil 40688  df-ltrn 40689  df-trl 40743  df-tgrp 41327  df-tendo 41339  df-edring 41341  df-dveca 41587  df-disoa 41613  df-dvech 41663  df-dib 41723  df-dic 41757  df-dih 41813  df-doch 41932  df-djh 41979

This theorem is referenced by:  mapdrvallem3  42230