Theorem mapdrvallem2 38775

Description: Lemma for mapdrval 38777. 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 2900	. . 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 1129	. . . . . 6 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
15	14	adantr 483	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
16		simpl2 1188	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝐶)
17		simpr 487	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ≠ 𝑌)
18		eldifsn 4712	. . . . . 6 ⊢ (𝑓 ∈ (𝐶 ∖ {𝑌}) ↔ (𝑓 ∈ 𝐶 ∧ 𝑓 ≠ 𝑌))
19	16, 17, 18	sylanbrc 585	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ (𝐶 ∖ {𝑌}))
20	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 15, 19	lcfl8b 38634	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → ∃𝑥 ∈ (𝑉 ∖ { 0 })(𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}))
21		simp1l3 1264	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄)
22		eqimss2 4023	. . . . . . . . . . . . 13 ⊢ ((𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓)))
23	22	3ad2ant3 1131	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓)))
24		mapdrval.s	. . . . . . . . . . . . 13 ⊢ 𝑆 = (LSubSp‘𝑈)
25	2, 4, 13	dvhlmod 38240	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑈 ∈ LMod)
26	25	3ad2ant1 1129	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑈 ∈ LMod)
27	26	adantr 483	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑈 ∈ LMod)
28	27	3ad2ant1 1129	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑈 ∈ LMod)
29	15	3ad2ant1 1129	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
30	12	lcfl1lem 38621	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑓 ∈ 𝐶 ↔ (𝑓 ∈ 𝐹 ∧ (𝑂‘(𝑂‘(𝐿‘𝑓))) = (𝐿‘𝑓)))
31	30	simplbi 500	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓 ∈ 𝐶 → 𝑓 ∈ 𝐹)
32	31	3ad2ant2 1130	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑓 ∈ 𝐹)
33	32	adantr 483	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝐹)
34	33	3ad2ant1 1129	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝐹)
35	5, 8, 9, 28, 34	lkrssv 36226	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝐿‘𝑓) ⊆ 𝑉)
36	2, 4, 5, 24, 3	dochlss 38484	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐿‘𝑓) ⊆ 𝑉) → (𝑂‘(𝐿‘𝑓)) ∈ 𝑆)
37	29, 35, 36	syl2anc 586	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑂‘(𝐿‘𝑓)) ∈ 𝑆)
38		eldifi 4102	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (𝑉 ∖ { 0 }) → 𝑥 ∈ 𝑉)
39	38	3ad2ant2 1130	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ 𝑉)
40	5, 24, 6, 28, 37, 39	lspsnel5 19761	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (𝑥 ∈ (𝑂‘(𝐿‘𝑓)) ↔ (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘𝑓))))
41	23, 40	mpbird 259	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ (𝑂‘(𝐿‘𝑓)))
42	21, 41	sseldd 3967	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ 𝑄)
43		mapdrval.q	. . . . . . . . . 10 ⊢ 𝑄 = ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ))
44	42, 43	eleqtrdi 2923	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑥 ∈ ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ)))
45		eliun 4915	. . . . . . . . 9 ⊢ (𝑥 ∈ ∪ ℎ ∈ 𝑅 (𝑂‘(𝐿‘ℎ)) ↔ ∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
46	44, 45	sylib 220	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → ∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
47		eqid 2821	. . . . . . . . . . 11 ⊢ (Scalar‘𝑈) = (Scalar‘𝑈)
48		eqid 2821	. . . . . . . . . . 11 ⊢ (Base‘(Scalar‘𝑈)) = (Base‘(Scalar‘𝑈))
49		eqid 2821	. . . . . . . . . . 11 ⊢ ( ·𝑠 ‘𝐷) = ( ·𝑠 ‘𝐷)
50	2, 4, 13	dvhlvec 38239	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑈 ∈ LVec)
51	50	3ad2ant1 1129	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑈 ∈ LVec)
52	51	adantr 483	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑈 ∈ LVec)
53	52	3ad2ant1 1129	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑈 ∈ LVec)
54	53	ad2antrr 724	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑈 ∈ LVec)
55		simpr 487	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝑅)
56		simp1l1 1262	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝜑)
57	56	adantr 483	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → 𝜑)
58		mapdrval.e	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑅 ⊆ 𝐶)
59	57, 58	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → 𝑅 ⊆ 𝐶)
60	59	sseld 3965	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (ℎ ∈ 𝑅 → ℎ ∈ 𝐶))
61	12	lcfl1lem 38621	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐶 ↔ (ℎ ∈ 𝐹 ∧ (𝑂‘(𝑂‘(𝐿‘ℎ))) = (𝐿‘ℎ)))
62	61	simplbi 500	. . . . . . . . . . . . . 14 ⊢ (ℎ ∈ 𝐶 → ℎ ∈ 𝐹)
63	60, 62	syl6 35	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (ℎ ∈ 𝑅 → ℎ ∈ 𝐹))
64	55, 63	mpd 15	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝐹)
65	64	adantr 483	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ℎ ∈ 𝐹)
66	34	ad2antrr 724	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑓 ∈ 𝐹)
67		simpll3 1210	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}))
68	28	ad2antrr 724	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑈 ∈ LMod)
69	29	ad2antrr 724	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
70	5, 8, 9, 68, 65	lkrssv 36226	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) ⊆ 𝑉)
71	2, 4, 5, 24, 3	dochlss 38484	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐿‘ℎ) ⊆ 𝑉) → (𝑂‘(𝐿‘ℎ)) ∈ 𝑆)
72	69, 70, 71	syl2anc 586	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘ℎ)) ∈ 𝑆)
73		simpr 487	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑥 ∈ (𝑂‘(𝐿‘ℎ)))
74	24, 6, 68, 72, 73	lspsnel5a 19762	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘ℎ)))
75		mapdrvallem2.a	. . . . . . . . . . . . . . 15 ⊢ 𝐴 = (LSAtoms‘𝑈)
76		simpll2 1209	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑥 ∈ (𝑉 ∖ { 0 }))
77	5, 6, 7, 75, 68, 76	lsatlspsn 36123	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) ∈ 𝐴)
78	2, 3, 4, 7, 75, 8, 9, 69, 65	dochsat0 38587	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑂‘(𝐿‘ℎ)) ∈ 𝐴 ∨ (𝑂‘(𝐿‘ℎ)) = { 0 }))
79	7, 75, 54, 77, 78	lsatcmp2 36134	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑁‘{𝑥}) ⊆ (𝑂‘(𝐿‘ℎ)) ↔ (𝑁‘{𝑥}) = (𝑂‘(𝐿‘ℎ))))
80	74, 79	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑁‘{𝑥}) = (𝑂‘(𝐿‘ℎ)))
81	67, 80	eqtr2d 2857	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑂‘(𝐿‘ℎ)) = (𝑂‘(𝐿‘𝑓)))
82		eqid 2821	. . . . . . . . . . . . 13 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
83	56, 58	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑅 ⊆ 𝐶)
84	83	sselda 3966	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → ℎ ∈ 𝐶)
85	84	adantr 483	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ℎ ∈ 𝐶)
86	2, 82, 3, 4, 8, 9, 12, 69, 65	lcfl5 38626	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (ℎ ∈ 𝐶 ↔ (𝐿‘ℎ) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
87	85, 86	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) ∈ ran ((DIsoH‘𝐾)‘𝑊))
88		simp1l2 1263	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝐶)
89	88	ad2antrr 724	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → 𝑓 ∈ 𝐶)
90	2, 82, 3, 4, 8, 9, 12, 69, 66	lcfl5 38626	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝑓 ∈ 𝐶 ↔ (𝐿‘𝑓) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
91	89, 90	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘𝑓) ∈ ran ((DIsoH‘𝐾)‘𝑊))
92	2, 82, 3, 69, 87, 91	doch11 38503	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ((𝑂‘(𝐿‘ℎ)) = (𝑂‘(𝐿‘𝑓)) ↔ (𝐿‘ℎ) = (𝐿‘𝑓)))
93	81, 92	mpbid 234	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → (𝐿‘ℎ) = (𝐿‘𝑓))
94	47, 48, 8, 9, 10, 49, 54, 65, 66, 93	eqlkr4 36295	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) ∧ 𝑥 ∈ (𝑂‘(𝐿‘ℎ))) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ))
95	94	ex 415	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) ∧ ℎ ∈ 𝑅) → (𝑥 ∈ (𝑂‘(𝐿‘ℎ)) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ)))
96	95	reximdva 3274	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (∃ℎ ∈ 𝑅 𝑥 ∈ (𝑂‘(𝐿‘ℎ)) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ)))
97	46, 96	mpd 15	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ))
98		eleq1 2900	. . . . . . . . . 10 ⊢ (𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
99	98	reximi 3243	. . . . . . . . 9 ⊢ (∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
100	99	reximi 3243	. . . . . . . 8 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))𝑓 = (𝑟( ·𝑠 ‘𝐷)ℎ) → ∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
101		rexcom 3355	. . . . . . . . 9 ⊢ (∃ℎ ∈ 𝑅 ∃𝑟 ∈ (Base‘(Scalar‘𝑈))(𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ ∈ 𝑅 (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))
102		df-rex 3144	. . . . . . . . . 10 ⊢ (∃ℎ ∈ 𝑅 (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) ↔ ∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)))
103	102	rexbii 3247	. . . . . . . . 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 724	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑈 ∈ LMod)
109		mapdrval.r	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ 𝑇)
110	109	3ad2ant1 1129	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑅 ∈ 𝑇)
111	110	adantr 483	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑅 ∈ 𝑇)
112	111	ad2antrr 724	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑅 ∈ 𝑇)
113		simplr 767	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑟 ∈ (Base‘(Scalar‘𝑈)))
114		simprl 769	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → ℎ ∈ 𝑅)
115	47, 48, 10, 49, 107, 108, 112, 113, 114	ldualssvscl 36288	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)
116		biimpr 222	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅) → ((𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅 → 𝑓 ∈ 𝑅))
117	116	ad2antll 727	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → ((𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅 → 𝑓 ∈ 𝑅))
118	115, 117	mpd 15	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) ∧ (ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅))) → 𝑓 ∈ 𝑅)
119	118	ex 415	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) → ((ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
120	119	exlimdv 1930	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑟 ∈ (Base‘(Scalar‘𝑈))) → (∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
121	120	rexlimdva 3284	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
122	121	3ad2ant1 1129	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → (∃𝑟 ∈ (Base‘(Scalar‘𝑈))∃ℎ(ℎ ∈ 𝑅 ∧ (𝑓 ∈ 𝑅 ↔ (𝑟( ·𝑠 ‘𝐷)ℎ) ∈ 𝑅)) → 𝑓 ∈ 𝑅))
123	106, 122	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) ∧ 𝑥 ∈ (𝑉 ∖ { 0 }) ∧ (𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥})) → 𝑓 ∈ 𝑅)
124	123	rexlimdv3a 3286	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → (∃𝑥 ∈ (𝑉 ∖ { 0 })(𝑂‘(𝐿‘𝑓)) = (𝑁‘{𝑥}) → 𝑓 ∈ 𝑅))
125	20, 124	mpd 15	. . 3 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) ∧ 𝑓 ≠ 𝑌) → 𝑓 ∈ 𝑅)
126	10, 25	lduallmod 36283	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ LMod)
127	126	3ad2ant1 1129	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝐷 ∈ LMod)
128	11, 107	lss0cl 19712	. . . 4 ⊢ ((𝐷 ∈ LMod ∧ 𝑅 ∈ 𝑇) → 𝑌 ∈ 𝑅)
129	127, 110, 128	syl2anc 586	. . 3 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑌 ∈ 𝑅)
130	1, 125, 129	pm2.61ne 3102	. 2 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐶 ∧ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄) → 𝑓 ∈ 𝑅)
131	130	rabssdv 4050	1 ⊢ (𝜑 → {𝑓 ∈ 𝐶 ∣ (𝑂‘(𝐿‘𝑓)) ⊆ 𝑄} ⊆ 𝑅)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1533  ∃wex 1776   ∈ wcel 2110   ≠ wne 3016  ∃wrex 3139  {crab 3142   ∖ cdif 3932   ⊆ wss 3935  {csn 4560  ∪ ciun 4911  ran crn 5550  ‘cfv 6349  (class class class)co 7150  Basecbs 16477  Scalarcsca 16562   ·_𝑠 cvsca 16563  0_gc0g 16707  LModclmod 19628  LSubSpclss 19697  LSpanclspn 19737  LVecclvec 19868  LSAtomsclsa 36104  LFnlclfn 36187  LKerclk 36215  LDualcld 36253  HLchlt 36480  LHypclh 37114  DVecHcdvh 38208  DIsoHcdih 38358  ocHcoch 38477  mapdcmpd 38754

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 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  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 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-iin 4914  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-of 7403  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-lsatoms 36106  df-lshyp 36107  df-lfl 36188  df-lkr 36216  df-ldual 36254  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-tgrp 37873  df-tendo 37885  df-edring 37887  df-dveca 38133  df-disoa 38159  df-dvech 38209  df-dib 38269  df-dic 38303  df-dih 38359  df-doch 38478  df-djh 38525

This theorem is referenced by:  mapdrvallem3  38776