MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  seqof Structured version   Visualization version   GIF version

Theorem seqof 12720
Description: Distribute function operation through a sequence. Note that 𝐺(𝑧) is an implicit function on 𝑧. (Contributed by Mario Carneiro, 3-Mar-2015.)
Hypotheses
Ref Expression
seqof.1 (𝜑𝐴𝑉)
seqof.2 (𝜑𝑁 ∈ (ℤ𝑀))
seqof.3 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) = (𝑧𝐴 ↦ (𝐺𝑥)))
Assertion
Ref Expression
seqof (𝜑 → (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) = (𝑧𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))
Distinct variable groups:   𝑥,𝑧,𝐴   𝑥,𝐹,𝑧   𝑥,𝐺   𝑥,𝑀,𝑧   𝑥,𝑁,𝑧   𝑥, + ,𝑧   𝜑,𝑥,𝑧
Allowed substitution hints:   𝐺(𝑧)   𝑉(𝑥,𝑧)

Proof of Theorem seqof
Dummy variables 𝑦 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 seqof.2 . . . . 5 (𝜑𝑁 ∈ (ℤ𝑀))
2 fvex 6113 . . . . . . . . 9 (𝐺𝑥) ∈ V
32rgenw 2908 . . . . . . . 8 𝑧𝐴 (𝐺𝑥) ∈ V
4 eqid 2610 . . . . . . . . 9 (𝑧𝐴 ↦ (𝐺𝑥)) = (𝑧𝐴 ↦ (𝐺𝑥))
54fnmpt 5933 . . . . . . . 8 (∀𝑧𝐴 (𝐺𝑥) ∈ V → (𝑧𝐴 ↦ (𝐺𝑥)) Fn 𝐴)
63, 5mp1i 13 . . . . . . 7 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝑧𝐴 ↦ (𝐺𝑥)) Fn 𝐴)
7 seqof.3 . . . . . . . 8 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) = (𝑧𝐴 ↦ (𝐺𝑥)))
87fneq1d 5895 . . . . . . 7 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) Fn 𝐴 ↔ (𝑧𝐴 ↦ (𝐺𝑥)) Fn 𝐴))
96, 8mpbird 246 . . . . . 6 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) Fn 𝐴)
10 fvex 6113 . . . . . . 7 (𝐹𝑥) ∈ V
11 fneq1 5893 . . . . . . 7 (𝑧 = (𝐹𝑥) → (𝑧 Fn 𝐴 ↔ (𝐹𝑥) Fn 𝐴))
1210, 11elab 3319 . . . . . 6 ((𝐹𝑥) ∈ {𝑧𝑧 Fn 𝐴} ↔ (𝐹𝑥) Fn 𝐴)
139, 12sylibr 223 . . . . 5 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ {𝑧𝑧 Fn 𝐴})
14 simprl 790 . . . . . . . . 9 ((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → 𝑥 Fn 𝐴)
15 simprr 792 . . . . . . . . 9 ((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → 𝑦 Fn 𝐴)
16 seqof.1 . . . . . . . . . 10 (𝜑𝐴𝑉)
1716adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → 𝐴𝑉)
18 inidm 3784 . . . . . . . . 9 (𝐴𝐴) = 𝐴
1914, 15, 17, 17, 18offn 6806 . . . . . . . 8 ((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → (𝑥𝑓 + 𝑦) Fn 𝐴)
2019ex 449 . . . . . . 7 (𝜑 → ((𝑥 Fn 𝐴𝑦 Fn 𝐴) → (𝑥𝑓 + 𝑦) Fn 𝐴))
21 vex 3176 . . . . . . . . 9 𝑥 ∈ V
22 fneq1 5893 . . . . . . . . 9 (𝑧 = 𝑥 → (𝑧 Fn 𝐴𝑥 Fn 𝐴))
2321, 22elab 3319 . . . . . . . 8 (𝑥 ∈ {𝑧𝑧 Fn 𝐴} ↔ 𝑥 Fn 𝐴)
24 vex 3176 . . . . . . . . 9 𝑦 ∈ V
25 fneq1 5893 . . . . . . . . 9 (𝑧 = 𝑦 → (𝑧 Fn 𝐴𝑦 Fn 𝐴))
2624, 25elab 3319 . . . . . . . 8 (𝑦 ∈ {𝑧𝑧 Fn 𝐴} ↔ 𝑦 Fn 𝐴)
2723, 26anbi12i 729 . . . . . . 7 ((𝑥 ∈ {𝑧𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧𝑧 Fn 𝐴}) ↔ (𝑥 Fn 𝐴𝑦 Fn 𝐴))
28 ovex 6577 . . . . . . . 8 (𝑥𝑓 + 𝑦) ∈ V
29 fneq1 5893 . . . . . . . 8 (𝑧 = (𝑥𝑓 + 𝑦) → (𝑧 Fn 𝐴 ↔ (𝑥𝑓 + 𝑦) Fn 𝐴))
3028, 29elab 3319 . . . . . . 7 ((𝑥𝑓 + 𝑦) ∈ {𝑧𝑧 Fn 𝐴} ↔ (𝑥𝑓 + 𝑦) Fn 𝐴)
3120, 27, 303imtr4g 284 . . . . . 6 (𝜑 → ((𝑥 ∈ {𝑧𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧𝑧 Fn 𝐴}) → (𝑥𝑓 + 𝑦) ∈ {𝑧𝑧 Fn 𝐴}))
3231imp 444 . . . . 5 ((𝜑 ∧ (𝑥 ∈ {𝑧𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧𝑧 Fn 𝐴})) → (𝑥𝑓 + 𝑦) ∈ {𝑧𝑧 Fn 𝐴})
331, 13, 32seqcl 12683 . . . 4 (𝜑 → (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) ∈ {𝑧𝑧 Fn 𝐴})
34 fvex 6113 . . . . 5 (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) ∈ V
35 fneq1 5893 . . . . 5 (𝑧 = (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) → (𝑧 Fn 𝐴 ↔ (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) Fn 𝐴))
3634, 35elab 3319 . . . 4 ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) ∈ {𝑧𝑧 Fn 𝐴} ↔ (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) Fn 𝐴)
3733, 36sylib 207 . . 3 (𝜑 → (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) Fn 𝐴)
38 dffn5 6151 . . 3 ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) Fn 𝐴 ↔ (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) = (𝑧𝐴 ↦ ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧)))
3937, 38sylib 207 . 2 (𝜑 → (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) = (𝑧𝐴 ↦ ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧)))
40 fveq1 6102 . . . . . 6 (𝑤 = (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) → (𝑤𝑧) = ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧))
41 eqid 2610 . . . . . 6 (𝑤 ∈ V ↦ (𝑤𝑧)) = (𝑤 ∈ V ↦ (𝑤𝑧))
42 fvex 6113 . . . . . 6 ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧) ∈ V
4340, 41, 42fvmpt 6191 . . . . 5 ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) ∈ V → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)) = ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧))
4434, 43mp1i 13 . . . 4 ((𝜑𝑧𝐴) → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)) = ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧))
4532adantlr 747 . . . . 5 (((𝜑𝑧𝐴) ∧ (𝑥 ∈ {𝑧𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧𝑧 Fn 𝐴})) → (𝑥𝑓 + 𝑦) ∈ {𝑧𝑧 Fn 𝐴})
4613adantlr 747 . . . . 5 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ {𝑧𝑧 Fn 𝐴})
471adantr 480 . . . . 5 ((𝜑𝑧𝐴) → 𝑁 ∈ (ℤ𝑀))
48 eqidd 2611 . . . . . . . . 9 (((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) ∧ 𝑧𝐴) → (𝑥𝑧) = (𝑥𝑧))
49 eqidd 2611 . . . . . . . . 9 (((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) ∧ 𝑧𝐴) → (𝑦𝑧) = (𝑦𝑧))
5014, 15, 17, 17, 18, 48, 49ofval 6804 . . . . . . . 8 (((𝜑 ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) ∧ 𝑧𝐴) → ((𝑥𝑓 + 𝑦)‘𝑧) = ((𝑥𝑧) + (𝑦𝑧)))
5150an32s 842 . . . . . . 7 (((𝜑𝑧𝐴) ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → ((𝑥𝑓 + 𝑦)‘𝑧) = ((𝑥𝑧) + (𝑦𝑧)))
52 fveq1 6102 . . . . . . . . 9 (𝑤 = (𝑥𝑓 + 𝑦) → (𝑤𝑧) = ((𝑥𝑓 + 𝑦)‘𝑧))
53 fvex 6113 . . . . . . . . 9 ((𝑥𝑓 + 𝑦)‘𝑧) ∈ V
5452, 41, 53fvmpt 6191 . . . . . . . 8 ((𝑥𝑓 + 𝑦) ∈ V → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝑥𝑓 + 𝑦)) = ((𝑥𝑓 + 𝑦)‘𝑧))
5528, 54ax-mp 5 . . . . . . 7 ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝑥𝑓 + 𝑦)) = ((𝑥𝑓 + 𝑦)‘𝑧)
56 fveq1 6102 . . . . . . . . . 10 (𝑤 = 𝑥 → (𝑤𝑧) = (𝑥𝑧))
57 fvex 6113 . . . . . . . . . 10 (𝑥𝑧) ∈ V
5856, 41, 57fvmpt 6191 . . . . . . . . 9 (𝑥 ∈ V → ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑥) = (𝑥𝑧))
5921, 58ax-mp 5 . . . . . . . 8 ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑥) = (𝑥𝑧)
60 fveq1 6102 . . . . . . . . . 10 (𝑤 = 𝑦 → (𝑤𝑧) = (𝑦𝑧))
61 fvex 6113 . . . . . . . . . 10 (𝑦𝑧) ∈ V
6260, 41, 61fvmpt 6191 . . . . . . . . 9 (𝑦 ∈ V → ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑦) = (𝑦𝑧))
6324, 62ax-mp 5 . . . . . . . 8 ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑦) = (𝑦𝑧)
6459, 63oveq12i 6561 . . . . . . 7 (((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑦)) = ((𝑥𝑧) + (𝑦𝑧))
6551, 55, 643eqtr4g 2669 . . . . . 6 (((𝜑𝑧𝐴) ∧ (𝑥 Fn 𝐴𝑦 Fn 𝐴)) → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝑥𝑓 + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑦)))
6627, 65sylan2b 491 . . . . 5 (((𝜑𝑧𝐴) ∧ (𝑥 ∈ {𝑧𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧𝑧 Fn 𝐴})) → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝑥𝑓 + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤𝑧))‘𝑦)))
67 fveq1 6102 . . . . . . . 8 (𝑤 = (𝐹𝑥) → (𝑤𝑧) = ((𝐹𝑥)‘𝑧))
68 fvex 6113 . . . . . . . 8 ((𝐹𝑥)‘𝑧) ∈ V
6967, 41, 68fvmpt 6191 . . . . . . 7 ((𝐹𝑥) ∈ V → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝐹𝑥)) = ((𝐹𝑥)‘𝑧))
7010, 69ax-mp 5 . . . . . 6 ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝐹𝑥)) = ((𝐹𝑥)‘𝑧)
717adantlr 747 . . . . . . . 8 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) = (𝑧𝐴 ↦ (𝐺𝑥)))
7271fveq1d 6105 . . . . . . 7 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥)‘𝑧) = ((𝑧𝐴 ↦ (𝐺𝑥))‘𝑧))
73 simplr 788 . . . . . . . 8 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑧𝐴)
744fvmpt2 6200 . . . . . . . 8 ((𝑧𝐴 ∧ (𝐺𝑥) ∈ V) → ((𝑧𝐴 ↦ (𝐺𝑥))‘𝑧) = (𝐺𝑥))
7573, 2, 74sylancl 693 . . . . . . 7 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑧𝐴 ↦ (𝐺𝑥))‘𝑧) = (𝐺𝑥))
7672, 75eqtrd 2644 . . . . . 6 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥)‘𝑧) = (𝐺𝑥))
7770, 76syl5eq 2656 . . . . 5 (((𝜑𝑧𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(𝐹𝑥)) = (𝐺𝑥))
7845, 46, 47, 66, 77seqhomo 12710 . . . 4 ((𝜑𝑧𝐴) → ((𝑤 ∈ V ↦ (𝑤𝑧))‘(seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)) = (seq𝑀( + , 𝐺)‘𝑁))
7944, 78eqtr3d 2646 . . 3 ((𝜑𝑧𝐴) → ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧) = (seq𝑀( + , 𝐺)‘𝑁))
8079mpteq2dva 4672 . 2 (𝜑 → (𝑧𝐴 ↦ ((seq𝑀( ∘𝑓 + , 𝐹)‘𝑁)‘𝑧)) = (𝑧𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))
8139, 80eqtrd 2644 1 (𝜑 → (seq𝑀( ∘𝑓 + , 𝐹)‘𝑁) = (𝑧𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 383   = wceq 1475  wcel 1977  {cab 2596  wral 2896  Vcvv 3173  cmpt 4643   Fn wfn 5799  cfv 5804  (class class class)co 6549  𝑓 cof 6793  cuz 11563  ...cfz 12197  seqcseq 12663
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-of 6795  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-nn 10898  df-n0 11170  df-z 11255  df-uz 11564  df-fz 12198  df-seq 12664
This theorem is referenced by:  seqof2  12721  mtest  23962  pserulm  23980  knoppcnlem7  31659
  Copyright terms: Public domain W3C validator