Theorem seqcl 14028

Description: Closure properties of the recursive sequence builder. (Contributed by Mario Carneiro, 2-Jul-2013.) (Revised by Mario Carneiro, 27-May-2014.)

Hypotheses

Ref	Expression
seqcl.1	⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
seqcl.2	⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ 𝑆)
seqcl.3	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)

Assertion

Ref	Expression
seqcl	⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑁) ∈ 𝑆)

Distinct variable groups:   𝑥,𝑦, +   𝑥,𝐹,𝑦   𝑥,𝑀,𝑦   𝜑,𝑥,𝑦   𝑥,𝑆,𝑦   𝑥,𝑁

Allowed substitution hint:   𝑁(𝑦)

Proof of Theorem seqcl

Step	Hyp	Ref	Expression
1		fveq2 6861	. . . 4 ⊢ (𝑥 = 𝑀 → (𝐹‘𝑥) = (𝐹‘𝑀))
2	1	eleq1d 2846	. . 3 ⊢ (𝑥 = 𝑀 → ((𝐹‘𝑥) ∈ 𝑆 ↔ (𝐹‘𝑀) ∈ 𝑆))
3		seqcl.2	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ 𝑆)
4	3	ralrimiva 3153	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ (𝑀...𝑁)(𝐹‘𝑥) ∈ 𝑆)
5		seqcl.1	. . . 4 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
6		eluzfz1 13529	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → 𝑀 ∈ (𝑀...𝑁))
7	5, 6	syl 17	. . 3 ⊢ (𝜑 → 𝑀 ∈ (𝑀...𝑁))
8	2, 4, 7	rspcdva 3581	. 2 ⊢ (𝜑 → (𝐹‘𝑀) ∈ 𝑆)
9		seqcl.3	. 2 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
10		eluzel2 12837	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → 𝑀 ∈ ℤ)
11	5, 10	syl 17	. . . . 5 ⊢ (𝜑 → 𝑀 ∈ ℤ)
12		fzp1ss 13573	. . . . 5 ⊢ (𝑀 ∈ ℤ → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
13	11, 12	syl 17	. . . 4 ⊢ (𝜑 → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
14	13	sselda 3934	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑀 + 1)...𝑁)) → 𝑥 ∈ (𝑀...𝑁))
15	14, 3	syldan 600	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑀 + 1)...𝑁)) → (𝐹‘𝑥) ∈ 𝑆)
16	8, 9, 5, 15	seqcl2 14026	1 ⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑁) ∈ 𝑆)

Syntax hints:   → wi 4   ∧ wa 399   = wceq 1559   ∈ wcel 2141   ⊆ wss 3902  ‘cfv 6515  (class class class)co 7390  1c1 11067   + caddc 11069  ℤcz 12561  ℤ_≥cuz 12832  ...cfz 13505  seqcseq 14007

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

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6282  df-ord 6343  df-on 6344  df-lim 6345  df-suc 6346  df-iota 6471  df-fun 6517  df-fn 6518  df-f 6519  df-f1 6520  df-fo 6521  df-f1o 6522  df-fv 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7841  df-1st 7964  df-2nd 7965  df-frecs 8255  df-wrecs 8286  df-recs 8335  df-rdg 8374  df-er 8671  df-en 8921  df-dom 8922  df-sdom 8923  df-pnf 11211  df-mnf 11212  df-xr 11213  df-ltxr 11214  df-le 11215  df-sub 11409  df-neg 11410  df-nn 12204  df-n0 12475  df-z 12562  df-uz 12833  df-fz 13506  df-seq 14008

This theorem is referenced by:  sermono  14040  seqsplit  14041  seqcaopr2  14044  seqf1olem2a  14046  seqf1olem2  14048  seqid3  14052  seqhomo  14055  seqz  14056  seqdistr  14059  serge0  14062  serle  14063  seqof  14065  seqcoll  14470  seqcoll2  14471  fsumcl2lem  15748  prodfn0  15914  prodfrec  15915  prodfdiv  15916  fprodcl2lem  15970  eulerthlem2  16807  gsumwsubmcl  18861  mulgnnsubcl  19118  gsumzcl2  19940  gsumzaddlem  19951  gsummptfzcl  19999  lgscllem  27355  lgsval4a  27370  lgsneg  27372  lgsdir  27383  lgsdilem2  27384  lgsdi  27385  lgsne0  27386  gsumncl  34797  faclim  36056  knoppcnlem8  36898  mblfinlem2  38117  fmul01  46116  fmulcl  46117  fmuldfeq  46119  fmul01lt1lem1  46120  fmul01lt1lem2  46121  stoweidlem3  46537  stoweidlem42  46576  stoweidlem48  46582  wallispilem4  46602  wallispi  46604  wallispi2lem1  46605  wallispi2  46607  stirlinglem5  46612  stirlinglem7  46614  stirlinglem10  46617  sge0isum  46961