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 39737
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 39719 . . 3 (𝑅 ∈ LNoeR → 𝑅 ∈ Ring)
2 hbt.p . . . 4 𝑃 = (Poly1𝑅)
32ply1ring 20418 . . 3 (𝑅 ∈ Ring → 𝑃 ∈ Ring)
41, 3syl 17 . 2 (𝑅 ∈ LNoeR → 𝑃 ∈ Ring)
5 eqid 2823 . . . . . . . 8 (Base‘𝑅) = (Base‘𝑅)
6 eqid 2823 . . . . . . . 8 (LIdeal‘𝑅) = (LIdeal‘𝑅)
75, 6islnr3 39722 . . . . . . 7 (𝑅 ∈ LNoeR ↔ (𝑅 ∈ Ring ∧ (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅))))
87simprbi 499 . . . . . 6 (𝑅 ∈ LNoeR → (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅)))
98adantr 483 . . . . 5 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → (LIdeal‘𝑅) ∈ (NoeACS‘(Base‘𝑅)))
10 eqid 2823 . . . . . . 7 (LIdeal‘𝑃) = (LIdeal‘𝑃)
11 eqid 2823 . . . . . . 7 (ldgIdlSeq‘𝑅) = (ldgIdlSeq‘𝑅)
122, 10, 11, 6hbtlem7 39732 . . . . . 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 11940 . . . . . . . 8 (𝑏 ∈ ℕ0 → (𝑏 + 1) ∈ ℕ0)
1817adantl 484 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → (𝑏 + 1) ∈ ℕ0)
19 nn0re 11909 . . . . . . . . 9 (𝑏 ∈ ℕ0𝑏 ∈ ℝ)
2019lep1d 11573 . . . . . . . 8 (𝑏 ∈ ℕ0𝑏 ≤ (𝑏 + 1))
2120adantl 484 . . . . . . 7 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → 𝑏 ≤ (𝑏 + 1))
222, 10, 11, 14, 15, 16, 18, 21hbtlem4 39733 . . . . . 6 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑏 ∈ ℕ0) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑏) ⊆ (((ldgIdlSeq‘𝑅)‘𝑎)‘(𝑏 + 1)))
2322ralrimiva 3184 . . . . 5 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∀𝑏 ∈ ℕ0 (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑏) ⊆ (((ldgIdlSeq‘𝑅)‘𝑎)‘(𝑏 + 1)))
24 nacsfix 39316 . . . . 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 13343 . . . . . . 7 (0...𝑐) ∈ Fin
27 eqid 2823 . . . . . . . . 9 (RSpan‘𝑃) = (RSpan‘𝑃)
28 simpll 765 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑅 ∈ LNoeR)
29 simplr 767 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑎 ∈ (LIdeal‘𝑃))
30 elfznn0 13003 . . . . . . . . . 10 (𝑒 ∈ (0...𝑐) → 𝑒 ∈ ℕ0)
3130adantl 484 . . . . . . . . 9 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → 𝑒 ∈ ℕ0)
322, 10, 11, 27, 28, 29, 31hbtlem6 39736 . . . . . . . 8 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ 𝑒 ∈ (0...𝑐)) → ∃𝑏 ∈ (𝒫 𝑎 ∩ Fin)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒))
3332ralrimiva 3184 . . . . . . 7 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∀𝑒 ∈ (0...𝑐)∃𝑏 ∈ (𝒫 𝑎 ∩ Fin)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒))
34 2fveq3 6677 . . . . . . . . . 10 (𝑏 = (𝑓𝑒) → ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏)) = ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒))))
3534fveq1d 6674 . . . . . . . . 9 (𝑏 = (𝑓𝑒) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))
3635sseq2d 4001 . . . . . . . 8 (𝑏 = (𝑓𝑒) → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘𝑏))‘𝑒) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒)))
3736ac6sfi 8764 . . . . . . 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 6522 . . . . . . . . . . . . 13 (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) → ran 𝑓 ⊆ (𝒫 𝑎 ∩ Fin))
4140ad2antrl 726 . . . . . . . . . . . 12 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ (𝒫 𝑎 ∩ Fin))
42 inss1 4207 . . . . . . . . . . . 12 (𝒫 𝑎 ∩ Fin) ⊆ 𝒫 𝑎
4341, 42sstrdi 3981 . . . . . . . . . . 11 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ 𝒫 𝑎)
4443unissd 4850 . . . . . . . . . 10 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 𝒫 𝑎)
45 unipw 5345 . . . . . . . . . 10 𝒫 𝑎 = 𝑎
4644, 45sseqtrdi 4019 . . . . . . . . 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 2823 . . . . . . . . . . 11 (Base‘𝑃) = (Base‘𝑃)
4948, 10lidlss 19985 . . . . . . . . . 10 (𝑎 ∈ (LIdeal‘𝑃) → 𝑎 ⊆ (Base‘𝑃))
5047, 49syl 17 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑎 ⊆ (Base‘𝑃))
5146, 50sstrd 3979 . . . . . . . 8 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ⊆ (Base‘𝑃))
52 fvex 6685 . . . . . . . . 9 (Base‘𝑃) ∈ V
5352elpw2 5250 . . . . . . . 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 6516 . . . . . . . . 9 (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) → 𝑓 Fn (0...𝑐))
57 fniunfv 7008 . . . . . . . . 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 4208 . . . . . . . . . . 11 (𝒫 𝑎 ∩ Fin) ⊆ Fin
6055ffvelrnda 6853 . . . . . . . . . . 11 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ (0...𝑐)) → (𝑓𝑔) ∈ (𝒫 𝑎 ∩ Fin))
6159, 60sseldi 3967 . . . . . . . . . 10 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ (0...𝑐)) → (𝑓𝑔) ∈ Fin)
6261ralrimiva 3184 . . . . . . . . 9 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∀𝑔 ∈ (0...𝑐)(𝑓𝑔) ∈ Fin)
63 iunfi 8814 . . . . . . . . 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 2916 . . . . . . 7 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ran 𝑓 ∈ Fin)
6654, 65elind 4173 . . . . . 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 19997 . . . . . . . . 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 20001 . . . . . . . . 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 11909 . . . . . . . . . . 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 11959 . . . . . . . . . 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 13002 . . . . . . . . . . . . . . 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 6672 . . . . . . . . . . . . . . 15 (𝑒 = 𝑔 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔))
86 2fveq3 6677 . . . . . . . . . . . . . . . . 17 (𝑒 = 𝑔 → ((RSpan‘𝑃)‘(𝑓𝑒)) = ((RSpan‘𝑃)‘(𝑓𝑔)))
8786fveq2d 6676 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑔 → ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒))) = ((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔))))
88 id 22 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑔𝑒 = 𝑔)
8987, 88fveq12d 6679 . . . . . . . . . . . . . . 15 (𝑒 = 𝑔 → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔))
9085, 89sseq12d 4002 . . . . . . . . . . . . . 14 (𝑒 = 𝑔 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔)))
9190rspcva 3623 . . . . . . . . . . . . 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 6701 . . . . . . . . . . . . . . . 16 (𝑓𝑔) ⊆ ran 𝑓
9594, 51sstrid 3980 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → (𝑓𝑔) ⊆ (Base‘𝑃))
9627, 48, 10rspcl 19997 . . . . . . . . . . . . . . 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 19998 . . . . . . . . . . . . . . . . 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 3980 . . . . . . . . . . . . . 14 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (𝑓𝑔) ⊆ ((RSpan‘𝑃)‘ ran 𝑓))
10627, 10rspssp 20001 . . . . . . . . . . . . . 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 39734 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑔𝑐)) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑔)))‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
10992, 108sstrd 3979 . . . . . . . . . . 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 12008 . . . . . . . . . . . . . . . 16 (𝑐 ∈ ℕ0𝑐 ∈ ℤ)
112111adantr 483 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐 ∈ ℤ)
113 nn0z 12008 . . . . . . . . . . . . . . . 16 (𝑔 ∈ ℕ0𝑔 ∈ ℤ)
114113ad2antrl 726 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑔 ∈ ℤ)
115 simprr 771 . . . . . . . . . . . . . . 15 ((𝑐 ∈ ℕ0 ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → 𝑐𝑔)
116 eluz2 12252 . . . . . . . . . . . . . . 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 6681 . . . . . . . . . . . . . 14 (𝑑 = 𝑔 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐)))
122121rspcva 3623 . . . . . . . . . . . . 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 11959 . . . . . . . . . . . . . . . 16 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑐 ∈ ℝ)
125124leidd 11208 . . . . . . . . . . . . . . 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 3184 . . . . . . . . . . . . . . . 16 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ∀𝑔 ∈ ℕ0 (𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔)))
128 breq1 5071 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑐 → (𝑔𝑐𝑐𝑐))
129 fveq2 6672 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))
130 fveq2 6672 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑐 → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔) = (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))
131129, 130sseq12d 4002 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑐 → ((((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔) ↔ (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐)))
132128, 131imbi12d 347 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑐 → ((𝑔𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔)) ↔ (𝑐𝑐 → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐))))
133132rspcva 3623 . . . . . . . . . . . . . . . 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 39733 . . . . . . . . . . . . 13 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
143136, 142sstrd 3979 . . . . . . . . . . . 12 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ (𝑔 ∈ ℕ0𝑐𝑔)) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
144123, 143eqsstrd 4007 . . . . . . . . . . 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 10748 . . . . . . . . 9 (((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) ∧ 𝑔 ∈ ℕ0) → (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑔) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘ ran 𝑓))‘𝑔))
147146ralrimiva 3184 . . . . . . . 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 39735 . . . . . . 7 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → ((RSpan‘𝑃)‘ ran 𝑓) = 𝑎)
149148eqcomd 2829 . . . . . 6 ((((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) ∧ (𝑓:(0...𝑐)⟶(𝒫 𝑎 ∩ Fin) ∧ ∀𝑒 ∈ (0...𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑒) ⊆ (((ldgIdlSeq‘𝑅)‘((RSpan‘𝑃)‘(𝑓𝑒)))‘𝑒))) → 𝑎 = ((RSpan‘𝑃)‘ ran 𝑓))
150 fveq2 6672 . . . . . . 7 (𝑏 = ran 𝑓 → ((RSpan‘𝑃)‘𝑏) = ((RSpan‘𝑃)‘ ran 𝑓))
151150rspceeqv 3640 . . . . . 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 1936 . . . 4 (((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) ∧ (𝑐 ∈ ℕ0 ∧ ∀𝑑 ∈ (ℤ𝑐)(((ldgIdlSeq‘𝑅)‘𝑎)‘𝑑) = (((ldgIdlSeq‘𝑅)‘𝑎)‘𝑐))) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15425, 153rexlimddv 3293 . . 3 ((𝑅 ∈ LNoeR ∧ 𝑎 ∈ (LIdeal‘𝑃)) → ∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
155154ralrimiva 3184 . 2 (𝑅 ∈ LNoeR → ∀𝑎 ∈ (LIdeal‘𝑃)∃𝑏 ∈ (𝒫 (Base‘𝑃) ∩ Fin)𝑎 = ((RSpan‘𝑃)‘𝑏))
15648, 10, 27islnr2 39721 . 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 1537  wex 1780  wcel 2114  wral 3140  wrex 3141  cin 3937  wss 3938  𝒫 cpw 4541   cuni 4840   ciun 4921   class class class wbr 5068  ran crn 5558   Fn wfn 6352  wf 6353  cfv 6357  (class class class)co 7158  Fincfn 8511  cr 10538  0cc0 10539  1c1 10540   + caddc 10542  cle 10678  0cn0 11900  cz 11984  cuz 12246  ...cfz 12895  Basecbs 16485  Ringcrg 19299  LIdealclidl 19944  RSpancrsp 19945  Poly1cpl1 20347  NoeACScnacs 39306  LNoeRclnr 39716  ldgIdlSeqcldgis 39728
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616  ax-pre-sup 10617  ax-addf 10618  ax-mulf 10619
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-int 4879  df-iun 4923  df-iin 4924  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-se 5517  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-isom 6366  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-of 7411  df-ofr 7412  df-om 7583  df-1st 7691  df-2nd 7692  df-supp 7833  df-tpos 7894  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-2o 8105  df-oadd 8108  df-er 8291  df-map 8410  df-pm 8411  df-ixp 8464  df-en 8512  df-dom 8513  df-sdom 8514  df-fin 8515  df-fsupp 8836  df-sup 8908  df-oi 8976  df-card 9370  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-nn 11641  df-2 11703  df-3 11704  df-4 11705  df-5 11706  df-6 11707  df-7 11708  df-8 11709  df-9 11710  df-n0 11901  df-z 11985  df-dec 12102  df-uz 12247  df-fz 12896  df-fzo 13037  df-seq 13373  df-hash 13694  df-struct 16487  df-ndx 16488  df-slot 16489  df-base 16491  df-sets 16492  df-ress 16493  df-plusg 16580  df-mulr 16581  df-starv 16582  df-sca 16583  df-vsca 16584  df-ip 16585  df-tset 16586  df-ple 16587  df-ocomp 16588  df-ds 16589  df-unif 16590  df-0g 16717  df-gsum 16718  df-mre 16859  df-mrc 16860  df-acs 16862  df-proset 17540  df-drs 17541  df-poset 17558  df-ipo 17764  df-mgm 17854  df-sgrp 17903  df-mnd 17914  df-mhm 17958  df-submnd 17959  df-grp 18108  df-minusg 18109  df-sbg 18110  df-mulg 18227  df-subg 18278  df-ghm 18358  df-cntz 18449  df-cmn 18910  df-abl 18911  df-mgp 19242  df-ur 19254  df-ring 19301  df-cring 19302  df-oppr 19375  df-dvdsr 19393  df-unit 19394  df-invr 19424  df-subrg 19535  df-lmod 19638  df-lss 19706  df-lsp 19746  df-sra 19946  df-rgmod 19947  df-lidl 19948  df-rsp 19949  df-rlreg 20058  df-ascl 20089  df-psr 20138  df-mvr 20139  df-mpl 20140  df-opsr 20142  df-psr1 20350  df-vr1 20351  df-ply1 20352  df-coe1 20353  df-cnfld 20548  df-mdeg 24651  df-deg1 24652  df-nacs 39307  df-lfig 39675  df-lnm 39683  df-lnr 39717  df-ldgis 39729
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator