Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  hbtlem6 Structured version   Visualization version   GIF version

Theorem hbtlem6 43545
Description: There is a finite set of polynomials matching any single stage of the image. (Contributed by Stefan O'Rear, 1-Apr-2015.)
Hypotheses
Ref Expression
hbtlem.p 𝑃 = (Poly1𝑅)
hbtlem.u 𝑈 = (LIdeal‘𝑃)
hbtlem.s 𝑆 = (ldgIdlSeq‘𝑅)
hbtlem6.n 𝑁 = (RSpan‘𝑃)
hbtlem6.r (𝜑𝑅 ∈ LNoeR)
hbtlem6.i (𝜑𝐼𝑈)
hbtlem6.x (𝜑𝑋 ∈ ℕ0)
Assertion
Ref Expression
hbtlem6 (𝜑 → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
Distinct variable groups:   𝜑,𝑘   𝑘,𝐼   𝑅,𝑘   𝑆,𝑘   𝑘,𝑋
Allowed substitution hints:   𝑃(𝑘)   𝑈(𝑘)   𝑁(𝑘)

Proof of Theorem hbtlem6
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 hbtlem6.r . . 3 (𝜑𝑅 ∈ LNoeR)
2 lnrring 43528 . . . . 5 (𝑅 ∈ LNoeR → 𝑅 ∈ Ring)
31, 2syl 17 . . . 4 (𝜑𝑅 ∈ Ring)
4 hbtlem6.i . . . 4 (𝜑𝐼𝑈)
5 hbtlem6.x . . . 4 (𝜑𝑋 ∈ ℕ0)
6 hbtlem.p . . . . 5 𝑃 = (Poly1𝑅)
7 hbtlem.u . . . . 5 𝑈 = (LIdeal‘𝑃)
8 hbtlem.s . . . . 5 𝑆 = (ldgIdlSeq‘𝑅)
9 eqid 2735 . . . . 5 (LIdeal‘𝑅) = (LIdeal‘𝑅)
106, 7, 8, 9hbtlem2 43540 . . . 4 ((𝑅 ∈ Ring ∧ 𝐼𝑈𝑋 ∈ ℕ0) → ((𝑆𝐼)‘𝑋) ∈ (LIdeal‘𝑅))
113, 4, 5, 10syl3anc 1374 . . 3 (𝜑 → ((𝑆𝐼)‘𝑋) ∈ (LIdeal‘𝑅))
12 eqid 2735 . . . 4 (RSpan‘𝑅) = (RSpan‘𝑅)
139, 12lnr2i 43532 . . 3 ((𝑅 ∈ LNoeR ∧ ((𝑆𝐼)‘𝑋) ∈ (LIdeal‘𝑅)) → ∃𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin)((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎))
141, 11, 13syl2anc 585 . 2 (𝜑 → ∃𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin)((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎))
15 elfpw 9253 . . . . 5 (𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin) ↔ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin))
16 fvex 6842 . . . . . . . . 9 ((coe1𝑏)‘𝑋) ∈ V
17 eqid 2735 . . . . . . . . 9 (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋))
1816, 17fnmpti 6630 . . . . . . . 8 (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) Fn {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}
1918a1i 11 . . . . . . 7 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) Fn {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋})
20 simprl 771 . . . . . . . 8 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → 𝑎 ⊆ ((𝑆𝐼)‘𝑋))
21 eqid 2735 . . . . . . . . . . . 12 (deg1𝑅) = (deg1𝑅)
226, 7, 8, 21hbtlem1 43539 . . . . . . . . . . 11 ((𝑅 ∈ LNoeR ∧ 𝐼𝑈𝑋 ∈ ℕ0) → ((𝑆𝐼)‘𝑋) = {𝑑 ∣ ∃𝑏𝐼 (((deg1𝑅)‘𝑏) ≤ 𝑋𝑑 = ((coe1𝑏)‘𝑋))})
231, 4, 5, 22syl3anc 1374 . . . . . . . . . 10 (𝜑 → ((𝑆𝐼)‘𝑋) = {𝑑 ∣ ∃𝑏𝐼 (((deg1𝑅)‘𝑏) ≤ 𝑋𝑑 = ((coe1𝑏)‘𝑋))})
2417rnmpt 5901 . . . . . . . . . . 11 ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = {𝑑 ∣ ∃𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑑 = ((coe1𝑏)‘𝑋)}
25 fveq2 6829 . . . . . . . . . . . . . 14 (𝑐 = 𝑏 → ((deg1𝑅)‘𝑐) = ((deg1𝑅)‘𝑏))
2625breq1d 5084 . . . . . . . . . . . . 13 (𝑐 = 𝑏 → (((deg1𝑅)‘𝑐) ≤ 𝑋 ↔ ((deg1𝑅)‘𝑏) ≤ 𝑋))
2726rexrab 3639 . . . . . . . . . . . 12 (∃𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑑 = ((coe1𝑏)‘𝑋) ↔ ∃𝑏𝐼 (((deg1𝑅)‘𝑏) ≤ 𝑋𝑑 = ((coe1𝑏)‘𝑋)))
2827abbii 2802 . . . . . . . . . . 11 {𝑑 ∣ ∃𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑑 = ((coe1𝑏)‘𝑋)} = {𝑑 ∣ ∃𝑏𝐼 (((deg1𝑅)‘𝑏) ≤ 𝑋𝑑 = ((coe1𝑏)‘𝑋))}
2924, 28eqtri 2758 . . . . . . . . . 10 ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = {𝑑 ∣ ∃𝑏𝐼 (((deg1𝑅)‘𝑏) ≤ 𝑋𝑑 = ((coe1𝑏)‘𝑋))}
3023, 29eqtr4di 2788 . . . . . . . . 9 (𝜑 → ((𝑆𝐼)‘𝑋) = ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
3130adantr 480 . . . . . . . 8 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → ((𝑆𝐼)‘𝑋) = ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
3220, 31sseqtrd 3953 . . . . . . 7 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → 𝑎 ⊆ ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
33 simprr 773 . . . . . . 7 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → 𝑎 ∈ Fin)
34 fipreima 9257 . . . . . . 7 (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) Fn {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑎 ⊆ ran (𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ∧ 𝑎 ∈ Fin) → ∃𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin)((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎)
3519, 32, 33, 34syl3anc 1374 . . . . . 6 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → ∃𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin)((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎)
36 elfpw 9253 . . . . . . . . . 10 (𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin) ↔ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin))
37 ssrab2 4013 . . . . . . . . . . . . . . . . 17 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ⊆ 𝐼
38 sstr2 3924 . . . . . . . . . . . . . . . . 17 (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} → ({𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ⊆ 𝐼𝑘𝐼))
3937, 38mpi 20 . . . . . . . . . . . . . . . 16 (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} → 𝑘𝐼)
4039adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}) → 𝑘𝐼)
41 velpw 4536 . . . . . . . . . . . . . . 15 (𝑘 ∈ 𝒫 𝐼𝑘𝐼)
4240, 41sylibr 234 . . . . . . . . . . . . . 14 ((𝜑𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}) → 𝑘 ∈ 𝒫 𝐼)
4342adantrr 718 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ∈ 𝒫 𝐼)
44 simprr 773 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ∈ Fin)
4543, 44elind 4131 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ∈ (𝒫 𝐼 ∩ Fin))
463adantr 480 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑅 ∈ Ring)
476ply1ring 22199 . . . . . . . . . . . . . . . . 17 (𝑅 ∈ Ring → 𝑃 ∈ Ring)
483, 47syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ Ring)
4948adantr 480 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑃 ∈ Ring)
50 simprl 771 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋})
5150, 37sstrdi 3929 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘𝐼)
52 eqid 2735 . . . . . . . . . . . . . . . . . . 19 (Base‘𝑃) = (Base‘𝑃)
5352, 7lidlss 21199 . . . . . . . . . . . . . . . . . 18 (𝐼𝑈𝐼 ⊆ (Base‘𝑃))
544, 53syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐼 ⊆ (Base‘𝑃))
5554adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝐼 ⊆ (Base‘𝑃))
5651, 55sstrd 3927 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ⊆ (Base‘𝑃))
57 hbtlem6.n . . . . . . . . . . . . . . . 16 𝑁 = (RSpan‘𝑃)
5857, 52, 7rspcl 21222 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Ring ∧ 𝑘 ⊆ (Base‘𝑃)) → (𝑁𝑘) ∈ 𝑈)
5949, 56, 58syl2anc 585 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → (𝑁𝑘) ∈ 𝑈)
605adantr 480 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑋 ∈ ℕ0)
616, 7, 8, 9hbtlem2 43540 . . . . . . . . . . . . . 14 ((𝑅 ∈ Ring ∧ (𝑁𝑘) ∈ 𝑈𝑋 ∈ ℕ0) → ((𝑆‘(𝑁𝑘))‘𝑋) ∈ (LIdeal‘𝑅))
6246, 59, 60, 61syl3anc 1374 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑆‘(𝑁𝑘))‘𝑋) ∈ (LIdeal‘𝑅))
63 df-ima 5633 . . . . . . . . . . . . . . 15 ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = ran ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘)
6457, 52rspssid 21223 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ Ring ∧ 𝑘 ⊆ (Base‘𝑃)) → 𝑘 ⊆ (𝑁𝑘))
6549, 56, 64syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ⊆ (𝑁𝑘))
66 ssrab 4004 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↔ (𝑘𝐼 ∧ ∀𝑐𝑘 ((deg1𝑅)‘𝑐) ≤ 𝑋))
6766simprbi 497 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} → ∀𝑐𝑘 ((deg1𝑅)‘𝑐) ≤ 𝑋)
6867ad2antrl 729 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ∀𝑐𝑘 ((deg1𝑅)‘𝑐) ≤ 𝑋)
69 ssrab 4004 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ⊆ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↔ (𝑘 ⊆ (𝑁𝑘) ∧ ∀𝑐𝑘 ((deg1𝑅)‘𝑐) ≤ 𝑋))
7065, 68, 69sylanbrc 584 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → 𝑘 ⊆ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋})
7170resmptd 5994 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) = (𝑏𝑘 ↦ ((coe1𝑏)‘𝑋)))
72 resmpt 5991 . . . . . . . . . . . . . . . . . . 19 (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} → ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) = (𝑏𝑘 ↦ ((coe1𝑏)‘𝑋)))
7372ad2antrl 729 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) = (𝑏𝑘 ↦ ((coe1𝑏)‘𝑋)))
7471, 73eqtr4d 2773 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) = ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘))
75 resss 5955 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) ⊆ (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋))
7674, 75eqsstrrdi 3962 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) ⊆ (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
77 rnss 5883 . . . . . . . . . . . . . . . 16 (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) ⊆ (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) → ran ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) ⊆ ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
7876, 77syl 17 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ran ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) ↾ 𝑘) ⊆ ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
7963, 78eqsstrid 3955 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) ⊆ ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
806, 7, 8, 21hbtlem1 43539 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Ring ∧ (𝑁𝑘) ∈ 𝑈𝑋 ∈ ℕ0) → ((𝑆‘(𝑁𝑘))‘𝑋) = {𝑒 ∣ ∃𝑏 ∈ (𝑁𝑘)(((deg1𝑅)‘𝑏) ≤ 𝑋𝑒 = ((coe1𝑏)‘𝑋))})
8146, 59, 60, 80syl3anc 1374 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑆‘(𝑁𝑘))‘𝑋) = {𝑒 ∣ ∃𝑏 ∈ (𝑁𝑘)(((deg1𝑅)‘𝑏) ≤ 𝑋𝑒 = ((coe1𝑏)‘𝑋))})
82 eqid 2735 . . . . . . . . . . . . . . . . 17 (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋))
8382rnmpt 5901 . . . . . . . . . . . . . . . 16 ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = {𝑒 ∣ ∃𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑒 = ((coe1𝑏)‘𝑋)}
8426rexrab 3639 . . . . . . . . . . . . . . . . 17 (∃𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑒 = ((coe1𝑏)‘𝑋) ↔ ∃𝑏 ∈ (𝑁𝑘)(((deg1𝑅)‘𝑏) ≤ 𝑋𝑒 = ((coe1𝑏)‘𝑋)))
8584abbii 2802 . . . . . . . . . . . . . . . 16 {𝑒 ∣ ∃𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋}𝑒 = ((coe1𝑏)‘𝑋)} = {𝑒 ∣ ∃𝑏 ∈ (𝑁𝑘)(((deg1𝑅)‘𝑏) ≤ 𝑋𝑒 = ((coe1𝑏)‘𝑋))}
8683, 85eqtri 2758 . . . . . . . . . . . . . . 15 ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) = {𝑒 ∣ ∃𝑏 ∈ (𝑁𝑘)(((deg1𝑅)‘𝑏) ≤ 𝑋𝑒 = ((coe1𝑏)‘𝑋))}
8781, 86eqtr4di 2788 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑆‘(𝑁𝑘))‘𝑋) = ran (𝑏 ∈ {𝑐 ∈ (𝑁𝑘) ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)))
8879, 87sseqtrrd 3954 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
8912, 9rspssp 21226 . . . . . . . . . . . . 13 ((𝑅 ∈ Ring ∧ ((𝑆‘(𝑁𝑘))‘𝑋) ∈ (LIdeal‘𝑅) ∧ ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)) → ((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
9046, 62, 88, 89syl3anc 1374 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → ((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
9145, 90jca 511 . . . . . . . . . . 11 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
92 fveq2 6829 . . . . . . . . . . . . 13 (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → ((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) = ((RSpan‘𝑅)‘𝑎))
9392sseq1d 3948 . . . . . . . . . . . 12 (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → (((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋) ↔ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
9493anbi2d 631 . . . . . . . . . . 11 (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → ((𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘)) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)) ↔ (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))))
9591, 94syl5ibcom 245 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ⊆ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∧ 𝑘 ∈ Fin)) → (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))))
9636, 95sylan2b 595 . . . . . . . . 9 ((𝜑𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin)) → (((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))))
9796expimpd 453 . . . . . . . 8 (𝜑 → ((𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin) ∧ ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎) → (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))))
9897adantr 480 . . . . . . 7 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → ((𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin) ∧ ((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎) → (𝑘 ∈ (𝒫 𝐼 ∩ Fin) ∧ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))))
9998reximdv2 3145 . . . . . 6 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → (∃𝑘 ∈ (𝒫 {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ∩ Fin)((𝑏 ∈ {𝑐𝐼 ∣ ((deg1𝑅)‘𝑐) ≤ 𝑋} ↦ ((coe1𝑏)‘𝑋)) “ 𝑘) = 𝑎 → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
10035, 99mpd 15 . . . . 5 ((𝜑 ∧ (𝑎 ⊆ ((𝑆𝐼)‘𝑋) ∧ 𝑎 ∈ Fin)) → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
10115, 100sylan2b 595 . . . 4 ((𝜑𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin)) → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
102 sseq1 3942 . . . . 5 (((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎) → (((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋) ↔ ((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
103102rexbidv 3159 . . . 4 (((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎) → (∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋) ↔ ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((RSpan‘𝑅)‘𝑎) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
104101, 103syl5ibrcom 247 . . 3 ((𝜑𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin)) → (((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎) → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
105104rexlimdva 3136 . 2 (𝜑 → (∃𝑎 ∈ (𝒫 ((𝑆𝐼)‘𝑋) ∩ Fin)((𝑆𝐼)‘𝑋) = ((RSpan‘𝑅)‘𝑎) → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋)))
10614, 105mpd 15 1 (𝜑 → ∃𝑘 ∈ (𝒫 𝐼 ∩ Fin)((𝑆𝐼)‘𝑋) ⊆ ((𝑆‘(𝑁𝑘))‘𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  {cab 2713  wral 3049  wrex 3059  {crab 3387  cin 3884  wss 3885  𝒫 cpw 4531   class class class wbr 5074  cmpt 5155  ran crn 5621  cres 5622  cima 5623   Fn wfn 6482  cfv 6487  Fincfn 8882  cle 11169  0cn0 12426  Basecbs 17168  Ringcrg 20203  LIdealclidl 21193  RSpancrsp 21194  Poly1cpl1 22129  coe1cco1 22130  deg1cdg1 26007  LNoeRclnr 43525  ldgIdlSeqcldgis 43537
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2184  ax-ext 2707  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7678  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104  ax-pre-sup 11105  ax-addf 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3060  df-rmo 3340  df-reu 3341  df-rab 3388  df-v 3429  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-pss 3905  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4841  df-int 4880  df-iun 4925  df-iin 4926  df-br 5075  df-opab 5137  df-mpt 5156  df-tr 5182  df-id 5515  df-eprel 5520  df-po 5528  df-so 5529  df-fr 5573  df-se 5574  df-we 5575  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-pred 6254  df-ord 6315  df-on 6316  df-lim 6317  df-suc 6318  df-iota 6443  df-fun 6489  df-fn 6490  df-f 6491  df-f1 6492  df-fo 6493  df-f1o 6494  df-fv 6495  df-isom 6496  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-ofr 7621  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8100  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-2o 8395  df-er 8632  df-map 8764  df-pm 8765  df-ixp 8835  df-en 8883  df-dom 8884  df-sdom 8885  df-fin 8886  df-fsupp 9264  df-sup 9344  df-oi 9414  df-card 9852  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-nn 12164  df-2 12233  df-3 12234  df-4 12235  df-5 12236  df-6 12237  df-7 12238  df-8 12239  df-9 12240  df-n0 12427  df-z 12514  df-dec 12634  df-uz 12778  df-fz 13451  df-fzo 13598  df-seq 13953  df-hash 14282  df-struct 17106  df-sets 17123  df-slot 17141  df-ndx 17153  df-base 17169  df-ress 17190  df-plusg 17222  df-mulr 17223  df-starv 17224  df-sca 17225  df-vsca 17226  df-ip 17227  df-tset 17228  df-ple 17229  df-ds 17231  df-unif 17232  df-hom 17233  df-cco 17234  df-0g 17393  df-gsum 17394  df-prds 17399  df-pws 17401  df-mre 17537  df-mrc 17538  df-acs 17540  df-mgm 18597  df-sgrp 18676  df-mnd 18692  df-mhm 18740  df-submnd 18741  df-grp 18901  df-minusg 18902  df-sbg 18903  df-mulg 19033  df-subg 19088  df-ghm 19177  df-cntz 19281  df-cmn 19746  df-abl 19747  df-mgp 20111  df-rng 20123  df-ur 20152  df-ring 20205  df-cring 20206  df-subrng 20512  df-subrg 20536  df-lmod 20846  df-lss 20916  df-lsp 20956  df-sra 21157  df-rgmod 21158  df-lidl 21195  df-rsp 21196  df-cnfld 21342  df-ascl 21824  df-psr 21878  df-mvr 21879  df-mpl 21880  df-opsr 21882  df-psr1 22132  df-vr1 22133  df-ply1 22134  df-coe1 22135  df-mdeg 26008  df-deg1 26009  df-lfig 43484  df-lnm 43492  df-lnr 43526  df-ldgis 43538
This theorem is referenced by:  hbt  43546
  Copyright terms: Public domain W3C validator