ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  fsum3 GIF version

Theorem fsum3 11409
Description: The value of a sum over a nonempty finite set. (Contributed by Jim Kingdon, 10-Oct-2022.)
Hypotheses
Ref Expression
fsum.1 (π‘˜ = (πΉβ€˜π‘›) β†’ 𝐡 = 𝐢)
fsum.2 (πœ‘ β†’ 𝑀 ∈ β„•)
fsum.3 (πœ‘ β†’ 𝐹:(1...𝑀)–1-1-onto→𝐴)
fsum.4 ((πœ‘ ∧ π‘˜ ∈ 𝐴) β†’ 𝐡 ∈ β„‚)
fsum.5 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ (πΊβ€˜π‘›) = 𝐢)
Assertion
Ref Expression
fsum3 (πœ‘ β†’ Ξ£π‘˜ ∈ 𝐴 𝐡 = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
Distinct variable groups:   𝐴,π‘˜,𝑛   𝐡,𝑛   𝐢,π‘˜   π‘˜,𝐹,𝑛   π‘˜,𝐺,𝑛   π‘˜,𝑀,𝑛   πœ‘,π‘˜,𝑛
Allowed substitution hints:   𝐡(π‘˜)   𝐢(𝑛)

Proof of Theorem fsum3
Dummy variables 𝑓 𝑖 𝑗 π‘š 𝑒 π‘₯ 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-sumdc 11376 . 2 Ξ£π‘˜ ∈ 𝐴 𝐡 = (β„©π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
2 nnuz 9577 . . . . 5 β„• = (β„€β‰₯β€˜1)
3 1zzd 9294 . . . . 5 (πœ‘ β†’ 1 ∈ β„€)
4 elnnuz 9578 . . . . . 6 (π‘₯ ∈ β„• ↔ π‘₯ ∈ (β„€β‰₯β€˜1))
52eqimss2i 3224 . . . . . . . . . 10 (β„€β‰₯β€˜1) βŠ† β„•
65sseli 3163 . . . . . . . . 9 (π‘₯ ∈ (β„€β‰₯β€˜1) β†’ π‘₯ ∈ β„•)
76adantl 277 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ π‘₯ ∈ β„•)
8 fveq2 5527 . . . . . . . . . . 11 (𝑛 = π‘₯ β†’ (πΊβ€˜π‘›) = (πΊβ€˜π‘₯))
98eleq1d 2256 . . . . . . . . . 10 (𝑛 = π‘₯ β†’ ((πΊβ€˜π‘›) ∈ β„‚ ↔ (πΊβ€˜π‘₯) ∈ β„‚))
10 fsum.1 . . . . . . . . . . . 12 (π‘˜ = (πΉβ€˜π‘›) β†’ 𝐡 = 𝐢)
11 fsum.2 . . . . . . . . . . . 12 (πœ‘ β†’ 𝑀 ∈ β„•)
12 fsum.3 . . . . . . . . . . . 12 (πœ‘ β†’ 𝐹:(1...𝑀)–1-1-onto→𝐴)
13 fsum.4 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘˜ ∈ 𝐴) β†’ 𝐡 ∈ β„‚)
14 fsum.5 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ (πΊβ€˜π‘›) = 𝐢)
1510, 11, 12, 13, 14fsumgcl 11408 . . . . . . . . . . 11 (πœ‘ β†’ βˆ€π‘› ∈ (1...𝑀)(πΊβ€˜π‘›) ∈ β„‚)
1615ad2antrr 488 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ βˆ€π‘› ∈ (1...𝑀)(πΊβ€˜π‘›) ∈ β„‚)
17 1zzd 9294 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ 1 ∈ β„€)
1811nnzd 9388 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝑀 ∈ β„€)
1918ad2antrr 488 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ 𝑀 ∈ β„€)
20 eluzelz 9551 . . . . . . . . . . . . 13 (π‘₯ ∈ (β„€β‰₯β€˜1) β†’ π‘₯ ∈ β„€)
2120ad2antlr 489 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ π‘₯ ∈ β„€)
2217, 19, 213jca 1178 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ (1 ∈ β„€ ∧ 𝑀 ∈ β„€ ∧ π‘₯ ∈ β„€))
23 eluzle 9554 . . . . . . . . . . . . 13 (π‘₯ ∈ (β„€β‰₯β€˜1) β†’ 1 ≀ π‘₯)
2423ad2antlr 489 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ 1 ≀ π‘₯)
25 simpr 110 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ π‘₯ ≀ 𝑀)
2624, 25jca 306 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ (1 ≀ π‘₯ ∧ π‘₯ ≀ 𝑀))
27 elfz2 10029 . . . . . . . . . . 11 (π‘₯ ∈ (1...𝑀) ↔ ((1 ∈ β„€ ∧ 𝑀 ∈ β„€ ∧ π‘₯ ∈ β„€) ∧ (1 ≀ π‘₯ ∧ π‘₯ ≀ 𝑀)))
2822, 26, 27sylanbrc 417 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ π‘₯ ∈ (1...𝑀))
299, 16, 28rspcdva 2858 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ (πΊβ€˜π‘₯) ∈ β„‚)
30 0cnd 7964 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ Β¬ π‘₯ ≀ 𝑀) β†’ 0 ∈ β„‚)
317nnzd 9388 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ π‘₯ ∈ β„€)
3218adantr 276 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ 𝑀 ∈ β„€)
33 zdcle 9343 . . . . . . . . . 10 ((π‘₯ ∈ β„€ ∧ 𝑀 ∈ β„€) β†’ DECID π‘₯ ≀ 𝑀)
3431, 32, 33syl2anc 411 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ DECID π‘₯ ≀ 𝑀)
3529, 30, 34ifcldadc 3575 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ if(π‘₯ ≀ 𝑀, (πΊβ€˜π‘₯), 0) ∈ β„‚)
36 breq1 4018 . . . . . . . . . 10 (𝑛 = π‘₯ β†’ (𝑛 ≀ 𝑀 ↔ π‘₯ ≀ 𝑀))
3736, 8ifbieq1d 3568 . . . . . . . . 9 (𝑛 = π‘₯ β†’ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0) = if(π‘₯ ≀ 𝑀, (πΊβ€˜π‘₯), 0))
38 eqid 2187 . . . . . . . . 9 (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)) = (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))
3937, 38fvmptg 5605 . . . . . . . 8 ((π‘₯ ∈ β„• ∧ if(π‘₯ ≀ 𝑀, (πΊβ€˜π‘₯), 0) ∈ β„‚) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘₯) = if(π‘₯ ≀ 𝑀, (πΊβ€˜π‘₯), 0))
407, 35, 39syl2anc 411 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘₯) = if(π‘₯ ≀ 𝑀, (πΊβ€˜π‘₯), 0))
4140, 35eqeltrd 2264 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘₯) ∈ β„‚)
424, 41sylan2b 287 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ β„•) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘₯) ∈ β„‚)
432, 3, 42serf 10488 . . . 4 (πœ‘ β†’ seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))):β„•βŸΆβ„‚)
4443, 11ffvelcdmd 5665 . . 3 (πœ‘ β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) ∈ β„‚)
4544adantr 276 . . . . . . . 8 ((πœ‘ ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) ∈ β„‚)
46 eleq1w 2248 . . . . . . . . . . . . 13 (𝑛 = 𝑗 β†’ (𝑛 ∈ 𝐴 ↔ 𝑗 ∈ 𝐴))
47 csbeq1 3072 . . . . . . . . . . . . 13 (𝑛 = 𝑗 β†’ ⦋𝑛 / π‘˜β¦Œπ΅ = ⦋𝑗 / π‘˜β¦Œπ΅)
4846, 47ifbieq1d 3568 . . . . . . . . . . . 12 (𝑛 = 𝑗 β†’ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0) = if(𝑗 ∈ 𝐴, ⦋𝑗 / π‘˜β¦Œπ΅, 0))
4948cbvmptv 4111 . . . . . . . . . . 11 (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0)) = (𝑗 ∈ β„€ ↦ if(𝑗 ∈ 𝐴, ⦋𝑗 / π‘˜β¦Œπ΅, 0))
5013ralrimiva 2560 . . . . . . . . . . . 12 (πœ‘ β†’ βˆ€π‘˜ ∈ 𝐴 𝐡 ∈ β„‚)
51 nfcsb1v 3102 . . . . . . . . . . . . . 14 β„²π‘˜β¦‹π‘— / π‘˜β¦Œπ΅
5251nfel1 2340 . . . . . . . . . . . . 13 β„²π‘˜β¦‹π‘— / π‘˜β¦Œπ΅ ∈ β„‚
53 csbeq1a 3078 . . . . . . . . . . . . . 14 (π‘˜ = 𝑗 β†’ 𝐡 = ⦋𝑗 / π‘˜β¦Œπ΅)
5453eleq1d 2256 . . . . . . . . . . . . 13 (π‘˜ = 𝑗 β†’ (𝐡 ∈ β„‚ ↔ ⦋𝑗 / π‘˜β¦Œπ΅ ∈ β„‚))
5552, 54rspc 2847 . . . . . . . . . . . 12 (𝑗 ∈ 𝐴 β†’ (βˆ€π‘˜ ∈ 𝐴 𝐡 ∈ β„‚ β†’ ⦋𝑗 / π‘˜β¦Œπ΅ ∈ β„‚))
5650, 55mpan9 281 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ 𝐴) β†’ ⦋𝑗 / π‘˜β¦Œπ΅ ∈ β„‚)
57 breq1 4018 . . . . . . . . . . . . 13 (𝑛 = 𝑖 β†’ (𝑛 ≀ (β™―β€˜π΄) ↔ 𝑖 ≀ (β™―β€˜π΄)))
58 fveq2 5527 . . . . . . . . . . . . . . 15 (𝑛 = 𝑖 β†’ (π‘“β€˜π‘›) = (π‘“β€˜π‘–))
5958csbeq1d 3076 . . . . . . . . . . . . . 14 (𝑛 = 𝑖 β†’ ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅ = ⦋(π‘“β€˜π‘–) / π‘˜β¦Œπ΅)
60 csbco 3079 . . . . . . . . . . . . . 14 ⦋(π‘“β€˜π‘–) / π‘—β¦Œβ¦‹π‘— / π‘˜β¦Œπ΅ = ⦋(π‘“β€˜π‘–) / π‘˜β¦Œπ΅
6159, 60eqtr4di 2238 . . . . . . . . . . . . 13 (𝑛 = 𝑖 β†’ ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅ = ⦋(π‘“β€˜π‘–) / π‘—β¦Œβ¦‹π‘— / π‘˜β¦Œπ΅)
6257, 61ifbieq1d 3568 . . . . . . . . . . . 12 (𝑛 = 𝑖 β†’ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0) = if(𝑖 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘–) / π‘—β¦Œβ¦‹π‘— / π‘˜β¦Œπ΅, 0))
6362cbvmptv 4111 . . . . . . . . . . 11 (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)) = (𝑖 ∈ β„• ↦ if(𝑖 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘–) / π‘—β¦Œβ¦‹π‘— / π‘˜β¦Œπ΅, 0))
6449, 56, 63, 63summodc 11405 . . . . . . . . . 10 (πœ‘ β†’ βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
65 eleq1w 2248 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑗 β†’ (𝑒 ∈ 𝐴 ↔ 𝑗 ∈ 𝐴))
6665dcbid 839 . . . . . . . . . . . . . . 15 (𝑒 = 𝑗 β†’ (DECID 𝑒 ∈ 𝐴 ↔ DECID 𝑗 ∈ 𝐴))
6766cbvralv 2715 . . . . . . . . . . . . . 14 (βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ↔ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴)
68673anbi2i 1192 . . . . . . . . . . . . 13 ((𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ↔ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯))
6968rexbii 2494 . . . . . . . . . . . 12 (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ↔ βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯))
70 1zzd 9294 . . . . . . . . . . . . . . . . . . . . . . . 24 (π‘š ∈ β„• β†’ 1 ∈ β„€)
71 nnz 9286 . . . . . . . . . . . . . . . . . . . . . . . 24 (π‘š ∈ β„• β†’ π‘š ∈ β„€)
7270, 71fzfigd 10445 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘š ∈ β„• β†’ (1...π‘š) ∈ Fin)
73 fihasheqf1oi 10781 . . . . . . . . . . . . . . . . . . . . . . 23 (((1...π‘š) ∈ Fin ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (β™―β€˜(1...π‘š)) = (β™―β€˜π΄))
7472, 73sylan 283 . . . . . . . . . . . . . . . . . . . . . 22 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (β™―β€˜(1...π‘š)) = (β™―β€˜π΄))
75 nnnn0 9197 . . . . . . . . . . . . . . . . . . . . . . . 24 (π‘š ∈ β„• β†’ π‘š ∈ β„•0)
7675adantr 276 . . . . . . . . . . . . . . . . . . . . . . 23 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ π‘š ∈ β„•0)
77 hashfz1 10777 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘š ∈ β„•0 β†’ (β™―β€˜(1...π‘š)) = π‘š)
7876, 77syl 14 . . . . . . . . . . . . . . . . . . . . . 22 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (β™―β€˜(1...π‘š)) = π‘š)
7974, 78eqtr3d 2222 . . . . . . . . . . . . . . . . . . . . 21 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (β™―β€˜π΄) = π‘š)
8079breq2d 4027 . . . . . . . . . . . . . . . . . . . 20 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (𝑛 ≀ (β™―β€˜π΄) ↔ 𝑛 ≀ π‘š))
8180ifbid 3567 . . . . . . . . . . . . . . . . . . 19 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0) = if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))
8281mpteq2dv 4106 . . . . . . . . . . . . . . . . . 18 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)) = (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))
8382seqeq3d 10467 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))) = seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))))
8483fveq1d 5529 . . . . . . . . . . . . . . . 16 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))
8584eqeq2d 2199 . . . . . . . . . . . . . . 15 ((π‘š ∈ β„• ∧ 𝑓:(1...π‘š)–1-1-onto→𝐴) β†’ (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š) ↔ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))
8685pm5.32da 452 . . . . . . . . . . . . . 14 (π‘š ∈ β„• β†’ ((𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ (𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
8786exbidv 1835 . . . . . . . . . . . . 13 (π‘š ∈ β„• β†’ (βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
8887rexbiia 2502 . . . . . . . . . . . 12 (βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))
8969, 88orbi12i 765 . . . . . . . . . . 11 ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ↔ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
9089mobii 2073 . . . . . . . . . 10 (βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘’ ∈ (β„€β‰₯β€˜π‘š)DECID 𝑒 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ (β™―β€˜π΄), ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ↔ βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
9164, 90sylib 122 . . . . . . . . 9 (πœ‘ β†’ βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
9291adantr 276 . . . . . . . 8 ((πœ‘ ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) β†’ βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
93 simpr 110 . . . . . . . 8 ((πœ‘ ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) β†’ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
94 f1of 5473 . . . . . . . . . . . . . 14 (𝐹:(1...𝑀)–1-1-onto→𝐴 β†’ 𝐹:(1...𝑀)⟢𝐴)
9512, 94syl 14 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝐹:(1...𝑀)⟢𝐴)
963, 18fzfigd 10445 . . . . . . . . . . . . 13 (πœ‘ β†’ (1...𝑀) ∈ Fin)
97 fex 5758 . . . . . . . . . . . . 13 ((𝐹:(1...𝑀)⟢𝐴 ∧ (1...𝑀) ∈ Fin) β†’ 𝐹 ∈ V)
9895, 96, 97syl2anc 411 . . . . . . . . . . . 12 (πœ‘ β†’ 𝐹 ∈ V)
9911, 2eleqtrdi 2280 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝑀 ∈ (β„€β‰₯β€˜1))
10014ralrimiva 2560 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ βˆ€π‘› ∈ (1...𝑀)(πΊβ€˜π‘›) = 𝐢)
101 nfv 1538 . . . . . . . . . . . . . . . . . 18 β„²π‘˜(πΊβ€˜π‘›) = 𝐢
102 nfcsb1v 3102 . . . . . . . . . . . . . . . . . . 19 β„²π‘›β¦‹π‘˜ / π‘›β¦ŒπΆ
103102nfeq2 2341 . . . . . . . . . . . . . . . . . 18 Ⅎ𝑛(πΊβ€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ
104 fveq2 5527 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘˜ β†’ (πΊβ€˜π‘›) = (πΊβ€˜π‘˜))
105 csbeq1a 3078 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘˜ β†’ 𝐢 = β¦‹π‘˜ / π‘›β¦ŒπΆ)
106104, 105eqeq12d 2202 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘˜ β†’ ((πΊβ€˜π‘›) = 𝐢 ↔ (πΊβ€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ))
107101, 103, 106cbvral 2711 . . . . . . . . . . . . . . . . 17 (βˆ€π‘› ∈ (1...𝑀)(πΊβ€˜π‘›) = 𝐢 ↔ βˆ€π‘˜ ∈ (1...𝑀)(πΊβ€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ)
108100, 107sylib 122 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ βˆ€π‘˜ ∈ (1...𝑀)(πΊβ€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ)
109108r19.21bi 2575 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ (πΊβ€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ)
110 elfznn 10068 . . . . . . . . . . . . . . . . . 18 (π‘˜ ∈ (1...𝑀) β†’ π‘˜ ∈ β„•)
111110adantl 277 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ π‘˜ ∈ β„•)
112 elfzle2 10042 . . . . . . . . . . . . . . . . . . . 20 (π‘˜ ∈ (1...𝑀) β†’ π‘˜ ≀ 𝑀)
113112adantl 277 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ π‘˜ ≀ 𝑀)
114113iftrued 3553 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0) = (πΊβ€˜π‘˜))
115104eleq1d 2256 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘˜ β†’ ((πΊβ€˜π‘›) ∈ β„‚ ↔ (πΊβ€˜π‘˜) ∈ β„‚))
11615adantr 276 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ βˆ€π‘› ∈ (1...𝑀)(πΊβ€˜π‘›) ∈ β„‚)
117 simpr 110 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ π‘˜ ∈ (1...𝑀))
118115, 116, 117rspcdva 2858 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ (πΊβ€˜π‘˜) ∈ β„‚)
119114, 118eqeltrd 2264 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0) ∈ β„‚)
120 breq1 4018 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘˜ β†’ (𝑛 ≀ 𝑀 ↔ π‘˜ ≀ 𝑀))
121120, 104ifbieq1d 3568 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘˜ β†’ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0) = if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0))
122121, 38fvmptg 5605 . . . . . . . . . . . . . . . . 17 ((π‘˜ ∈ β„• ∧ if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0) ∈ β„‚) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘˜) = if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0))
123111, 119, 122syl2anc 411 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘˜) = if(π‘˜ ≀ 𝑀, (πΊβ€˜π‘˜), 0))
124123, 114eqtrd 2220 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘˜) = (πΊβ€˜π‘˜))
125113iftrued 3553 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0) = β¦‹π‘˜ / π‘›β¦ŒπΆ)
12695ffvelcdmda 5664 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ (πΉβ€˜π‘›) ∈ 𝐴)
12710adantl 277 . . . . . . . . . . . . . . . . . . . . . . 23 (((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) ∧ π‘˜ = (πΉβ€˜π‘›)) β†’ 𝐡 = 𝐢)
128126, 127csbied 3115 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ = 𝐢)
12950adantr 276 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ βˆ€π‘˜ ∈ 𝐴 𝐡 ∈ β„‚)
130 nfcsb1v 3102 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜β¦‹(πΉβ€˜π‘›) / π‘˜β¦Œπ΅
131130nfel1 2340 . . . . . . . . . . . . . . . . . . . . . . . 24 β„²π‘˜β¦‹(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ ∈ β„‚
132 csbeq1a 3078 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘˜ = (πΉβ€˜π‘›) β†’ 𝐡 = ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅)
133132eleq1d 2256 . . . . . . . . . . . . . . . . . . . . . . . 24 (π‘˜ = (πΉβ€˜π‘›) β†’ (𝐡 ∈ β„‚ ↔ ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ ∈ β„‚))
134131, 133rspc 2847 . . . . . . . . . . . . . . . . . . . . . . 23 ((πΉβ€˜π‘›) ∈ 𝐴 β†’ (βˆ€π‘˜ ∈ 𝐴 𝐡 ∈ β„‚ β†’ ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ ∈ β„‚))
135126, 129, 134sylc 62 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ ∈ β„‚)
136128, 135eqeltrrd 2265 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑛 ∈ (1...𝑀)) β†’ 𝐢 ∈ β„‚)
137136ralrimiva 2560 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ βˆ€π‘› ∈ (1...𝑀)𝐢 ∈ β„‚)
138 nfv 1538 . . . . . . . . . . . . . . . . . . . . 21 β„²π‘˜ 𝐢 ∈ β„‚
139102nfel1 2340 . . . . . . . . . . . . . . . . . . . . 21 β„²π‘›β¦‹π‘˜ / π‘›β¦ŒπΆ ∈ β„‚
140105eleq1d 2256 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = π‘˜ β†’ (𝐢 ∈ β„‚ ↔ β¦‹π‘˜ / π‘›β¦ŒπΆ ∈ β„‚))
141138, 139, 140cbvral 2711 . . . . . . . . . . . . . . . . . . . 20 (βˆ€π‘› ∈ (1...𝑀)𝐢 ∈ β„‚ ↔ βˆ€π‘˜ ∈ (1...𝑀)β¦‹π‘˜ / π‘›β¦ŒπΆ ∈ β„‚)
142137, 141sylib 122 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ βˆ€π‘˜ ∈ (1...𝑀)β¦‹π‘˜ / π‘›β¦ŒπΆ ∈ β„‚)
143142r19.21bi 2575 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ β¦‹π‘˜ / π‘›β¦ŒπΆ ∈ β„‚)
144125, 143eqeltrd 2264 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0) ∈ β„‚)
145 nfcv 2329 . . . . . . . . . . . . . . . . . 18 β„²π‘›π‘˜
146 nfv 1538 . . . . . . . . . . . . . . . . . . 19 Ⅎ𝑛 π‘˜ ≀ 𝑀
147 nfcv 2329 . . . . . . . . . . . . . . . . . . 19 Ⅎ𝑛0
148146, 102, 147nfif 3574 . . . . . . . . . . . . . . . . . 18 Ⅎ𝑛if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0)
149120, 105ifbieq1d 3568 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘˜ β†’ if(𝑛 ≀ 𝑀, 𝐢, 0) = if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0))
150 eqid 2187 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)) = (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))
151145, 148, 149, 150fvmptf 5621 . . . . . . . . . . . . . . . . 17 ((π‘˜ ∈ β„• ∧ if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0) ∈ β„‚) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘˜) = if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0))
152111, 144, 151syl2anc 411 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘˜) = if(π‘˜ ≀ 𝑀, β¦‹π‘˜ / π‘›β¦ŒπΆ, 0))
153152, 125eqtrd 2220 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘˜) = β¦‹π‘˜ / π‘›β¦ŒπΆ)
154109, 124, 1533eqtr4d 2230 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘˜ ∈ (1...𝑀)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0))β€˜π‘˜) = ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘˜))
155137ad2antrr 488 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ βˆ€π‘› ∈ (1...𝑀)𝐢 ∈ β„‚)
156 nfcsb1v 3102 . . . . . . . . . . . . . . . . . . . 20 Ⅎ𝑛⦋π‘₯ / π‘›β¦ŒπΆ
157156nfel1 2340 . . . . . . . . . . . . . . . . . . 19 Ⅎ𝑛⦋π‘₯ / π‘›β¦ŒπΆ ∈ β„‚
158 csbeq1a 3078 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = π‘₯ β†’ 𝐢 = ⦋π‘₯ / π‘›β¦ŒπΆ)
159158eleq1d 2256 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘₯ β†’ (𝐢 ∈ β„‚ ↔ ⦋π‘₯ / π‘›β¦ŒπΆ ∈ β„‚))
160157, 159rspc 2847 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...𝑀) β†’ (βˆ€π‘› ∈ (1...𝑀)𝐢 ∈ β„‚ β†’ ⦋π‘₯ / π‘›β¦ŒπΆ ∈ β„‚))
16128, 155, 160sylc 62 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) ∧ π‘₯ ≀ 𝑀) β†’ ⦋π‘₯ / π‘›β¦ŒπΆ ∈ β„‚)
162161, 30, 34ifcldadc 3575 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0) ∈ β„‚)
163 nfcv 2329 . . . . . . . . . . . . . . . . 17 Ⅎ𝑛π‘₯
164 nfv 1538 . . . . . . . . . . . . . . . . . 18 Ⅎ𝑛 π‘₯ ≀ 𝑀
165164, 156, 147nfif 3574 . . . . . . . . . . . . . . . . 17 Ⅎ𝑛if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0)
16636, 158ifbieq1d 3568 . . . . . . . . . . . . . . . . 17 (𝑛 = π‘₯ β†’ if(𝑛 ≀ 𝑀, 𝐢, 0) = if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0))
167163, 165, 166, 150fvmptf 5621 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ β„• ∧ if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0) ∈ β„‚) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘₯) = if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0))
1687, 162, 167syl2anc 411 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘₯) = if(π‘₯ ≀ 𝑀, ⦋π‘₯ / π‘›β¦ŒπΆ, 0))
169168, 162eqeltrd 2264 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ (β„€β‰₯β€˜1)) β†’ ((𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))β€˜π‘₯) ∈ β„‚)
170 addcl 7950 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ β„‚ ∧ 𝑦 ∈ β„‚) β†’ (π‘₯ + 𝑦) ∈ β„‚)
171170adantl 277 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘₯ ∈ β„‚ ∧ 𝑦 ∈ β„‚)) β†’ (π‘₯ + 𝑦) ∈ β„‚)
17299, 154, 41, 169, 171seq3fveq 10485 . . . . . . . . . . . . 13 (πœ‘ β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€))
17312, 172jca 306 . . . . . . . . . . . 12 (πœ‘ β†’ (𝐹:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€)))
174 f1oeq1 5461 . . . . . . . . . . . . . 14 (𝑓 = 𝐹 β†’ (𝑓:(1...𝑀)–1-1-onto→𝐴 ↔ 𝐹:(1...𝑀)–1-1-onto→𝐴))
175 fveq1 5526 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = 𝐹 β†’ (π‘“β€˜π‘›) = (πΉβ€˜π‘›))
176175csbeq1d 3076 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝐹 β†’ ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅ = ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅)
177 vex 2752 . . . . . . . . . . . . . . . . . . . . . . 23 𝑓 ∈ V
178 vex 2752 . . . . . . . . . . . . . . . . . . . . . . 23 𝑛 ∈ V
179177, 178fvex 5547 . . . . . . . . . . . . . . . . . . . . . 22 (π‘“β€˜π‘›) ∈ V
180175, 179eqeltrrdi 2279 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = 𝐹 β†’ (πΉβ€˜π‘›) ∈ V)
18110adantl 277 . . . . . . . . . . . . . . . . . . . . 21 ((𝑓 = 𝐹 ∧ π‘˜ = (πΉβ€˜π‘›)) β†’ 𝐡 = 𝐢)
182180, 181csbied 3115 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝐹 β†’ ⦋(πΉβ€˜π‘›) / π‘˜β¦Œπ΅ = 𝐢)
183176, 182eqtrd 2220 . . . . . . . . . . . . . . . . . . 19 (𝑓 = 𝐹 β†’ ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅ = 𝐢)
184183ifeq1d 3563 . . . . . . . . . . . . . . . . . 18 (𝑓 = 𝐹 β†’ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0) = if(𝑛 ≀ 𝑀, 𝐢, 0))
185184mpteq2dv 4106 . . . . . . . . . . . . . . . . 17 (𝑓 = 𝐹 β†’ (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)) = (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))
186185seqeq3d 10467 . . . . . . . . . . . . . . . 16 (𝑓 = 𝐹 β†’ seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))) = seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0))))
187186fveq1d 5529 . . . . . . . . . . . . . . 15 (𝑓 = 𝐹 β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€))
188187eqeq2d 2199 . . . . . . . . . . . . . 14 (𝑓 = 𝐹 β†’ ((seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€) ↔ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€)))
189174, 188anbi12d 473 . . . . . . . . . . . . 13 (𝑓 = 𝐹 β†’ ((𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€)) ↔ (𝐹:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€))))
190189spcegv 2837 . . . . . . . . . . . 12 (𝐹 ∈ V β†’ ((𝐹:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, 𝐢, 0)))β€˜π‘€)) β†’ βˆƒπ‘“(𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€))))
19198, 173, 190sylc 62 . . . . . . . . . . 11 (πœ‘ β†’ βˆƒπ‘“(𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€)))
192 oveq2 5896 . . . . . . . . . . . . . . 15 (π‘š = 𝑀 β†’ (1...π‘š) = (1...𝑀))
193 f1oeq2 5462 . . . . . . . . . . . . . . 15 ((1...π‘š) = (1...𝑀) β†’ (𝑓:(1...π‘š)–1-1-onto→𝐴 ↔ 𝑓:(1...𝑀)–1-1-onto→𝐴))
194192, 193syl 14 . . . . . . . . . . . . . 14 (π‘š = 𝑀 β†’ (𝑓:(1...π‘š)–1-1-onto→𝐴 ↔ 𝑓:(1...𝑀)–1-1-onto→𝐴))
195 breq2 4019 . . . . . . . . . . . . . . . . . . 19 (π‘š = 𝑀 β†’ (𝑛 ≀ π‘š ↔ 𝑛 ≀ 𝑀))
196195ifbid 3567 . . . . . . . . . . . . . . . . . 18 (π‘š = 𝑀 β†’ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0) = if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))
197196mpteq2dv 4106 . . . . . . . . . . . . . . . . 17 (π‘š = 𝑀 β†’ (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)) = (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))
198197seqeq3d 10467 . . . . . . . . . . . . . . . 16 (π‘š = 𝑀 β†’ seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))) = seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0))))
199 id 19 . . . . . . . . . . . . . . . 16 (π‘š = 𝑀 β†’ π‘š = 𝑀)
200198, 199fveq12d 5534 . . . . . . . . . . . . . . 15 (π‘š = 𝑀 β†’ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€))
201200eqeq2d 2199 . . . . . . . . . . . . . 14 (π‘š = 𝑀 β†’ ((seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š) ↔ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€)))
202194, 201anbi12d 473 . . . . . . . . . . . . 13 (π‘š = 𝑀 β†’ ((𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ (𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€))))
203202exbidv 1835 . . . . . . . . . . . 12 (π‘š = 𝑀 β†’ (βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ βˆƒπ‘“(𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€))))
204203rspcev 2853 . . . . . . . . . . 11 ((𝑀 ∈ β„• ∧ βˆƒπ‘“(𝑓:(1...𝑀)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘€))) β†’ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))
20511, 191, 204syl2anc 411 . . . . . . . . . 10 (πœ‘ β†’ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))
206205olcd 735 . . . . . . . . 9 (πœ‘ β†’ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
207206adantr 276 . . . . . . . 8 ((πœ‘ ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) β†’ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
208 breq2 4019 . . . . . . . . . . . 12 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯ ↔ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)))
2092083anbi3d 1328 . . . . . . . . . . 11 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ ((𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ↔ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))))
210209rexbidv 2488 . . . . . . . . . 10 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ↔ βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))))
211 eqeq1 2194 . . . . . . . . . . . . 13 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š) ↔ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))
212211anbi2d 464 . . . . . . . . . . . 12 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ ((𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ (𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
213212exbidv 1835 . . . . . . . . . . 11 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
214213rexbidv 2488 . . . . . . . . . 10 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)) ↔ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))
215210, 214orbi12d 794 . . . . . . . . 9 (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ↔ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))))
216215moi2 2930 . . . . . . . 8 ((((seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) ∈ β„‚ ∧ βˆƒ*π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) ∧ ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))))) β†’ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
21745, 92, 93, 207, 216syl22anc 1249 . . . . . . 7 ((πœ‘ ∧ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) β†’ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
218217ex 115 . . . . . 6 (πœ‘ β†’ ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) β†’ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)))
219206, 215syl5ibrcom 157 . . . . . 6 (πœ‘ β†’ (π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) β†’ (βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))))
220218, 219impbid 129 . . . . 5 (πœ‘ β†’ ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ↔ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)))
221220adantr 276 . . . 4 ((πœ‘ ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) ∈ β„‚) β†’ ((βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š))) ↔ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€)))
222221iota5 5210 . . 3 ((πœ‘ ∧ (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€) ∈ β„‚) β†’ (β„©π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
22344, 222mpdan 421 . 2 (πœ‘ β†’ (β„©π‘₯(βˆƒπ‘š ∈ β„€ (𝐴 βŠ† (β„€β‰₯β€˜π‘š) ∧ βˆ€π‘— ∈ (β„€β‰₯β€˜π‘š)DECID 𝑗 ∈ 𝐴 ∧ seqπ‘š( + , (𝑛 ∈ β„€ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / π‘˜β¦Œπ΅, 0))) ⇝ π‘₯) ∨ βˆƒπ‘š ∈ β„• βˆƒπ‘“(𝑓:(1...π‘š)–1-1-onto→𝐴 ∧ π‘₯ = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ π‘š, ⦋(π‘“β€˜π‘›) / π‘˜β¦Œπ΅, 0)))β€˜π‘š)))) = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
2241, 223eqtrid 2232 1 (πœ‘ β†’ Ξ£π‘˜ ∈ 𝐴 𝐡 = (seq1( + , (𝑛 ∈ β„• ↦ if(𝑛 ≀ 𝑀, (πΊβ€˜π‘›), 0)))β€˜π‘€))
Colors of variables: wff set class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 709  DECID wdc 835   ∧ w3a 979   = wceq 1363  βˆƒwex 1502  βˆƒ*wmo 2037   ∈ wcel 2158  βˆ€wral 2465  βˆƒwrex 2466  Vcvv 2749  β¦‹csb 3069   βŠ† wss 3141  ifcif 3546   class class class wbr 4015   ↦ cmpt 4076  β„©cio 5188  βŸΆwf 5224  β€“1-1-ontoβ†’wf1o 5227  β€˜cfv 5228  (class class class)co 5888  Fincfn 6754  β„‚cc 7823  0cc0 7825  1c1 7826   + caddc 7828   ≀ cle 8007  β„•cn 8933  β„•0cn0 9190  β„€cz 9267  β„€β‰₯cuz 9542  ...cfz 10022  seqcseq 10459  β™―chash 10769   ⇝ cli 11300  Ξ£csu 11375
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1457  ax-7 1458  ax-gen 1459  ax-ie1 1503  ax-ie2 1504  ax-8 1514  ax-10 1515  ax-11 1516  ax-i12 1517  ax-bndl 1519  ax-4 1520  ax-17 1536  ax-i9 1540  ax-ial 1544  ax-i5r 1545  ax-13 2160  ax-14 2161  ax-ext 2169  ax-coll 4130  ax-sep 4133  ax-nul 4141  ax-pow 4186  ax-pr 4221  ax-un 4445  ax-setind 4548  ax-iinf 4599  ax-cnex 7916  ax-resscn 7917  ax-1cn 7918  ax-1re 7919  ax-icn 7920  ax-addcl 7921  ax-addrcl 7922  ax-mulcl 7923  ax-mulrcl 7924  ax-addcom 7925  ax-mulcom 7926  ax-addass 7927  ax-mulass 7928  ax-distr 7929  ax-i2m1 7930  ax-0lt1 7931  ax-1rid 7932  ax-0id 7933  ax-rnegex 7934  ax-precex 7935  ax-cnre 7936  ax-pre-ltirr 7937  ax-pre-ltwlin 7938  ax-pre-lttrn 7939  ax-pre-apti 7940  ax-pre-ltadd 7941  ax-pre-mulgt0 7942  ax-pre-mulext 7943  ax-arch 7944  ax-caucvg 7945
This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 980  df-3an 981  df-tru 1366  df-fal 1369  df-nf 1471  df-sb 1773  df-eu 2039  df-mo 2040  df-clab 2174  df-cleq 2180  df-clel 2183  df-nfc 2318  df-ne 2358  df-nel 2453  df-ral 2470  df-rex 2471  df-reu 2472  df-rmo 2473  df-rab 2474  df-v 2751  df-sbc 2975  df-csb 3070  df-dif 3143  df-un 3145  df-in 3147  df-ss 3154  df-nul 3435  df-if 3547  df-pw 3589  df-sn 3610  df-pr 3611  df-op 3613  df-uni 3822  df-int 3857  df-iun 3900  df-br 4016  df-opab 4077  df-mpt 4078  df-tr 4114  df-id 4305  df-po 4308  df-iso 4309  df-iord 4378  df-on 4380  df-ilim 4381  df-suc 4383  df-iom 4602  df-xp 4644  df-rel 4645  df-cnv 4646  df-co 4647  df-dm 4648  df-rn 4649  df-res 4650  df-ima 4651  df-iota 5190  df-fun 5230  df-fn 5231  df-f 5232  df-f1 5233  df-fo 5234  df-f1o 5235  df-fv 5236  df-isom 5237  df-riota 5844  df-ov 5891  df-oprab 5892  df-mpo 5893  df-1st 6155  df-2nd 6156  df-recs 6320  df-irdg 6385  df-frec 6406  df-1o 6431  df-oadd 6435  df-er 6549  df-en 6755  df-dom 6756  df-fin 6757  df-pnf 8008  df-mnf 8009  df-xr 8010  df-ltxr 8011  df-le 8012  df-sub 8144  df-neg 8145  df-reap 8546  df-ap 8553  df-div 8644  df-inn 8934  df-2 8992  df-3 8993  df-4 8994  df-n0 9191  df-z 9268  df-uz 9543  df-q 9634  df-rp 9668  df-fz 10023  df-fzo 10157  df-seqfrec 10460  df-exp 10534  df-ihash 10770  df-cj 10865  df-re 10866  df-im 10867  df-rsqrt 11021  df-abs 11022  df-clim 11301  df-sumdc 11376
This theorem is referenced by:  isumz  11411  fsumf1o  11412  fsumcl2lem  11420  fsumadd  11428  sumsnf  11431  fsummulc2  11470
  Copyright terms: Public domain W3C validator