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

Theorem hbt 39723
Description: The Hilbert Basis Theorem - the ring of univariate polynomials over a Noetherian ring is a Noetherian ring. (Contributed by Stefan O'Rear, 4-Apr-2015.)
Hypothesis
Ref Expression
hbt.p 𝑃 = (Poly1𝑅)
Assertion
Ref Expression
hbt (𝑅 ∈ LNoeR → 𝑃 ∈ LNoeR)

Proof of Theorem hbt
Dummy variables 𝑎 𝑏 𝑐 𝑒 𝑓 𝑔 𝑑 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 lnrring 39705 . . 3 (𝑅 ∈ LNoeR → 𝑅 ∈ Ring)
2 hbt.p . . . 4 𝑃 = (Poly1𝑅)
32ply1ring 20410 . . 3 (𝑅 ∈ Ring → 𝑃 ∈ Ring)
41, 3syl 17 . 2 (𝑅 ∈ LNoeR → 𝑃 ∈ Ring)
5 eqid 2821 . . . . . . . 8 (Base‘𝑅) = (Base‘𝑅)
6 eqid 2821 . . . . . . . 8 (LIdeal‘𝑅) = (LIdeal‘𝑅)
75, 6islnr3 39708 . . . . . . 7 (𝑅 ∈ LNoeR ↔ (𝑅 ∈ Ring ∧ (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅))))
87simprbi 499 . . . . . 6 (𝑅 ∈ LNoeR → (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅)))
98adantr 483 . . . . 5 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅)))
10 eqid 2821 . . . . . . 7 (LIdeal‘𝑃) = (LIdeal‘𝑃)
11 eqid 2821 . . . . . . 7 (ldgIdlSeq‘𝑅) = (ldgIdlSeq‘𝑅)
122, 10, 11, 6hbtlem7 39718 . . . . . 6 ((𝑅 ∈ Ring ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ((ldgIdlSeq‘𝑅)‘𝑎):ℕ0⟶(LIdeal‘𝑅))
131, 12sylan 582 . . . . 5 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ((ldgIdlSeq‘𝑅)‘𝑎):ℕ0⟶(LIdeal‘𝑅))
141ad2antrr 724 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → 𝑅 ∈ Ring)
15 simplr 767 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → 𝑎 ∈ (LIdeal‘𝑃))
16 simpr 487 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → 𝑏 ∈ ℕ0)
17 peano2nn0 11931 . . . . . . . 8 (𝑏 ∈ ℕ0 → (𝑏 + 1) ∈ ℕ0)
1817adantl 484 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → (𝑏 + 1) ∈ ℕ0)
19 nn0re 11900 . . . . . . . . 9 (𝑏 ∈ ℕ0𝑏 ∈ ℝ)
2019lep1d 11565 . . . . . . . 8 (𝑏 ∈ ℕ0𝑏 ≤ (𝑏 + 1))
2120adantl 484 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → 𝑏 ≤ (𝑏 + 1))
222, 10, 11, 14, 15, 16, 18, 21hbtlem4 39719 . . . . . 6 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑏) ⊆ (((ldgIdlSeq‘𝑅)‘𝑎)‘(𝑏 + 1)))
2322ralrimiva 3182 . . . . 5 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∀𝑏 ∈ ℕ0 (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑏) ⊆ (((ldgIdlSeq‘𝑅)‘𝑎)‘(𝑏 + 1)))
24 nacsfix 39302 . . . . 5 (((LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅)) ∧ ((ldgIdlSeq‘𝑅)‘𝑎):ℕ0⟶(LIdeal‘𝑅) ∧ ∀𝑏 ∈ ℕ0 (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑏) ⊆ (((ldgIdlSeq‘𝑅)‘𝑎)‘(𝑏 + 1))) → ∃𝑐 ∈ ℕ0𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
259, 13, 23, 24syl3anc 1367 . . . 4 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∃𝑐 ∈ ℕ0𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
26 fzfi 13334 . . . . . . 7 (0...𝑐) ∈ Fin
27 eqid 2821 . . . . . . . . 9 (RSpan‘𝑃) = (RSpan‘𝑃)
28 simpll 765 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑅 ∈ LNoeR)
29 simplr 767 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑎 ∈ (LIdeal‘𝑃))
30 elfznn0 12994 . . . . . . . . . 10 (𝑒 ∈ (0...𝑐) → 𝑒 ∈ ℕ0)
3130adantl 484 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑒 ∈ ℕ0)
322, 10, 11, 27, 28, 29, 31hbtlem6 39722 . . . . . . . 8 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → ∃𝑏 ∈ (𝒫 𝑎 ∩ Fin)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒))
3332ralrimiva 3182 . . . . . . 7 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∀𝑒 ∈ (0...𝑐)∃𝑏 ∈ (𝒫 𝑎 ∩ Fin)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒))
34 2fveq3 6669 . . . . . . . . . 10 (𝑏 = (𝑓𝑒) → ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏)) = ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒))))
3534fveq1d 6666 . . . . . . . . 9 (𝑏 = (𝑓𝑒) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))
3635sseq2d 3998 . . . . . . . 8 (𝑏 = (𝑓𝑒) → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)))
3736ac6sfi 8756 . . . . . . 7 (((0...𝑐) ∈ Fin ∧ ∀𝑒 ∈ (0...𝑐)∃𝑏 ∈ (𝒫 𝑎 ∩ Fin)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒)) → ∃𝑓(𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)))
3826, 33, 37sylancr 589 . . . . . 6 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∃𝑓(𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)))
3938adantr 483 . . . . 5 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) → ∃𝑓(𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)))
40 frn 6514 . . . . . . . . . . . . 13 (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) → ran 𝑓 ⊆ (𝒫 𝑎 ∩ Fin))
4140ad2antrl 726 . . . . . . . . . . . 12 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ (𝒫 𝑎 ∩ Fin))
42 inss1 4204 . . . . . . . . . . . 12 (𝒫 𝑎 ∩ Fin) ⊆ 𝒫 𝑎
4341, 42sstrdi 3978 . . . . . . . . . . 11 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ 𝒫 𝑎)
4443unissd 4855 . . . . . . . . . 10 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 𝒫 𝑎)
45 unipw 5334 . . . . . . . . . 10 𝒫 𝑎 = 𝑎
4644, 45sseqtrdi 4016 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓𝑎)
47 simpllr 774 . . . . . . . . . 10 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑎 ∈ (LIdeal‘𝑃))
48 eqid 2821 . . . . . . . . . . 11 (Base‘𝑃) = (Base‘𝑃)
4948, 10lidlss 19977 . . . . . . . . . 10 (𝑎 ∈ (LIdeal‘𝑃) → 𝑎 ⊆ (Base‘𝑃))
5047, 49syl 17 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑎 ⊆ (Base‘𝑃))
5146, 50sstrd 3976 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ (Base‘𝑃))
52 fvex 6677 . . . . . . . . 9 (Base‘𝑃) ∈ V
5352elpw2 5240 . . . . . . . 8 ( ran 𝑓 ∈ 𝒫 (Base‘𝑃) ↔ ran 𝑓 ⊆ (Base‘𝑃))
5451, 53sylibr 236 . . . . . . 7 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ∈ 𝒫 (Base‘𝑃))
55 simprl 769 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin))
56 ffn 6508 . . . . . . . . 9 (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) → 𝑓 Fn (0...𝑐))
57 fniunfv 7000 . . . . . . . . 9 (𝑓 Fn (0...𝑐) → 𝑔 ∈ (0...𝑐)(𝑓𝑔) = ran 𝑓)
5855, 56, 573syl 18 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑔 ∈ (0...𝑐)(𝑓𝑔) = ran 𝑓)
59 inss2 4205 . . . . . . . . . . 11 (𝒫 𝑎 ∩ Fin) ⊆ Fin
6055ffvelrnda 6845 . . . . . . . . . . 11 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ (0...𝑐)) → (𝑓𝑔) ∈ (𝒫 𝑎 ∩ Fin))
6159, 60sseldi 3964 . . . . . . . . . 10 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ (0...𝑐)) → (𝑓𝑔) ∈ Fin)
6261ralrimiva 3182 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∀𝑔 ∈ (0...𝑐)(𝑓𝑔) ∈ Fin)
63 iunfi 8806 . . . . . . . . 9 (((0...𝑐) ∈ Fin ∧ ∀𝑔 ∈ (0...𝑐)(𝑓𝑔) ∈ Fin) → 𝑔 ∈ (0...𝑐)(𝑓𝑔) ∈ Fin)
6426, 62, 63sylancr 589 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑔 ∈ (0...𝑐)(𝑓𝑔) ∈ Fin)
6558, 64eqeltrrd 2914 . . . . . . 7 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ∈ Fin)
6654, 65elind 4170 . . . . . 6 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ∈ (𝒫 (Base‘𝑃) ∩ Fin))
671ad3antrrr 728 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑅 ∈ Ring)
684ad3antrrr 728 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑃 ∈ Ring)
6927, 48, 10rspcl 19989 . . . . . . . . 9 ((𝑃 ∈ Ring ∧ ran 𝑓 ⊆ (Base‘𝑃)) → ((RSpan‘𝑃)‘ ran 𝑓) ∈ (LIdeal‘𝑃))
7068, 51, 69syl2anc 586 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ((RSpan‘𝑃)‘ ran 𝑓) ∈ (LIdeal‘𝑃))
7127, 10rspssp 19993 . . . . . . . . 9 ((𝑃 ∈ Ring ∧ 𝑎 ∈ (LIdeal‘𝑃) ∧ ran 𝑓𝑎) → ((RSpan‘𝑃)‘ ran 𝑓) ⊆ 𝑎)
7268, 47, 46, 71syl3anc 1367 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ((RSpan‘𝑃)‘ ran 𝑓) ⊆ 𝑎)
73 nn0re 11900 . . . . . . . . . . 11 (𝑔 ∈ ℕ0𝑔 ∈ ℝ)
7473adantl 484 . . . . . . . . . 10 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → 𝑔 ∈ ℝ)
75 simplrl 775 . . . . . . . . . . . 12 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑐 ∈ ℕ0)
7675adantr 483 . . . . . . . . . . 11 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → 𝑐 ∈ ℕ0)
7776nn0red 11950 . . . . . . . . . 10 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → 𝑐 ∈ ℝ)
78 simprl 769 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑔 ∈ ℕ0)
79 simprr 771 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑔𝑐)
8075adantr 483 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑐 ∈ ℕ0)
81 fznn0 12993 . . . . . . . . . . . . . . 15 (𝑐 ∈ ℕ0 → (𝑔 ∈ (0...𝑐) ↔ (𝑔 ∈ ℕ0𝑔𝑐)))
8280, 81syl 17 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (𝑔 ∈ (0...𝑐) ↔ (𝑔 ∈ ℕ0𝑔𝑐)))
8378, 79, 82mpbir2and 711 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑔 ∈ (0...𝑐))
84 simplrr 776 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))
85 fveq2 6664 . . . . . . . . . . . . . . 15 (𝑒 = 𝑔 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔))
86 2fveq3 6669 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝑔 → ((RSpan‘𝑃)‘(𝑓𝑒)) = ((RSpan‘𝑃)‘(𝑓𝑔)))
8786fveq2d 6668 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑔 → ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒))) = ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔))))
88 id 22 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑔𝑒 = 𝑔)
8987, 88fveq12d 6671 . . . . . . . . . . . . . . 15 (𝑒 = 𝑔 → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔))
9085, 89sseq12d 3999 . . . . . . . . . . . . . 14 (𝑒 = 𝑔 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔)))
9190rspcva 3620 . . . . . . . . . . . . 13 ((𝑔 ∈ (0...𝑐) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔))
9283, 84, 91syl2anc 586 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔))
9367adantr 483 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑅 ∈ Ring)
94 fvssunirn 6693 . . . . . . . . . . . . . . . 16 (𝑓𝑔) ⊆ ran 𝑓
9594, 51sstrid 3977 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → (𝑓𝑔) ⊆ (Base‘𝑃))
9627, 48, 10rspcl 19989 . . . . . . . . . . . . . . 15 ((𝑃 ∈ Ring ∧ (𝑓𝑔) ⊆ (Base‘𝑃)) → ((RSpan‘𝑃)‘(𝑓𝑔)) ∈ (LIdeal‘𝑃))
9768, 95, 96syl2anc 586 . . . . . . . . . . . . . 14 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ((RSpan‘𝑃)‘(𝑓𝑔)) ∈ (LIdeal‘𝑃))
9897adantr 483 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → ((RSpan‘𝑃)‘(𝑓𝑔)) ∈ (LIdeal‘𝑃))
9970adantr 483 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → ((RSpan‘𝑃)‘ ran 𝑓) ∈ (LIdeal‘𝑃))
10067, 3syl 17 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑃 ∈ Ring)
101100adantr 483 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → 𝑃 ∈ Ring)
10227, 48rspssid 19990 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ Ring ∧ ran 𝑓 ⊆ (Base‘𝑃)) → ran 𝑓 ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
10368, 51, 102syl2anc 586 . . . . . . . . . . . . . . . 16 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
104103adantr 483 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → ran 𝑓 ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
10594, 104sstrid 3977 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (𝑓𝑔) ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
10627, 10rspssp 19993 . . . . . . . . . . . . . 14 ((𝑃 ∈ Ring ∧ ((RSpan‘𝑃)‘ ran 𝑓) ∈ (LIdeal‘𝑃) ∧ (𝑓𝑔) ⊆ ((RSpan‘𝑃)‘ ran 𝑓)) → ((RSpan‘𝑃)‘(𝑓𝑔)) ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
107101, 99, 105, 106syl3anc 1367 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → ((RSpan‘𝑃)‘(𝑓𝑔)) ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
1082, 10, 11, 93, 98, 99, 107, 78hbtlem3 39720 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
10992, 108sstrd 3976 . . . . . . . . . . 11 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
110109anassrs 470 . . . . . . . . . 10 ((((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) ∧ 𝑔𝑐) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
111 nn0z 11999 . . . . . . . . . . . . . . . 16 (𝑐 ∈ ℕ0𝑐 ∈ ℤ)
112111adantr 483 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐 ∈ ℤ)
113 nn0z 11999 . . . . . . . . . . . . . . . 16 (𝑔 ∈ ℕ0𝑔 ∈ ℤ)
114113ad2antrl 726 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑔 ∈ ℤ)
115 simprr 771 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐𝑔)
116 eluz2 12243 . . . . . . . . . . . . . . 15 (𝑔 ∈ (ℤ𝑐) ↔ (𝑐 ∈ ℤ ∧ 𝑔 ∈ ℤ ∧ 𝑐𝑔))
117112, 114, 115, 116syl3anbrc 1339 . . . . . . . . . . . . . 14 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑔 ∈ (ℤ𝑐))
11875, 117sylan 582 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑔 ∈ (ℤ𝑐))
119 simprr 771 . . . . . . . . . . . . . 14 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) → ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
120119ad2antrr 724 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
121 fveqeq2 6673 . . . . . . . . . . . . . 14 (𝑑 = 𝑔 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐)))
122121rspcva 3620 . . . . . . . . . . . . 13 ((𝑔 ∈ (ℤ𝑐) ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
123118, 120, 122syl2anc 586 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
12475nn0red 11950 . . . . . . . . . . . . . . . 16 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑐 ∈ ℝ)
125124leidd 11200 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑐𝑐)
126109expr 459 . . . . . . . . . . . . . . . . 17 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → (𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔)))
127126ralrimiva 3182 . . . . . . . . . . . . . . . 16 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∀𝑔 ∈ ℕ0 (𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔)))
128 breq1 5061 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑐 → (𝑔𝑐𝑐𝑐))
129 fveq2 6664 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
130 fveq2 6664 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑐 → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))
131129, 130sseq12d 3999 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑐 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐)))
132128, 131imbi12d 347 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑐 → ((𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔)) ↔ (𝑐𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))))
133132rspcva 3620 . . . . . . . . . . . . . . . 16 ((𝑐 ∈ ℕ0 ∧ ∀𝑔 ∈ ℕ0 (𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))) → (𝑐𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐)))
13475, 127, 133syl2anc 586 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → (𝑐𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐)))
135125, 134mpd 15 . . . . . . . . . . . . . 14 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))
136135adantr 483 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))
13767adantr 483 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑅 ∈ Ring)
13870adantr 483 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → ((RSpan‘𝑃)‘ ran 𝑓) ∈ (LIdeal‘𝑃))
13975adantr 483 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐 ∈ ℕ0)
140 simprl 769 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑔 ∈ ℕ0)
141 simprr 771 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐𝑔)
1422, 10, 11, 137, 138, 139, 140, 141hbtlem4 39719 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
143136, 142sstrd 3976 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
144123, 143eqsstrd 4004 . . . . . . . . . . 11 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
145144anassrs 470 . . . . . . . . . 10 ((((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) ∧ 𝑐𝑔) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
14674, 77, 110, 145lecasei 10740 . . . . . . . . 9 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
147146ralrimiva 3182 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∀𝑔 ∈ ℕ0 (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
1482, 10, 11, 67, 70, 47, 72, 147hbtlem5 39721 . . . . . . 7 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ((RSpan‘𝑃)‘ ran 𝑓) = 𝑎)
149148eqcomd 2827 . . . . . 6 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑎 = ((RSpan‘𝑃)‘ ran 𝑓))
150 fveq2 6664 . . . . . . 7 (𝑏 = ran 𝑓 → ((RSpan‘𝑃)‘𝑏) = ((RSpan‘𝑃)‘ ran 𝑓))
151150rspceeqv 3637 . . . . . 6 (( ran 𝑓 ∈ (𝒫 (Base‘𝑃) ∩ Fin) ∧ 𝑎 = ((RSpan‘𝑃)‘ ran 𝑓)) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15266, 149, 151syl2anc 586 . . . . 5 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15339, 152exlimddv 1932 . . . 4 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15425, 153rexlimddv 3291 . . 3 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
155154ralrimiva 3182 . 2 (𝑅 ∈ LNoeR → ∀𝑎 ∈ (LIdeal‘𝑃)∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15648, 10, 27islnr2 39707 . 2 (𝑃 ∈ LNoeR ↔ (𝑃 ∈ Ring ∧ ∀𝑎 ∈ (LIdeal‘𝑃)∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏)))
1574, 155, 156sylanbrc 585 1 (𝑅 ∈ LNoeR → 𝑃 ∈ LNoeR)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398   = wceq 1533  wex 1776  wcel 2110  wral 3138  wrex 3139  cin 3934  wss 3935  𝒫 cpw 4538   cuni 4831   ciun 4911   class class class wbr 5058  ran crn 5550   Fn wfn 6344  wf 6345  cfv 6349  (class class class)co 7150  Fincfn 8503  cr 10530  0cc0 10531  1c1 10532   + caddc 10534  cle 10670  0cn0 11891  cz 11975  cuz 12237  ...cfz 12886  Basecbs 16477  Ringcrg 19291  LIdealclidl 19936  RSpancrsp 19937  Poly1cpl1 20339  NoeACScnacs 39292  LNoeRclnr 39702  ldgIdlSeqcldgis 39714
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-pre-sup 10609  ax-addf 10610  ax-mulf 10611
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  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-se 5509  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-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-of 7403  df-ofr 7404  df-om 7575  df-1st 7683  df-2nd 7684  df-supp 7825  df-tpos 7886  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-2o 8097  df-oadd 8100  df-er 8283  df-map 8402  df-pm 8403  df-ixp 8456  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-fsupp 8828  df-sup 8900  df-oi 8968  df-card 9362  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-7 11699  df-8 11700  df-9 11701  df-n0 11892  df-z 11976  df-dec 12093  df-uz 12238  df-fz 12887  df-fzo 13028  df-seq 13364  df-hash 13685  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-starv 16574  df-sca 16575  df-vsca 16576  df-ip 16577  df-tset 16578  df-ple 16579  df-ocomp 16580  df-ds 16581  df-unif 16582  df-0g 16709  df-gsum 16710  df-mre 16851  df-mrc 16852  df-acs 16854  df-proset 17532  df-drs 17533  df-poset 17550  df-ipo 17756  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-mhm 17950  df-submnd 17951  df-grp 18100  df-minusg 18101  df-sbg 18102  df-mulg 18219  df-subg 18270  df-ghm 18350  df-cntz 18441  df-cmn 18902  df-abl 18903  df-mgp 19234  df-ur 19246  df-ring 19293  df-cring 19294  df-oppr 19367  df-dvdsr 19385  df-unit 19386  df-invr 19416  df-subrg 19527  df-lmod 19630  df-lss 19698  df-lsp 19738  df-sra 19938  df-rgmod 19939  df-lidl 19940  df-rsp 19941  df-rlreg 20050  df-ascl 20081  df-psr 20130  df-mvr 20131  df-mpl 20132  df-opsr 20134  df-psr1 20342  df-vr1 20343  df-ply1 20344  df-coe1 20345  df-cnfld 20540  df-mdeg 24643  df-deg1 24644  df-nacs 39293  df-lfig 39661  df-lnm 39669  df-lnr 39703  df-ldgis 39715
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator