Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  hoidmvlelem3 Structured version   Visualization version   GIF version

Theorem hoidmvlelem3 44912
Description: This is the contradiction proven in step (d) in the proof of Lemma 115B of [Fremlin1] p. 29. (Contributed by Glauco Siliprandi, 21-Nov-2020.)
Hypotheses
Ref Expression
hoidmvlelem3.l 𝐿 = (π‘₯ ∈ Fin ↦ (π‘Ž ∈ (ℝ ↑m π‘₯), 𝑏 ∈ (ℝ ↑m π‘₯) ↦ if(π‘₯ = βˆ…, 0, βˆπ‘˜ ∈ π‘₯ (volβ€˜((π‘Žβ€˜π‘˜)[,)(π‘β€˜π‘˜))))))
hoidmvlelem3.x (πœ‘ β†’ 𝑋 ∈ Fin)
hoidmvlelem3.y (πœ‘ β†’ π‘Œ βŠ† 𝑋)
hoidmvlelem3.z (πœ‘ β†’ 𝑍 ∈ (𝑋 βˆ– π‘Œ))
hoidmvlelem3.w π‘Š = (π‘Œ βˆͺ {𝑍})
hoidmvlelem3.a (πœ‘ β†’ 𝐴:π‘ŠβŸΆβ„)
hoidmvlelem3.b (πœ‘ β†’ 𝐡:π‘ŠβŸΆβ„)
hoidmvlelem3.lt ((πœ‘ ∧ π‘˜ ∈ π‘Š) β†’ (π΄β€˜π‘˜) < (π΅β€˜π‘˜))
hoidmvlelem3.f 𝐹 = (𝑦 ∈ π‘Œ ↦ 0)
hoidmvlelem3.c (πœ‘ β†’ 𝐢:β„•βŸΆ(ℝ ↑m π‘Š))
hoidmvlelem3.j 𝐽 = (𝑗 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹))
hoidmvlelem3.d (πœ‘ β†’ 𝐷:β„•βŸΆ(ℝ ↑m π‘Š))
hoidmvlelem3.k 𝐾 = (𝑗 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹))
hoidmvlelem3.r (πœ‘ β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)(π·β€˜π‘—)))) ∈ ℝ)
hoidmvlelem3.h 𝐻 = (π‘₯ ∈ ℝ ↦ (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑗 ∈ π‘Š ↦ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯)))))
hoidmvlelem3.g 𝐺 = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ))
hoidmvlelem3.e (πœ‘ β†’ 𝐸 ∈ ℝ+)
hoidmvlelem3.u π‘ˆ = {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))))))}
hoidmvlelem3.s (πœ‘ β†’ 𝑆 ∈ π‘ˆ)
hoidmvlelem3.sb (πœ‘ β†’ 𝑆 < (π΅β€˜π‘))
hoidmvlelem3.p 𝑃 = (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
hoidmvlelem3.i (πœ‘ β†’ βˆ€π‘’ ∈ (ℝ ↑m π‘Œ)βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
hoidmvlelem3.i2 (πœ‘ β†’ Xπ‘˜ ∈ π‘Š ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
hoidmvlelem3.o 𝑂 = (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ↦ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)))
Assertion
Ref Expression
hoidmvlelem3 (πœ‘ β†’ βˆƒπ‘’ ∈ π‘ˆ 𝑆 < 𝑒)
Distinct variable groups:   𝐴,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯   𝐴,𝑒,𝑓,𝑔,β„Ž,𝑗,π‘˜   𝑧,𝐴,β„Ž,𝑗   𝐡,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝐡,𝑐,β„Ž,𝑗,π‘˜,π‘₯   𝐡,𝑓,𝑔   𝑒,𝐡,β„Ž,𝑗   𝑧,𝐡   𝐢,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝐢,𝑐   𝑒,𝐢   𝑧,𝐢   𝐷,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝐷,𝑐   𝑒,𝐷   𝑧,𝐷   𝐸,π‘Ž,𝑏,β„Ž,π‘˜,π‘₯,𝑦   𝐸,𝑐   𝑧,𝐸   𝑗,𝐹   𝐺,π‘Ž,𝑏,β„Ž,π‘˜,π‘₯,𝑦   𝐺,𝑐   𝑧,𝐺   𝐻,π‘Ž,𝑏,𝑗,π‘˜   𝑧,𝐻   𝐽,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯   𝑔,𝐽   𝐾,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯   𝐿,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯   𝑒,𝐿,𝑓,𝑔   𝑧,𝐿   𝑗,𝑂,π‘˜   𝑃,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝑃,𝑐   𝑆,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝑆,𝑐   𝑒,𝑆   𝑧,𝑆   𝑒,π‘ˆ   π‘Š,π‘Ž,𝑏,𝑗,π‘˜,π‘₯   π‘Š,𝑐   𝑧,π‘Š   π‘Œ,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   π‘Œ,𝑐   𝑒,π‘Œ,𝑓,𝑔   𝑍,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   𝑍,𝑐   𝑒,𝑍   𝑧,𝑍   πœ‘,π‘Ž,𝑏,β„Ž,𝑗,π‘˜,π‘₯,𝑦   πœ‘,𝑐
Allowed substitution hints:   πœ‘(𝑧,𝑒,𝑒,𝑓,𝑔)   𝐴(𝑦,𝑒,𝑐)   𝐡(𝑒)   𝐢(𝑒,𝑓,𝑔)   𝐷(𝑒,𝑓,𝑔)   𝑃(𝑧,𝑒,𝑒,𝑓,𝑔)   𝑆(𝑒,𝑓,𝑔)   π‘ˆ(π‘₯,𝑦,𝑧,𝑒,𝑓,𝑔,β„Ž,𝑗,π‘˜,π‘Ž,𝑏,𝑐)   𝐸(𝑒,𝑒,𝑓,𝑔,𝑗)   𝐹(π‘₯,𝑦,𝑧,𝑒,𝑒,𝑓,𝑔,β„Ž,π‘˜,π‘Ž,𝑏,𝑐)   𝐺(𝑒,𝑒,𝑓,𝑔,𝑗)   𝐻(π‘₯,𝑦,𝑒,𝑒,𝑓,𝑔,β„Ž,𝑐)   𝐽(𝑦,𝑧,𝑒,𝑒,𝑓,𝑐)   𝐾(𝑦,𝑧,𝑒,𝑒,𝑓,𝑔,𝑐)   𝐿(𝑦,𝑒,𝑐)   𝑂(π‘₯,𝑦,𝑧,𝑒,𝑒,𝑓,𝑔,β„Ž,π‘Ž,𝑏,𝑐)   π‘Š(𝑦,𝑒,𝑒,𝑓,𝑔,β„Ž)   𝑋(π‘₯,𝑦,𝑧,𝑒,𝑒,𝑓,𝑔,β„Ž,𝑗,π‘˜,π‘Ž,𝑏,𝑐)   π‘Œ(𝑧,𝑒)   𝑍(𝑒,𝑓,𝑔)

Proof of Theorem hoidmvlelem3
Dummy variables 𝑖 π‘š are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 1nn 12171 . . . . 5 1 ∈ β„•
21a1i 11 . . . 4 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 1 ∈ β„•)
3 0le0 12261 . . . . . 6 0 ≀ 0
43a1i 11 . . . . 5 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 0 ≀ 0)
5 hoidmvlelem3.g . . . . . . . 8 𝐺 = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ))
65a1i 11 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 𝐺 = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)))
7 fveq2 6847 . . . . . . . . 9 (π‘Œ = βˆ… β†’ (πΏβ€˜π‘Œ) = (πΏβ€˜βˆ…))
8 reseq2 5937 . . . . . . . . . 10 (π‘Œ = βˆ… β†’ (𝐴 β†Ύ π‘Œ) = (𝐴 β†Ύ βˆ…))
9 res0 5946 . . . . . . . . . . 11 (𝐴 β†Ύ βˆ…) = βˆ…
109a1i 11 . . . . . . . . . 10 (π‘Œ = βˆ… β†’ (𝐴 β†Ύ βˆ…) = βˆ…)
118, 10eqtrd 2777 . . . . . . . . 9 (π‘Œ = βˆ… β†’ (𝐴 β†Ύ π‘Œ) = βˆ…)
12 reseq2 5937 . . . . . . . . . 10 (π‘Œ = βˆ… β†’ (𝐡 β†Ύ π‘Œ) = (𝐡 β†Ύ βˆ…))
13 res0 5946 . . . . . . . . . . 11 (𝐡 β†Ύ βˆ…) = βˆ…
1413a1i 11 . . . . . . . . . 10 (π‘Œ = βˆ… β†’ (𝐡 β†Ύ βˆ…) = βˆ…)
1512, 14eqtrd 2777 . . . . . . . . 9 (π‘Œ = βˆ… β†’ (𝐡 β†Ύ π‘Œ) = βˆ…)
167, 11, 15oveq123d 7383 . . . . . . . 8 (π‘Œ = βˆ… β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) = (βˆ…(πΏβ€˜βˆ…)βˆ…))
1716adantl 483 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) = (βˆ…(πΏβ€˜βˆ…)βˆ…))
18 hoidmvlelem3.l . . . . . . . 8 𝐿 = (π‘₯ ∈ Fin ↦ (π‘Ž ∈ (ℝ ↑m π‘₯), 𝑏 ∈ (ℝ ↑m π‘₯) ↦ if(π‘₯ = βˆ…, 0, βˆπ‘˜ ∈ π‘₯ (volβ€˜((π‘Žβ€˜π‘˜)[,)(π‘β€˜π‘˜))))))
19 f0 6728 . . . . . . . . 9 βˆ…:βˆ…βŸΆβ„
2019a1i 11 . . . . . . . 8 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ βˆ…:βˆ…βŸΆβ„)
2118, 20, 20hoidmv0val 44898 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (βˆ…(πΏβ€˜βˆ…)βˆ…) = 0)
226, 17, 213eqtrd 2781 . . . . . 6 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 𝐺 = 0)
23 nfcvd 2909 . . . . . . . . . . 11 (πœ‘ β†’ Ⅎ𝑗(π‘ƒβ€˜1))
24 nfv 1918 . . . . . . . . . . 11 β„²π‘—πœ‘
25 simpr 486 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 = 1) β†’ 𝑗 = 1)
2625fveq2d 6851 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 = 1) β†’ (π‘ƒβ€˜π‘—) = (π‘ƒβ€˜1))
27 1red 11163 . . . . . . . . . . 11 (πœ‘ β†’ 1 ∈ ℝ)
28 rge0ssre 13380 . . . . . . . . . . . . 13 (0[,)+∞) βŠ† ℝ
29 id 22 . . . . . . . . . . . . . 14 (πœ‘ β†’ πœ‘)
301a1i 11 . . . . . . . . . . . . . 14 (πœ‘ β†’ 1 ∈ β„•)
311elexi 3467 . . . . . . . . . . . . . . 15 1 ∈ V
32 eleq1 2826 . . . . . . . . . . . . . . . . 17 (𝑗 = 1 β†’ (𝑗 ∈ β„• ↔ 1 ∈ β„•))
3332anbi2d 630 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ ((πœ‘ ∧ 𝑗 ∈ β„•) ↔ (πœ‘ ∧ 1 ∈ β„•)))
34 fveq2 6847 . . . . . . . . . . . . . . . . 17 (𝑗 = 1 β†’ (π‘ƒβ€˜π‘—) = (π‘ƒβ€˜1))
3534eleq1d 2823 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ ((π‘ƒβ€˜π‘—) ∈ (0[,)+∞) ↔ (π‘ƒβ€˜1) ∈ (0[,)+∞)))
3633, 35imbi12d 345 . . . . . . . . . . . . . . 15 (𝑗 = 1 β†’ (((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) ∈ (0[,)+∞)) ↔ ((πœ‘ ∧ 1 ∈ β„•) β†’ (π‘ƒβ€˜1) ∈ (0[,)+∞))))
37 id 22 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ β„• β†’ 𝑗 ∈ β„•)
38 ovexd 7397 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ β„• β†’ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) ∈ V)
39 hoidmvlelem3.p . . . . . . . . . . . . . . . . . . 19 𝑃 = (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
4039fvmpt2 6964 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ β„• ∧ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) ∈ V) β†’ (π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
4137, 38, 40syl2anc 585 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ β„• β†’ (π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
4241adantl 483 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
43 hoidmvlelem3.x . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝑋 ∈ Fin)
44 hoidmvlelem3.w . . . . . . . . . . . . . . . . . . . . . 22 π‘Š = (π‘Œ βˆͺ {𝑍})
4544a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ π‘Š = (π‘Œ βˆͺ {𝑍}))
46 hoidmvlelem3.y . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ π‘Œ βŠ† 𝑋)
47 hoidmvlelem3.z . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑍 ∈ (𝑋 βˆ– π‘Œ))
4847eldifad 3927 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑍 ∈ 𝑋)
49 snssi 4773 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑍 ∈ 𝑋 β†’ {𝑍} βŠ† 𝑋)
5048, 49syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ {𝑍} βŠ† 𝑋)
5146, 50unssd 4151 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (π‘Œ βˆͺ {𝑍}) βŠ† 𝑋)
5245, 51eqsstrd 3987 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ π‘Š βŠ† 𝑋)
5343, 52ssfid 9218 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ π‘Š ∈ Fin)
54 ssun1 4137 . . . . . . . . . . . . . . . . . . . . 21 π‘Œ βŠ† (π‘Œ βˆͺ {𝑍})
5544eqcomi 2746 . . . . . . . . . . . . . . . . . . . . 21 (π‘Œ βˆͺ {𝑍}) = π‘Š
5654, 55sseqtri 3985 . . . . . . . . . . . . . . . . . . . 20 π‘Œ βŠ† π‘Š
5756a1i 11 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ π‘Œ βŠ† π‘Š)
5853, 57ssfid 9218 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ π‘Œ ∈ Fin)
5958adantr 482 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ π‘Œ ∈ Fin)
60 iftrue 4497 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((πΆβ€˜π‘—) β†Ύ π‘Œ))
6160adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((πΆβ€˜π‘—) β†Ύ π‘Œ))
62 hoidmvlelem3.c . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝐢:β„•βŸΆ(ℝ ↑m π‘Š))
6362ffvelcdmda 7040 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΆβ€˜π‘—) ∈ (ℝ ↑m π‘Š))
64 elmapi 8794 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((πΆβ€˜π‘—) ∈ (ℝ ↑m π‘Š) β†’ (πΆβ€˜π‘—):π‘ŠβŸΆβ„)
6563, 64syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΆβ€˜π‘—):π‘ŠβŸΆβ„)
6654, 44sseqtrri 3986 . . . . . . . . . . . . . . . . . . . . . . . . . 26 π‘Œ βŠ† π‘Š
6766a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ π‘Œ βŠ† π‘Š)
6865, 67fssresd 6714 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((πΆβ€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„)
69 reex 11149 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ℝ ∈ V
7069a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ℝ ∈ V)
7153, 57ssexd 5286 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ π‘Œ ∈ V)
7271adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ π‘Œ ∈ V)
7370, 72elmapd 8786 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (((πΆβ€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ↔ ((πΆβ€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„))
7468, 73mpbird 257 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((πΆβ€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
7574adantr 482 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ ((πΆβ€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
7661, 75eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
77 iffalse 4500 . . . . . . . . . . . . . . . . . . . . . . 23 (Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = 𝐹)
7877adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = 𝐹)
79 0red 11165 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 0 ∈ ℝ)
80 hoidmvlelem3.f . . . . . . . . . . . . . . . . . . . . . . . . 25 𝐹 = (𝑦 ∈ π‘Œ ↦ 0)
8179, 80fmptd 7067 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝐹:π‘ŒβŸΆβ„)
8269a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ ℝ ∈ V)
8382, 58elmapd 8786 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (𝐹 ∈ (ℝ ↑m π‘Œ) ↔ 𝐹:π‘ŒβŸΆβ„))
8481, 83mpbird 257 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝐹 ∈ (ℝ ↑m π‘Œ))
8584ad2antrr 725 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ 𝐹 ∈ (ℝ ↑m π‘Œ))
8678, 85eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
8776, 86pm2.61dan 812 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
88 hoidmvlelem3.j . . . . . . . . . . . . . . . . . . . 20 𝐽 = (𝑗 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹))
8987, 88fmptd 7067 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐽:β„•βŸΆ(ℝ ↑m π‘Œ))
9089ffvelcdmda 7040 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—) ∈ (ℝ ↑m π‘Œ))
91 elmapi 8794 . . . . . . . . . . . . . . . . . 18 ((π½β€˜π‘—) ∈ (ℝ ↑m π‘Œ) β†’ (π½β€˜π‘—):π‘ŒβŸΆβ„)
9290, 91syl 17 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—):π‘ŒβŸΆβ„)
93 iftrue 4497 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((π·β€˜π‘—) β†Ύ π‘Œ))
9493adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((π·β€˜π‘—) β†Ύ π‘Œ))
95 hoidmvlelem3.d . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝐷:β„•βŸΆ(ℝ ↑m π‘Š))
9695ffvelcdmda 7040 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π·β€˜π‘—) ∈ (ℝ ↑m π‘Š))
97 elmapi 8794 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((π·β€˜π‘—) ∈ (ℝ ↑m π‘Š) β†’ (π·β€˜π‘—):π‘ŠβŸΆβ„)
9896, 97syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π·β€˜π‘—):π‘ŠβŸΆβ„)
9998, 67fssresd 6714 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((π·β€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„)
10070, 72elmapd 8786 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (((π·β€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ↔ ((π·β€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„))
10199, 100mpbird 257 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((π·β€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
102101adantr 482 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ ((π·β€˜π‘—) β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
10394, 102eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
104 iffalse 4500 . . . . . . . . . . . . . . . . . . . . . . 23 (Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = 𝐹)
105104adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = 𝐹)
106105, 85eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
107103, 106pm2.61dan 812 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ (ℝ ↑m π‘Œ))
108 hoidmvlelem3.k . . . . . . . . . . . . . . . . . . . 20 𝐾 = (𝑗 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹))
109107, 108fmptd 7067 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐾:β„•βŸΆ(ℝ ↑m π‘Œ))
110109ffvelcdmda 7040 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΎβ€˜π‘—) ∈ (ℝ ↑m π‘Œ))
111 elmapi 8794 . . . . . . . . . . . . . . . . . 18 ((πΎβ€˜π‘—) ∈ (ℝ ↑m π‘Œ) β†’ (πΎβ€˜π‘—):π‘ŒβŸΆβ„)
112110, 111syl 17 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΎβ€˜π‘—):π‘ŒβŸΆβ„)
11318, 59, 92, 112hoidmvcl 44897 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) ∈ (0[,)+∞))
11442, 113eqeltrd 2838 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) ∈ (0[,)+∞))
11531, 36, 114vtocl 3521 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 1 ∈ β„•) β†’ (π‘ƒβ€˜1) ∈ (0[,)+∞))
11629, 30, 115syl2anc 585 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘ƒβ€˜1) ∈ (0[,)+∞))
11728, 116sselid 3947 . . . . . . . . . . . 12 (πœ‘ β†’ (π‘ƒβ€˜1) ∈ ℝ)
118117recnd 11190 . . . . . . . . . . 11 (πœ‘ β†’ (π‘ƒβ€˜1) ∈ β„‚)
11923, 24, 26, 27, 118sumsnd 43305 . . . . . . . . . 10 (πœ‘ β†’ Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—) = (π‘ƒβ€˜1))
120119adantr 482 . . . . . . . . 9 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—) = (π‘ƒβ€˜1))
121 fveq2 6847 . . . . . . . . . . . . 13 (𝑗 = 1 β†’ (π½β€˜π‘—) = (π½β€˜1))
122 fveq2 6847 . . . . . . . . . . . . 13 (𝑗 = 1 β†’ (πΎβ€˜π‘—) = (πΎβ€˜1))
123121, 122oveq12d 7380 . . . . . . . . . . . 12 (𝑗 = 1 β†’ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) = ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)))
124 ovex 7395 . . . . . . . . . . . 12 ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)) ∈ V
125123, 39, 124fvmpt 6953 . . . . . . . . . . 11 (1 ∈ β„• β†’ (π‘ƒβ€˜1) = ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)))
1261, 125ax-mp 5 . . . . . . . . . 10 (π‘ƒβ€˜1) = ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1))
127126a1i 11 . . . . . . . . 9 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (π‘ƒβ€˜1) = ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)))
1287oveqd 7379 . . . . . . . . . . 11 (π‘Œ = βˆ… β†’ ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)) = ((π½β€˜1)(πΏβ€˜βˆ…)(πΎβ€˜1)))
129128adantl 483 . . . . . . . . . 10 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)) = ((π½β€˜1)(πΏβ€˜βˆ…)(πΎβ€˜1)))
130121feq1d 6658 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ ((π½β€˜π‘—):π‘ŒβŸΆβ„ ↔ (π½β€˜1):π‘ŒβŸΆβ„))
13133, 130imbi12d 345 . . . . . . . . . . . . . . 15 (𝑗 = 1 β†’ (((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—):π‘ŒβŸΆβ„) ↔ ((πœ‘ ∧ 1 ∈ β„•) β†’ (π½β€˜1):π‘ŒβŸΆβ„)))
13268adantr 482 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ ((πΆβ€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„)
13361feq1d 6658 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„ ↔ ((πΆβ€˜π‘—) β†Ύ π‘Œ):π‘ŒβŸΆβ„))
134132, 133mpbird 257 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„)
13581ad2antrr 725 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ 𝐹:π‘ŒβŸΆβ„)
13678feq1d 6658 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„ ↔ 𝐹:π‘ŒβŸΆβ„))
137135, 136mpbird 257 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„)
138134, 137pm2.61dan 812 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„)
139 simpr 486 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ 𝑗 ∈ β„•)
140 fvex 6860 . . . . . . . . . . . . . . . . . . . . 21 (πΆβ€˜π‘—) ∈ V
141140resex 5990 . . . . . . . . . . . . . . . . . . . 20 ((πΆβ€˜π‘—) β†Ύ π‘Œ) ∈ V
14261, 141eqeltrdi 2846 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V)
14384elexd 3468 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐹 ∈ V)
144143adantr 482 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ 𝐹 ∈ V)
145144adantr 482 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ 𝐹 ∈ V)
14678, 145eqeltrd 2838 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ 𝑗 ∈ β„•) ∧ Β¬ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V)
147142, 146pm2.61dan 812 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V)
14888fvmpt2 6964 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ β„• ∧ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V) β†’ (π½β€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹))
149139, 147, 148syl2anc 585 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹))
150149feq1d 6658 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ ((π½β€˜π‘—):π‘ŒβŸΆβ„ ↔ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹):π‘ŒβŸΆβ„))
151138, 150mpbird 257 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—):π‘ŒβŸΆβ„)
15231, 131, 151vtocl 3521 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 1 ∈ β„•) β†’ (π½β€˜1):π‘ŒβŸΆβ„)
15329, 30, 152syl2anc 585 . . . . . . . . . . . . 13 (πœ‘ β†’ (π½β€˜1):π‘ŒβŸΆβ„)
154153adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (π½β€˜1):π‘ŒβŸΆβ„)
155 id 22 . . . . . . . . . . . . . . 15 (π‘Œ = βˆ… β†’ π‘Œ = βˆ…)
156155eqcomd 2743 . . . . . . . . . . . . . 14 (π‘Œ = βˆ… β†’ βˆ… = π‘Œ)
157156feq2d 6659 . . . . . . . . . . . . 13 (π‘Œ = βˆ… β†’ ((π½β€˜1):βˆ…βŸΆβ„ ↔ (π½β€˜1):π‘ŒβŸΆβ„))
158157adantl 483 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((π½β€˜1):βˆ…βŸΆβ„ ↔ (π½β€˜1):π‘ŒβŸΆβ„))
159154, 158mpbird 257 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (π½β€˜1):βˆ…βŸΆβ„)
160122feq1d 6658 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ ((πΎβ€˜π‘—):π‘ŒβŸΆβ„ ↔ (πΎβ€˜1):π‘ŒβŸΆβ„))
16133, 160imbi12d 345 . . . . . . . . . . . . . . 15 (𝑗 = 1 β†’ (((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΎβ€˜π‘—):π‘ŒβŸΆβ„) ↔ ((πœ‘ ∧ 1 ∈ β„•) β†’ (πΎβ€˜1):π‘ŒβŸΆβ„)))
16231, 161, 112vtocl 3521 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 1 ∈ β„•) β†’ (πΎβ€˜1):π‘ŒβŸΆβ„)
16329, 30, 162syl2anc 585 . . . . . . . . . . . . 13 (πœ‘ β†’ (πΎβ€˜1):π‘ŒβŸΆβ„)
164163adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (πΎβ€˜1):π‘ŒβŸΆβ„)
165156feq2d 6659 . . . . . . . . . . . . 13 (π‘Œ = βˆ… β†’ ((πΎβ€˜1):βˆ…βŸΆβ„ ↔ (πΎβ€˜1):π‘ŒβŸΆβ„))
166165adantl 483 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((πΎβ€˜1):βˆ…βŸΆβ„ ↔ (πΎβ€˜1):π‘ŒβŸΆβ„))
167164, 166mpbird 257 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (πΎβ€˜1):βˆ…βŸΆβ„)
16818, 159, 167hoidmv0val 44898 . . . . . . . . . 10 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((π½β€˜1)(πΏβ€˜βˆ…)(πΎβ€˜1)) = 0)
169129, 168eqtrd 2777 . . . . . . . . 9 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((π½β€˜1)(πΏβ€˜π‘Œ)(πΎβ€˜1)) = 0)
170120, 127, 1693eqtrd 2781 . . . . . . . 8 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—) = 0)
171170oveq2d 7378 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—)) = ((1 + 𝐸) Β· 0))
172 hoidmvlelem3.e . . . . . . . . . . . 12 (πœ‘ β†’ 𝐸 ∈ ℝ+)
173172rpred 12964 . . . . . . . . . . 11 (πœ‘ β†’ 𝐸 ∈ ℝ)
17427, 173readdcld 11191 . . . . . . . . . 10 (πœ‘ β†’ (1 + 𝐸) ∈ ℝ)
175174recnd 11190 . . . . . . . . 9 (πœ‘ β†’ (1 + 𝐸) ∈ β„‚)
176175mul01d 11361 . . . . . . . 8 (πœ‘ β†’ ((1 + 𝐸) Β· 0) = 0)
177176adantr 482 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((1 + 𝐸) Β· 0) = 0)
178 eqidd 2738 . . . . . . 7 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 0 = 0)
179171, 177, 1783eqtrd 2781 . . . . . 6 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—)) = 0)
18022, 179breq12d 5123 . . . . 5 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—)) ↔ 0 ≀ 0))
1814, 180mpbird 257 . . . 4 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—)))
182 oveq2 7370 . . . . . . . . 9 (π‘š = 1 β†’ (1...π‘š) = (1...1))
1831nnzi 12534 . . . . . . . . . . 11 1 ∈ β„€
184 fzsn 13490 . . . . . . . . . . 11 (1 ∈ β„€ β†’ (1...1) = {1})
185183, 184ax-mp 5 . . . . . . . . . 10 (1...1) = {1}
186185a1i 11 . . . . . . . . 9 (π‘š = 1 β†’ (1...1) = {1})
187182, 186eqtrd 2777 . . . . . . . 8 (π‘š = 1 β†’ (1...π‘š) = {1})
188187sumeq1d 15593 . . . . . . 7 (π‘š = 1 β†’ Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) = Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—))
189188oveq2d 7378 . . . . . 6 (π‘š = 1 β†’ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) = ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—)))
190189breq2d 5122 . . . . 5 (π‘š = 1 β†’ (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) ↔ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—))))
191190rspcev 3584 . . . 4 ((1 ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ {1} (π‘ƒβ€˜π‘—))) β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
1922, 181, 191syl2anc 585 . . 3 ((πœ‘ ∧ π‘Œ = βˆ…) β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
193 simpl 484 . . . 4 ((πœ‘ ∧ Β¬ π‘Œ = βˆ…) β†’ πœ‘)
194 neqne 2952 . . . . 5 (Β¬ π‘Œ = βˆ… β†’ π‘Œ β‰  βˆ…)
195194adantl 483 . . . 4 ((πœ‘ ∧ Β¬ π‘Œ = βˆ…) β†’ π‘Œ β‰  βˆ…)
196 nfv 1918 . . . . . 6 Ⅎ𝑗(πœ‘ ∧ π‘Œ β‰  βˆ…)
197183a1i 11 . . . . . 6 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 1 ∈ β„€)
198 nnuz 12813 . . . . . 6 β„• = (β„€β‰₯β€˜1)
199114adantlr 714 . . . . . 6 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) ∈ (0[,)+∞))
200 hoidmvlelem3.a . . . . . . . . . . . 12 (πœ‘ β†’ 𝐴:π‘ŠβŸΆβ„)
20166a1i 11 . . . . . . . . . . . 12 (πœ‘ β†’ π‘Œ βŠ† π‘Š)
202200, 201fssresd 6714 . . . . . . . . . . 11 (πœ‘ β†’ (𝐴 β†Ύ π‘Œ):π‘ŒβŸΆβ„)
203 hoidmvlelem3.b . . . . . . . . . . . 12 (πœ‘ β†’ 𝐡:π‘ŠβŸΆβ„)
204203, 201fssresd 6714 . . . . . . . . . . 11 (πœ‘ β†’ (𝐡 β†Ύ π‘Œ):π‘ŒβŸΆβ„)
20518, 58, 202, 204hoidmvcl 44897 . . . . . . . . . 10 (πœ‘ β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ∈ (0[,)+∞))
20628, 205sselid 3947 . . . . . . . . 9 (πœ‘ β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ∈ ℝ)
2075, 206eqeltrid 2842 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ ℝ)
208 0red 11165 . . . . . . . . 9 (πœ‘ β†’ 0 ∈ ℝ)
209 1rp 12926 . . . . . . . . . . . . 13 1 ∈ ℝ+
210209a1i 11 . . . . . . . . . . . 12 (πœ‘ β†’ 1 ∈ ℝ+)
211210, 172jca 513 . . . . . . . . . . 11 (πœ‘ β†’ (1 ∈ ℝ+ ∧ 𝐸 ∈ ℝ+))
212 rpaddcl 12944 . . . . . . . . . . 11 ((1 ∈ ℝ+ ∧ 𝐸 ∈ ℝ+) β†’ (1 + 𝐸) ∈ ℝ+)
213211, 212syl 17 . . . . . . . . . 10 (πœ‘ β†’ (1 + 𝐸) ∈ ℝ+)
214 rpgt0 12934 . . . . . . . . . 10 ((1 + 𝐸) ∈ ℝ+ β†’ 0 < (1 + 𝐸))
215213, 214syl 17 . . . . . . . . 9 (πœ‘ β†’ 0 < (1 + 𝐸))
216208, 215gtned 11297 . . . . . . . 8 (πœ‘ β†’ (1 + 𝐸) β‰  0)
217207, 174, 216redivcld 11990 . . . . . . 7 (πœ‘ β†’ (𝐺 / (1 + 𝐸)) ∈ ℝ)
218217adantr 482 . . . . . 6 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐺 / (1 + 𝐸)) ∈ ℝ)
219217ltpnfd 13049 . . . . . . . . . 10 (πœ‘ β†’ (𝐺 / (1 + 𝐸)) < +∞)
220219adantr 482 . . . . . . . . 9 ((πœ‘ ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (𝐺 / (1 + 𝐸)) < +∞)
221 id 22 . . . . . . . . . . 11 ((Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞ β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞)
222221eqcomd 2743 . . . . . . . . . 10 ((Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞ β†’ +∞ = (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
223222adantl 483 . . . . . . . . 9 ((πœ‘ ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ +∞ = (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
224220, 223breqtrd 5136 . . . . . . . 8 ((πœ‘ ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (𝐺 / (1 + 𝐸)) < (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
225224adantlr 714 . . . . . . 7 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (𝐺 / (1 + 𝐸)) < (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
226 simpl 484 . . . . . . . 8 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (πœ‘ ∧ π‘Œ β‰  βˆ…))
227 simpr 486 . . . . . . . . . 10 ((πœ‘ ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞)
228 nnex 12166 . . . . . . . . . . . 12 β„• ∈ V
229228a1i 11 . . . . . . . . . . 11 ((πœ‘ ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ β„• ∈ V)
230 icossicc 13360 . . . . . . . . . . . . . 14 (0[,)+∞) βŠ† (0[,]+∞)
231230, 114sselid 3947 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) ∈ (0[,]+∞))
232 eqid 2737 . . . . . . . . . . . . 13 (𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—)) = (𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))
233231, 232fmptd 7067 . . . . . . . . . . . 12 (πœ‘ β†’ (𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—)):β„•βŸΆ(0[,]+∞))
234233adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—)):β„•βŸΆ(0[,]+∞))
235229, 234sge0repnf 44701 . . . . . . . . . 10 ((πœ‘ ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ ((Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ ↔ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞))
236227, 235mpbird 257 . . . . . . . . 9 ((πœ‘ ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ)
237236adantlr 714 . . . . . . . 8 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ)
238218adantr 482 . . . . . . . . 9 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ (𝐺 / (1 + 𝐸)) ∈ ℝ)
239207adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ 𝐺 ∈ ℝ)
240239adantlr 714 . . . . . . . . 9 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ 𝐺 ∈ ℝ)
241 simpr 486 . . . . . . . . 9 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ)
24227, 172ltaddrpd 12997 . . . . . . . . . . . 12 (πœ‘ β†’ 1 < (1 + 𝐸))
243242adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 1 < (1 + 𝐸))
24458adantr 482 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ π‘Œ ∈ Fin)
245 simpr 486 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ π‘Œ β‰  βˆ…)
246202adantr 482 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐴 β†Ύ π‘Œ):π‘ŒβŸΆβ„)
247204adantr 482 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐡 β†Ύ π‘Œ):π‘ŒβŸΆβ„)
24818, 244, 245, 246, 247hoidmvn0val 44899 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) = βˆπ‘˜ ∈ π‘Œ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))))
2495a1i 11 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 𝐺 = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)))
250 fvres 6866 . . . . . . . . . . . . . . . . . . . . 21 (π‘˜ ∈ π‘Œ β†’ ((𝐴 β†Ύ π‘Œ)β€˜π‘˜) = (π΄β€˜π‘˜))
251 fvres 6866 . . . . . . . . . . . . . . . . . . . . 21 (π‘˜ ∈ π‘Œ β†’ ((𝐡 β†Ύ π‘Œ)β€˜π‘˜) = (π΅β€˜π‘˜))
252250, 251oveq12d 7380 . . . . . . . . . . . . . . . . . . . 20 (π‘˜ ∈ π‘Œ β†’ (((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
253252fveq2d 6851 . . . . . . . . . . . . . . . . . . 19 (π‘˜ ∈ π‘Œ β†’ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))) = (volβ€˜((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
254253adantl 483 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))) = (volβ€˜((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
255200adantr 482 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ 𝐴:π‘ŠβŸΆβ„)
256 elun1 4141 . . . . . . . . . . . . . . . . . . . . . 22 (π‘˜ ∈ π‘Œ β†’ π‘˜ ∈ (π‘Œ βˆͺ {𝑍}))
257256, 44eleqtrrdi 2849 . . . . . . . . . . . . . . . . . . . . 21 (π‘˜ ∈ π‘Œ β†’ π‘˜ ∈ π‘Š)
258257adantl 483 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ π‘Š)
259255, 258ffvelcdmd 7041 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (π΄β€˜π‘˜) ∈ ℝ)
260203adantr 482 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ 𝐡:π‘ŠβŸΆβ„)
261260, 258ffvelcdmd 7041 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (π΅β€˜π‘˜) ∈ ℝ)
262 volico 44298 . . . . . . . . . . . . . . . . . . 19 (((π΄β€˜π‘˜) ∈ ℝ ∧ (π΅β€˜π‘˜) ∈ ℝ) β†’ (volβ€˜((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) = if((π΄β€˜π‘˜) < (π΅β€˜π‘˜), ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)), 0))
263259, 261, 262syl2anc 585 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (volβ€˜((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) = if((π΄β€˜π‘˜) < (π΅β€˜π‘˜), ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)), 0))
264 hoidmvlelem3.lt . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ π‘Š) β†’ (π΄β€˜π‘˜) < (π΅β€˜π‘˜))
265258, 264syldan 592 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (π΄β€˜π‘˜) < (π΅β€˜π‘˜))
266265iftrued 4499 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ if((π΄β€˜π‘˜) < (π΅β€˜π‘˜), ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)), 0) = ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
267254, 263, 2663eqtrd 2781 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))) = ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
268267prodeq2dv 15813 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ βˆπ‘˜ ∈ π‘Œ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))) = βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
269268eqcomd 2743 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) = βˆπ‘˜ ∈ π‘Œ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))))
270269adantr 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) = βˆπ‘˜ ∈ π‘Œ (volβ€˜(((𝐴 β†Ύ π‘Œ)β€˜π‘˜)[,)((𝐡 β†Ύ π‘Œ)β€˜π‘˜))))
271248, 249, 2703eqtr4d 2787 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 𝐺 = βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
272 difrp 12960 . . . . . . . . . . . . . . . . 17 (((π΄β€˜π‘˜) ∈ ℝ ∧ (π΅β€˜π‘˜) ∈ ℝ) β†’ ((π΄β€˜π‘˜) < (π΅β€˜π‘˜) ↔ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) ∈ ℝ+))
273259, 261, 272syl2anc 585 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ ((π΄β€˜π‘˜) < (π΅β€˜π‘˜) ↔ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) ∈ ℝ+))
274265, 273mpbid 231 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) ∈ ℝ+)
27558, 274fprodrpcl 15846 . . . . . . . . . . . . . 14 (πœ‘ β†’ βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) ∈ ℝ+)
276275adantr 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ βˆπ‘˜ ∈ π‘Œ ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)) ∈ ℝ+)
277271, 276eqeltrd 2838 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 𝐺 ∈ ℝ+)
278213adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (1 + 𝐸) ∈ ℝ+)
279277, 278ltdivgt1 43664 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (1 < (1 + 𝐸) ↔ (𝐺 / (1 + 𝐸)) < 𝐺))
280243, 279mpbid 231 . . . . . . . . . 10 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐺 / (1 + 𝐸)) < 𝐺)
281280adantr 482 . . . . . . . . 9 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ (𝐺 / (1 + 𝐸)) < 𝐺)
282 hoidmvlelem3.i2 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ Xπ‘˜ ∈ π‘Š ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
283282adantr 482 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ Xπ‘˜ ∈ π‘Š ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
284 fvexd 6862 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ (π‘₯β€˜π‘˜) ∈ V)
285 hoidmvlelem3.s . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (πœ‘ β†’ 𝑆 ∈ π‘ˆ)
286285elexd 3468 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑆 ∈ V)
287284, 286ifcld 4537 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V)
288287ralrimivw 3148 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ βˆ€π‘˜ ∈ π‘Š if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V)
289288adantr 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ βˆ€π‘˜ ∈ π‘Š if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V)
290 eqid 2737 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) = (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
291290fnmpt 6646 . . . . . . . . . . . . . . . . . . . . . . . 24 (βˆ€π‘˜ ∈ π‘Š if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) Fn π‘Š)
292289, 291syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) Fn π‘Š)
293 simpr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
294 mptexg 7176 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (π‘Š ∈ Fin β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) ∈ V)
29553, 294syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) ∈ V)
296295adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) ∈ V)
297 hoidmvlelem3.o . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑂 = (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ↦ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)))
298297fvmpt2 6964 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) ∈ V) β†’ (π‘‚β€˜π‘₯) = (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)))
299293, 296, 298syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘‚β€˜π‘₯) = (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)))
300299fneq1d 6600 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯) Fn π‘Š ↔ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) Fn π‘Š))
301292, 300mpbird 257 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘‚β€˜π‘₯) Fn π‘Š)
302 nfv 1918 . . . . . . . . . . . . . . . . . . . . . . . 24 β„²π‘˜πœ‘
303 nfcv 2908 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜π‘₯
304 nfixp1 8863 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))
305303, 304nfel 2922 . . . . . . . . . . . . . . . . . . . . . . . 24 β„²π‘˜ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))
306302, 305nfan 1903 . . . . . . . . . . . . . . . . . . . . . . 23 β„²π‘˜(πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
307299fveq1d 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) = ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜))
308307adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) = ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜))
309 simpr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((πœ‘ ∧ π‘˜ ∈ π‘Š) β†’ π‘˜ ∈ π‘Š)
310287adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((πœ‘ ∧ π‘˜ ∈ π‘Š) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V)
311290fvmpt2 6964 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((π‘˜ ∈ π‘Š ∧ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
312309, 310, 311syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((πœ‘ ∧ π‘˜ ∈ π‘Š) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
313312adantlr 714 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
314308, 313eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
315 iftrue 4497 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (π‘˜ ∈ π‘Œ β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = (π‘₯β€˜π‘˜))
316315adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) ∧ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = (π‘₯β€˜π‘˜))
317 vex 3452 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 π‘₯ ∈ V
318317elixp 8849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ↔ (π‘₯ Fn π‘Œ ∧ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
319318simprbi 498 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) β†’ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
320319adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
321 simpr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ π‘Œ)
322 rspa 3234 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
323320, 321, 322syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
324323ad4ant24 753 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
325316, 324eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) ∧ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
326 snidg 4625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑍 ∈ (𝑋 βˆ– π‘Œ) β†’ 𝑍 ∈ {𝑍})
32747, 326syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (πœ‘ β†’ 𝑍 ∈ {𝑍})
328 elun2 4142 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑍 ∈ {𝑍} β†’ 𝑍 ∈ (π‘Œ βˆͺ {𝑍}))
329327, 328syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (πœ‘ β†’ 𝑍 ∈ (π‘Œ βˆͺ {𝑍}))
33055a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (πœ‘ β†’ (π‘Œ βˆͺ {𝑍}) = π‘Š)
331329, 330eleqtrd 2840 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (πœ‘ β†’ 𝑍 ∈ π‘Š)
332200, 331ffvelcdmd 7041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (πœ‘ β†’ (π΄β€˜π‘) ∈ ℝ)
333332rexrd 11212 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (πœ‘ β†’ (π΄β€˜π‘) ∈ ℝ*)
334203, 331ffvelcdmd 7041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (πœ‘ β†’ (π΅β€˜π‘) ∈ ℝ)
335334rexrd 11212 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (πœ‘ β†’ (π΅β€˜π‘) ∈ ℝ*)
336 iccssxr 13354 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((π΄β€˜π‘)[,](π΅β€˜π‘)) βŠ† ℝ*
337 hoidmvlelem3.u . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 π‘ˆ = {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))))))}
338 ssrab2 4042 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))))))} βŠ† ((π΄β€˜π‘)[,](π΅β€˜π‘))
339337, 338eqsstri 3983 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 π‘ˆ βŠ† ((π΄β€˜π‘)[,](π΅β€˜π‘))
340339, 285sselid 3947 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (πœ‘ β†’ 𝑆 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)))
341336, 340sselid 3947 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (πœ‘ β†’ 𝑆 ∈ ℝ*)
342 iccgelb 13327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((π΄β€˜π‘) ∈ ℝ* ∧ (π΅β€˜π‘) ∈ ℝ* ∧ 𝑆 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘))) β†’ (π΄β€˜π‘) ≀ 𝑆)
343333, 335, 340, 342syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (πœ‘ β†’ (π΄β€˜π‘) ≀ 𝑆)
344 hoidmvlelem3.sb . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (πœ‘ β†’ 𝑆 < (π΅β€˜π‘))
345333, 335, 341, 343, 344elicod 13321 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (πœ‘ β†’ 𝑆 ∈ ((π΄β€˜π‘)[,)(π΅β€˜π‘)))
346345ad2antrr 725 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((πœ‘ ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ 𝑆 ∈ ((π΄β€˜π‘)[,)(π΅β€˜π‘)))
347 iffalse 4500 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (Β¬ π‘˜ ∈ π‘Œ β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = 𝑆)
348347adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((πœ‘ ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = 𝑆)
34944eleq2i 2830 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (π‘˜ ∈ π‘Š ↔ π‘˜ ∈ (π‘Œ βˆͺ {𝑍}))
350349biimpi 215 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (π‘˜ ∈ π‘Š β†’ π‘˜ ∈ (π‘Œ βˆͺ {𝑍}))
351350adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((π‘˜ ∈ π‘Š ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ (π‘Œ βˆͺ {𝑍}))
352 simpr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((π‘˜ ∈ π‘Š ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ Β¬ π‘˜ ∈ π‘Œ)
353 elunnel1 4114 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((π‘˜ ∈ (π‘Œ βˆͺ {𝑍}) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ {𝑍})
354351, 352, 353syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((π‘˜ ∈ π‘Š ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ {𝑍})
355 elsni 4608 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (π‘˜ ∈ {𝑍} β†’ π‘˜ = 𝑍)
356354, 355syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((π‘˜ ∈ π‘Š ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ π‘˜ = 𝑍)
357 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (π‘˜ = 𝑍 β†’ (π΄β€˜π‘˜) = (π΄β€˜π‘))
358 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (π‘˜ = 𝑍 β†’ (π΅β€˜π‘˜) = (π΅β€˜π‘))
359357, 358oveq12d 7380 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (π‘˜ = 𝑍 β†’ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) = ((π΄β€˜π‘)[,)(π΅β€˜π‘)))
360356, 359syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((π‘˜ ∈ π‘Š ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) = ((π΄β€˜π‘)[,)(π΅β€˜π‘)))
361360adantll 713 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((πœ‘ ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) = ((π΄β€˜π‘)[,)(π΅β€˜π‘)))
362348, 361eleq12d 2832 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((πœ‘ ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ (if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ↔ 𝑆 ∈ ((π΄β€˜π‘)[,)(π΅β€˜π‘))))
363346, 362mpbird 257 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((πœ‘ ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
364363adantllr 718 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) ∧ Β¬ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
365325, 364pm2.61dan 812 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
366314, 365eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . . . . 24 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ π‘˜ ∈ π‘Š) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
367366ex 414 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘˜ ∈ π‘Š β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
368306, 367ralrimi 3243 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
369301, 368jca 513 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯) Fn π‘Š ∧ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
370 fvex 6860 . . . . . . . . . . . . . . . . . . . . . 22 (π‘‚β€˜π‘₯) ∈ V
371370elixp 8849 . . . . . . . . . . . . . . . . . . . . 21 ((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ↔ ((π‘‚β€˜π‘₯) Fn π‘Š ∧ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))))
372369, 371sylibr 233 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
373283, 372sseldd 3950 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (π‘‚β€˜π‘₯) ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
374 eliun 4963 . . . . . . . . . . . . . . . . . . 19 ((π‘‚β€˜π‘₯) ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ↔ βˆƒπ‘— ∈ β„• (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
375373, 374sylib 217 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ βˆƒπ‘— ∈ β„• (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
376 ixpfn 8848 . . . . . . . . . . . . . . . . . . . . . . . 24 (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) β†’ π‘₯ Fn π‘Œ)
377376adantl 483 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ π‘₯ Fn π‘Œ)
378377ad2antrr 725 . . . . . . . . . . . . . . . . . . . . . 22 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ π‘₯ Fn π‘Œ)
379 nfv 1918 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜ 𝑗 ∈ β„•
380306, 379nfan 1903 . . . . . . . . . . . . . . . . . . . . . . . 24 β„²π‘˜((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•)
381 nfcv 2908 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜(π‘‚β€˜π‘₯)
382 nfixp1 8863 . . . . . . . . . . . . . . . . . . . . . . . . 25 β„²π‘˜Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))
383381, 382nfel 2922 . . . . . . . . . . . . . . . . . . . . . . . 24 β„²π‘˜(π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))
384380, 383nfan 1903 . . . . . . . . . . . . . . . . . . . . . . 23 β„²π‘˜(((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
3853073adant3 1133 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) = ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜))
386287adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) ∈ V)
387258, 386, 311syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((πœ‘ ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
3883873adant2 1132 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘˜) = if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))
3893153ad2ant3 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = (π‘₯β€˜π‘˜))
390385, 388, 3893eqtrrd 2782 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) = ((π‘‚β€˜π‘₯)β€˜π‘˜))
391390ad5ant125 1367 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) = ((π‘‚β€˜π‘₯)β€˜π‘˜))
392 simpl 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
393370elixp 8849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ↔ ((π‘‚β€˜π‘₯) Fn π‘Š ∧ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))))
394392, 393sylib 217 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘‚β€˜π‘₯) Fn π‘Š ∧ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))))
395394simprd 497 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
396257adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ π‘˜ ∈ π‘Š)
397 rspa 3234 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Š) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
398395, 396, 397syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
399398adantll 713 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
400391, 399eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
40129ad3antrrr 729 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ πœ‘)
40237ad2antlr 726 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ 𝑗 ∈ β„•)
403299fveq1d 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯)β€˜π‘) = ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘))
404 eqidd 2738 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (πœ‘ β†’ (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)) = (π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆)))
405 eleq1 2826 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (π‘˜ = 𝑍 β†’ (π‘˜ ∈ π‘Œ ↔ 𝑍 ∈ π‘Œ))
406 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (π‘˜ = 𝑍 β†’ (π‘₯β€˜π‘˜) = (π‘₯β€˜π‘))
407405, 406ifbieq1d 4515 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (π‘˜ = 𝑍 β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆))
408407adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((πœ‘ ∧ π‘˜ = 𝑍) β†’ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆) = if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆))
409 fvexd 6862 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (πœ‘ β†’ (π‘₯β€˜π‘) ∈ V)
410409, 286ifcld 4537 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (πœ‘ β†’ if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆) ∈ V)
411404, 408, 331, 410fvmptd 6960 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (πœ‘ β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘) = if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆))
412411adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ ((π‘˜ ∈ π‘Š ↦ if(π‘˜ ∈ π‘Œ, (π‘₯β€˜π‘˜), 𝑆))β€˜π‘) = if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆))
41347eldifbd 3928 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (πœ‘ β†’ Β¬ 𝑍 ∈ π‘Œ)
414413iffalsed 4502 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (πœ‘ β†’ if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆) = 𝑆)
415414adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ if(𝑍 ∈ π‘Œ, (π‘₯β€˜π‘), 𝑆) = 𝑆)
416403, 412, 4153eqtrrd 2782 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ 𝑆 = ((π‘‚β€˜π‘₯)β€˜π‘))
417416ad2antrr 725 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ 𝑆 = ((π‘‚β€˜π‘₯)β€˜π‘))
418401, 331syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ 𝑍 ∈ π‘Š)
419393simprbi 498 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) β†’ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
420419adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
421 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (π‘˜ = 𝑍 β†’ ((π‘‚β€˜π‘₯)β€˜π‘˜) = ((π‘‚β€˜π‘₯)β€˜π‘))
422 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (π‘˜ = 𝑍 β†’ ((πΆβ€˜π‘—)β€˜π‘˜) = ((πΆβ€˜π‘—)β€˜π‘))
423 fveq2 6847 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (π‘˜ = 𝑍 β†’ ((π·β€˜π‘—)β€˜π‘˜) = ((π·β€˜π‘—)β€˜π‘))
424422, 423oveq12d 7380 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (π‘˜ = 𝑍 β†’ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) = (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)))
425421, 424eleq12d 2832 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (π‘˜ = 𝑍 β†’ (((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) ↔ ((π‘‚β€˜π‘₯)β€˜π‘) ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))))
426425rspcva 3582 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑍 ∈ π‘Š ∧ βˆ€π‘˜ ∈ π‘Š ((π‘‚β€˜π‘₯)β€˜π‘˜) ∈ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯)β€˜π‘) ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)))
427418, 420, 426syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ ((π‘‚β€˜π‘₯)β€˜π‘) ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)))
428417, 427eqeltrd 2838 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)))
4291493adant3 1133 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (π½β€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹))
430603ad2ant3 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((πΆβ€˜π‘—) β†Ύ π‘Œ))
431429, 430eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (π½β€˜π‘—) = ((πΆβ€˜π‘—) β†Ύ π‘Œ))
432431fveq1d 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ ((π½β€˜π‘—)β€˜π‘˜) = (((πΆβ€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
433401, 402, 428, 432syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ ((π½β€˜π‘—)β€˜π‘˜) = (((πΆβ€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
434433adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ ((π½β€˜π‘—)β€˜π‘˜) = (((πΆβ€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
435 fvres 6866 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (π‘˜ ∈ π‘Œ β†’ (((πΆβ€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜) = ((πΆβ€˜π‘—)β€˜π‘˜))
436435adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (((πΆβ€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜) = ((πΆβ€˜π‘—)β€˜π‘˜))
437434, 436eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ ((π½β€˜π‘—)β€˜π‘˜) = ((πΆβ€˜π‘—)β€˜π‘˜))
438107elexd 3468 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V)
439108fvmpt2 6964 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑗 ∈ β„• ∧ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ∈ V) β†’ (πΎβ€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹))
440139, 438, 439syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΎβ€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹))
4414403adant3 1133 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (πΎβ€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹))
442933ad2ant3 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = ((π·β€˜π‘—) β†Ύ π‘Œ))
443441, 442eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ (πΎβ€˜π‘—) = ((π·β€˜π‘—) β†Ύ π‘Œ))
444443fveq1d 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ 𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘))) β†’ ((πΎβ€˜π‘—)β€˜π‘˜) = (((π·β€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
445401, 402, 428, 444syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ ((πΎβ€˜π‘—)β€˜π‘˜) = (((π·β€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
446445adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ ((πΎβ€˜π‘—)β€˜π‘˜) = (((π·β€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜))
447 fvres 6866 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (π‘˜ ∈ π‘Œ β†’ (((π·β€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜) = ((π·β€˜π‘—)β€˜π‘˜))
448447adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (((π·β€˜π‘—) β†Ύ π‘Œ)β€˜π‘˜) = ((π·β€˜π‘—)β€˜π‘˜))
449446, 448eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ ((πΎβ€˜π‘—)β€˜π‘˜) = ((π·β€˜π‘—)β€˜π‘˜))
450437, 449oveq12d 7380 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) = (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)))
451450eqcomd 2743 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) = (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
452400, 451eleqtrd 2840 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘₯β€˜π‘˜) ∈ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
453452ex 414 . . . . . . . . . . . . . . . . . . . . . . 23 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ (π‘˜ ∈ π‘Œ β†’ (π‘₯β€˜π‘˜) ∈ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
454384, 453ralrimi 3243 . . . . . . . . . . . . . . . . . . . . . 22 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
455378, 454jca 513 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ (π‘₯ Fn π‘Œ ∧ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
456317elixp 8849 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) ↔ (π‘₯ Fn π‘Œ ∧ βˆ€π‘˜ ∈ π‘Œ (π‘₯β€˜π‘˜) ∈ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
457455, 456sylibr 233 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) ∧ (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜))) β†’ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
458457ex 414 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) ∧ 𝑗 ∈ β„•) β†’ ((π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) β†’ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
459458reximdva 3166 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ (βˆƒπ‘— ∈ β„• (π‘‚β€˜π‘₯) ∈ Xπ‘˜ ∈ π‘Š (((πΆβ€˜π‘—)β€˜π‘˜)[,)((π·β€˜π‘—)β€˜π‘˜)) β†’ βˆƒπ‘— ∈ β„• π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
460375, 459mpd 15 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ βˆƒπ‘— ∈ β„• π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
461 eliun 4963 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) ↔ βˆƒπ‘— ∈ β„• π‘₯ ∈ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
462460, 461sylibr 233 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))) β†’ π‘₯ ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
463462ralrimiva 3144 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆ€π‘₯ ∈ X π‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))π‘₯ ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
464 dfss3 3937 . . . . . . . . . . . . . . 15 (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) ↔ βˆ€π‘₯ ∈ X π‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜))π‘₯ ∈ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
465463, 464sylibr 233 . . . . . . . . . . . . . 14 (πœ‘ β†’ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
466 ovexd 7397 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (ℝ ↑m π‘Œ) ∈ V)
467228a1i 11 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ β„• ∈ V)
468466, 467elmapd 8786 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (𝐾 ∈ ((ℝ ↑m π‘Œ) ↑m β„•) ↔ 𝐾:β„•βŸΆ(ℝ ↑m π‘Œ)))
469109, 468mpbird 257 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐾 ∈ ((ℝ ↑m π‘Œ) ↑m β„•))
470466, 467elmapd 8786 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (𝐽 ∈ ((ℝ ↑m π‘Œ) ↑m β„•) ↔ 𝐽:β„•βŸΆ(ℝ ↑m π‘Œ)))
47189, 470mpbird 257 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝐽 ∈ ((ℝ ↑m π‘Œ) ↑m β„•))
47282, 71elmapd 8786 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ ((𝐡 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ↔ (𝐡 β†Ύ π‘Œ):π‘ŒβŸΆβ„))
473204, 472mpbird 257 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (𝐡 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
47482, 71elmapd 8786 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ((𝐴 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ↔ (𝐴 β†Ύ π‘Œ):π‘ŒβŸΆβ„))
475202, 474mpbird 257 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (𝐴 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ))
476 hoidmvlelem3.i . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ βˆ€π‘’ ∈ (ℝ ↑m π‘Œ)βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
477 fveq1 6846 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (π‘’β€˜π‘˜) = ((𝐴 β†Ύ π‘Œ)β€˜π‘˜))
478477adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑒 = (𝐴 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘’β€˜π‘˜) = ((𝐴 β†Ύ π‘Œ)β€˜π‘˜))
479250adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑒 = (𝐴 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ ((𝐴 β†Ύ π‘Œ)β€˜π‘˜) = (π΄β€˜π‘˜))
480478, 479eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑒 = (𝐴 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘’β€˜π‘˜) = (π΄β€˜π‘˜))
481480oveq1d 7377 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑒 = (𝐴 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)))
482481ixpeq2dva 8857 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) = Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)))
483482sseq1d 3980 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) ↔ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜))))
484 oveq1 7369 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓))
485484breq1d 5120 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ ((𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) ↔ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
486483, 485imbi12d 345 . . . . . . . . . . . . . . . . . . . . . 22 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ ((Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
487486ralbidv 3175 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
488487ralbidv 3175 . . . . . . . . . . . . . . . . . . . 20 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
489488ralbidv 3175 . . . . . . . . . . . . . . . . . . 19 (𝑒 = (𝐴 β†Ύ π‘Œ) β†’ (βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
490489rspcva 3582 . . . . . . . . . . . . . . . . . 18 (((𝐴 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ∧ βˆ€π‘’ ∈ (ℝ ↑m π‘Œ)βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π‘’β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ (𝑒(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))) β†’ βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
491475, 476, 490syl2anc 585 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
492 fveq1 6846 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ (π‘“β€˜π‘˜) = ((𝐡 β†Ύ π‘Œ)β€˜π‘˜))
493492adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑓 = (𝐡 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘“β€˜π‘˜) = ((𝐡 β†Ύ π‘Œ)β€˜π‘˜))
494251adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑓 = (𝐡 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ ((𝐡 β†Ύ π‘Œ)β€˜π‘˜) = (π΅β€˜π‘˜))
495493, 494eqtrd 2777 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑓 = (𝐡 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ (π‘“β€˜π‘˜) = (π΅β€˜π‘˜))
496495oveq2d 7378 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑓 = (𝐡 β†Ύ π‘Œ) ∧ π‘˜ ∈ π‘Œ) β†’ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
497496ixpeq2dva 8857 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) = Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)))
498497sseq1d 3980 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) ↔ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜))))
499 oveq2 7370 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) = ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)))
500499breq1d 5120 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ (((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) ↔ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
501498, 500imbi12d 345 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ ((Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
502501ralbidv 3175 . . . . . . . . . . . . . . . . . . 19 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ (βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
503502ralbidv 3175 . . . . . . . . . . . . . . . . . 18 (𝑓 = (𝐡 β†Ύ π‘Œ) β†’ (βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
504503rspcva 3582 . . . . . . . . . . . . . . . . 17 (((𝐡 β†Ύ π‘Œ) ∈ (ℝ ↑m π‘Œ) ∧ βˆ€π‘“ ∈ (ℝ ↑m π‘Œ)βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π‘“β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)𝑓) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))) β†’ βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
505473, 491, 504syl2anc 585 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
506 fveq1 6846 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = 𝐽 β†’ (π‘”β€˜π‘—) = (π½β€˜π‘—))
507506fveq1d 6849 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔 = 𝐽 β†’ ((π‘”β€˜π‘—)β€˜π‘˜) = ((π½β€˜π‘—)β€˜π‘˜))
508507oveq1d 7377 . . . . . . . . . . . . . . . . . . . . . 22 (𝑔 = 𝐽 β†’ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)))
509508ixpeq2dv 8858 . . . . . . . . . . . . . . . . . . . . 21 (𝑔 = 𝐽 β†’ Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)))
510509iuneq2d 4988 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = 𝐽 β†’ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)))
511510sseq2d 3981 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝐽 β†’ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) ↔ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜))))
512506oveq1d 7377 . . . . . . . . . . . . . . . . . . . . . 22 (𝑔 = 𝐽 β†’ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))
513512mpteq2dv 5212 . . . . . . . . . . . . . . . . . . . . 21 (𝑔 = 𝐽 β†’ (𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))) = (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))
514513fveq2d 6851 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = 𝐽 β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) = (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))
515514breq2d 5122 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝐽 β†’ (((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) ↔ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
516511, 515imbi12d 345 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝐽 β†’ ((Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
517516ralbidv 3175 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝐽 β†’ (βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))))
518517rspcva 3582 . . . . . . . . . . . . . . . 16 ((𝐽 ∈ ((ℝ ↑m π‘Œ) ↑m β„•) ∧ βˆ€π‘” ∈ ((ℝ ↑m π‘Œ) ↑m β„•)βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π‘”β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π‘”β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))) β†’ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
519471, 505, 518syl2anc 585 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))))
520 fveq1 6846 . . . . . . . . . . . . . . . . . . . . . 22 (β„Ž = 𝐾 β†’ (β„Žβ€˜π‘—) = (πΎβ€˜π‘—))
521520fveq1d 6849 . . . . . . . . . . . . . . . . . . . . 21 (β„Ž = 𝐾 β†’ ((β„Žβ€˜π‘—)β€˜π‘˜) = ((πΎβ€˜π‘—)β€˜π‘˜))
522521oveq2d 7378 . . . . . . . . . . . . . . . . . . . 20 (β„Ž = 𝐾 β†’ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
523522ixpeq2dv 8858 . . . . . . . . . . . . . . . . . . 19 (β„Ž = 𝐾 β†’ Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
524523iuneq2d 4988 . . . . . . . . . . . . . . . . . 18 (β„Ž = 𝐾 β†’ βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) = βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)))
525524sseq2d 3981 . . . . . . . . . . . . . . . . 17 (β„Ž = 𝐾 β†’ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) ↔ Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜))))
526520oveq2d 7378 . . . . . . . . . . . . . . . . . . . 20 (β„Ž = 𝐾 β†’ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
527526mpteq2dv 5212 . . . . . . . . . . . . . . . . . . 19 (β„Ž = 𝐾 β†’ (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))) = (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))
528527fveq2d 6851 . . . . . . . . . . . . . . . . . 18 (β„Ž = 𝐾 β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) = (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))
529528breq2d 5122 . . . . . . . . . . . . . . . . 17 (β„Ž = 𝐾 β†’ (((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))) ↔ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))))
530525, 529imbi12d 345 . . . . . . . . . . . . . . . 16 (β„Ž = 𝐾 β†’ ((Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—))))) ↔ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))))
531530rspcva 3582 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ((ℝ ↑m π‘Œ) ↑m β„•) ∧ βˆ€β„Ž ∈ ((ℝ ↑m π‘Œ) ↑m β„•)(Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((β„Žβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(β„Žβ€˜π‘—)))))) β†’ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))))
532469, 519, 531syl2anc 585 . . . . . . . . . . . . . 14 (πœ‘ β†’ (Xπ‘˜ ∈ π‘Œ ((π΄β€˜π‘˜)[,)(π΅β€˜π‘˜)) βŠ† βˆͺ 𝑗 ∈ β„• Xπ‘˜ ∈ π‘Œ (((π½β€˜π‘—)β€˜π‘˜)[,)((πΎβ€˜π‘—)β€˜π‘˜)) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))))
533465, 532mpd 15 . . . . . . . . . . . . 13 (πœ‘ β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))
534 idd 24 . . . . . . . . . . . . 13 (πœ‘ β†’ (((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))))
535533, 534mpd 15 . . . . . . . . . . . 12 (πœ‘ β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))
536535adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))
53741adantl 483 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))
538537mpteq2dva 5210 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—)) = (𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))
539538fveq2d 6851 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)))))
540249, 539breq12d 5123 . . . . . . . . . . 11 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐺 ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ↔ ((𝐴 β†Ύ π‘Œ)(πΏβ€˜π‘Œ)(𝐡 β†Ύ π‘Œ)) ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))))))
541536, 540mpbird 257 . . . . . . . . . 10 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ 𝐺 ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
542541adantr 482 . . . . . . . . 9 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ 𝐺 ≀ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
543238, 240, 241, 281, 542ltletrd 11322 . . . . . . . 8 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) ∈ ℝ) β†’ (𝐺 / (1 + 𝐸)) < (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
544226, 237, 543syl2anc 585 . . . . . . 7 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ Β¬ (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))) = +∞) β†’ (𝐺 / (1 + 𝐸)) < (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
545225, 544pm2.61dan 812 . . . . . 6 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (𝐺 / (1 + 𝐸)) < (Ξ£^β€˜(𝑗 ∈ β„• ↦ (π‘ƒβ€˜π‘—))))
546196, 197, 198, 199, 218, 545sge0uzfsumgt 44759 . . . . 5 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ βˆƒπ‘š ∈ β„• (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))
547217adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ (𝐺 / (1 + 𝐸)) ∈ ℝ)
548 fzfid 13885 . . . . . . . . . . . . 13 (πœ‘ β†’ (1...π‘š) ∈ Fin)
549 simpl 484 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (1...π‘š)) β†’ πœ‘)
550 elfznn 13477 . . . . . . . . . . . . . . 15 (𝑗 ∈ (1...π‘š) β†’ 𝑗 ∈ β„•)
551550adantl 483 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (1...π‘š)) β†’ 𝑗 ∈ β„•)
55228, 114sselid 3947 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π‘ƒβ€˜π‘—) ∈ ℝ)
553549, 551, 552syl2anc 585 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (1...π‘š)) β†’ (π‘ƒβ€˜π‘—) ∈ ℝ)
554548, 553fsumrecl 15626 . . . . . . . . . . . 12 (πœ‘ β†’ Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) ∈ ℝ)
555554adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) ∈ ℝ)
556 simpr 486 . . . . . . . . . . 11 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))
557547, 555, 556ltled 11310 . . . . . . . . . 10 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ (𝐺 / (1 + 𝐸)) ≀ Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))
558207adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ 𝐺 ∈ ℝ)
559213adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ (1 + 𝐸) ∈ ℝ+)
560558, 555, 559ledivmuld 13017 . . . . . . . . . 10 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ ((𝐺 / (1 + 𝐸)) ≀ Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) ↔ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))))
561557, 560mpbid 231 . . . . . . . . 9 ((πœ‘ ∧ (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
562561ex 414 . . . . . . . 8 (πœ‘ β†’ ((𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))))
563562adantr 482 . . . . . . 7 ((πœ‘ ∧ π‘š ∈ β„•) β†’ ((𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))))
564563adantlr 714 . . . . . 6 (((πœ‘ ∧ π‘Œ β‰  βˆ…) ∧ π‘š ∈ β„•) β†’ ((𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))))
565564reximdva 3166 . . . . 5 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ (βˆƒπ‘š ∈ β„• (𝐺 / (1 + 𝐸)) < Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))))
566546, 565mpd 15 . . . 4 ((πœ‘ ∧ π‘Œ β‰  βˆ…) β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
567193, 195, 566syl2anc 585 . . 3 ((πœ‘ ∧ Β¬ π‘Œ = βˆ…) β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
568192, 567pm2.61dan 812 . 2 (πœ‘ β†’ βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
569433ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝑋 ∈ Fin)
570463ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ π‘Œ βŠ† 𝑋)
571473ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝑍 ∈ (𝑋 βˆ– π‘Œ))
5722003ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐴:π‘ŠβŸΆβ„)
5732033ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐡:π‘ŠβŸΆβ„)
574623ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐢:β„•βŸΆ(ℝ ↑m π‘Š))
575 eqid 2737 . . . . 5 (𝑦 ∈ π‘Œ ↦ 0) = (𝑦 ∈ π‘Œ ↦ 0)
576 eqid 2737 . . . . 5 (𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0))) = (𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
577953ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐷:β„•βŸΆ(ℝ ↑m π‘Š))
578 eqid 2737 . . . . 5 (𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0))) = (𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
579 fveq2 6847 . . . . . . . . . 10 (𝑖 = 𝑗 β†’ (πΆβ€˜π‘–) = (πΆβ€˜π‘—))
580 fveq2 6847 . . . . . . . . . 10 (𝑖 = 𝑗 β†’ (π·β€˜π‘–) = (π·β€˜π‘—))
581579, 580oveq12d 7380 . . . . . . . . 9 (𝑖 = 𝑗 β†’ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)(π·β€˜π‘–)) = ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)(π·β€˜π‘—)))
582581cbvmptv 5223 . . . . . . . 8 (𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)(π·β€˜π‘–))) = (𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)(π·β€˜π‘—)))
583582fveq2i 6850 . . . . . . 7 (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)(π·β€˜π‘–)))) = (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)(π·β€˜π‘—))))
584 hoidmvlelem3.r . . . . . . 7 (πœ‘ β†’ (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)(π·β€˜π‘—)))) ∈ ℝ)
585583, 584eqeltrid 2842 . . . . . 6 (πœ‘ β†’ (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)(π·β€˜π‘–)))) ∈ ℝ)
5865853ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)(π·β€˜π‘–)))) ∈ ℝ)
587 hoidmvlelem3.h . . . . . 6 𝐻 = (π‘₯ ∈ ℝ ↦ (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑗 ∈ π‘Š ↦ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯)))))
588 eleq1w 2821 . . . . . . . . . 10 (𝑗 = 𝑖 β†’ (𝑗 ∈ π‘Œ ↔ 𝑖 ∈ π‘Œ))
589 fveq2 6847 . . . . . . . . . 10 (𝑗 = 𝑖 β†’ (π‘β€˜π‘—) = (π‘β€˜π‘–))
590589breq1d 5120 . . . . . . . . . . 11 (𝑗 = 𝑖 β†’ ((π‘β€˜π‘—) ≀ π‘₯ ↔ (π‘β€˜π‘–) ≀ π‘₯))
591590, 589ifbieq1d 4515 . . . . . . . . . 10 (𝑗 = 𝑖 β†’ if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯) = if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯))
592588, 589, 591ifbieq12d 4519 . . . . . . . . 9 (𝑗 = 𝑖 β†’ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯)) = if(𝑖 ∈ π‘Œ, (π‘β€˜π‘–), if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯)))
593592cbvmptv 5223 . . . . . . . 8 (𝑗 ∈ π‘Š ↦ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯))) = (𝑖 ∈ π‘Š ↦ if(𝑖 ∈ π‘Œ, (π‘β€˜π‘–), if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯)))
594593mpteq2i 5215 . . . . . . 7 (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑗 ∈ π‘Š ↦ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯)))) = (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑖 ∈ π‘Š ↦ if(𝑖 ∈ π‘Œ, (π‘β€˜π‘–), if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯))))
595594mpteq2i 5215 . . . . . 6 (π‘₯ ∈ ℝ ↦ (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑗 ∈ π‘Š ↦ if(𝑗 ∈ π‘Œ, (π‘β€˜π‘—), if((π‘β€˜π‘—) ≀ π‘₯, (π‘β€˜π‘—), π‘₯))))) = (π‘₯ ∈ ℝ ↦ (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑖 ∈ π‘Š ↦ if(𝑖 ∈ π‘Œ, (π‘β€˜π‘–), if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯)))))
596587, 595eqtri 2765 . . . . 5 𝐻 = (π‘₯ ∈ ℝ ↦ (𝑐 ∈ (ℝ ↑m π‘Š) ↦ (𝑖 ∈ π‘Š ↦ if(𝑖 ∈ π‘Œ, (π‘β€˜π‘–), if((π‘β€˜π‘–) ≀ π‘₯, (π‘β€˜π‘–), π‘₯)))))
5971723ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐸 ∈ ℝ+)
598 fveq2 6847 . . . . . . . . . . . 12 (𝑗 = 𝑖 β†’ (πΆβ€˜π‘—) = (πΆβ€˜π‘–))
599 fveq2 6847 . . . . . . . . . . . . 13 (𝑗 = 𝑖 β†’ (π·β€˜π‘—) = (π·β€˜π‘–))
600599fveq2d 6851 . . . . . . . . . . . 12 (𝑗 = 𝑖 β†’ ((π»β€˜π‘§)β€˜(π·β€˜π‘—)) = ((π»β€˜π‘§)β€˜(π·β€˜π‘–)))
601598, 600oveq12d 7380 . . . . . . . . . . 11 (𝑗 = 𝑖 β†’ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))) = ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–))))
602601cbvmptv 5223 . . . . . . . . . 10 (𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—)))) = (𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–))))
603602fveq2i 6850 . . . . . . . . 9 (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))))) = (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–)))))
604603oveq2i 7373 . . . . . . . 8 ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—)))))) = ((1 + 𝐸) Β· (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–))))))
605604breq2i 5118 . . . . . . 7 ((𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—)))))) ↔ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–)))))))
606605rabbii 3416 . . . . . 6 {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑗 ∈ β„• ↦ ((πΆβ€˜π‘—)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘—))))))} = {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–))))))}
607337, 606eqtri 2765 . . . . 5 π‘ˆ = {𝑧 ∈ ((π΄β€˜π‘)[,](π΅β€˜π‘)) ∣ (𝐺 Β· (𝑧 βˆ’ (π΄β€˜π‘))) ≀ ((1 + 𝐸) Β· (Ξ£^β€˜(𝑖 ∈ β„• ↦ ((πΆβ€˜π‘–)(πΏβ€˜π‘Š)((π»β€˜π‘§)β€˜(π·β€˜π‘–))))))}
6082853ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝑆 ∈ π‘ˆ)
6093443ad2ant1 1134 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝑆 < (π΅β€˜π‘))
610 eqid 2737 . . . . 5 (𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–))) = (𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))
611 simp2 1138 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ π‘š ∈ β„•)
612 id 22 . . . . . . . 8 (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)))
613 fveq2 6847 . . . . . . . . . . 11 (𝑗 = 𝑖 β†’ (π‘ƒβ€˜π‘—) = (π‘ƒβ€˜π‘–))
614613cbvsumv 15588 . . . . . . . . . 10 Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—) = Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–)
615614oveq2i 7373 . . . . . . . . 9 ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) = ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–))
616615a1i 11 . . . . . . . 8 (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) = ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–)))
617612, 616breqtrd 5136 . . . . . . 7 (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–)))
6186173ad2ant3 1136 . . . . . 6 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–)))
619 simpl 484 . . . . . . . . . 10 ((πœ‘ ∧ 𝑖 ∈ (1...π‘š)) β†’ πœ‘)
620 elfznn 13477 . . . . . . . . . . 11 (𝑖 ∈ (1...π‘š) β†’ 𝑖 ∈ β„•)
621620adantl 483 . . . . . . . . . 10 ((πœ‘ ∧ 𝑖 ∈ (1...π‘š)) β†’ 𝑖 ∈ β„•)
622 eleq1w 2821 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 β†’ (𝑗 ∈ β„• ↔ 𝑖 ∈ β„•))
623 fveq2 6847 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 β†’ (π½β€˜π‘—) = (π½β€˜π‘–))
624 fveq2 6847 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 β†’ (πΎβ€˜π‘—) = (πΎβ€˜π‘–))
625623, 624oveq12d 7380 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 β†’ ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) = ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–)))
626613, 625eqeq12d 2753 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 β†’ ((π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—)) ↔ (π‘ƒβ€˜π‘–) = ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–))))
627622, 626imbi12d 345 . . . . . . . . . . . . . 14 (𝑗 = 𝑖 β†’ ((𝑗 ∈ β„• β†’ (π‘ƒβ€˜π‘—) = ((π½β€˜π‘—)(πΏβ€˜π‘Œ)(πΎβ€˜π‘—))) ↔ (𝑖 ∈ β„• β†’ (π‘ƒβ€˜π‘–) = ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–)))))
628627, 41chvarvv 2003 . . . . . . . . . . . . 13 (𝑖 ∈ β„• β†’ (π‘ƒβ€˜π‘–) = ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–)))
629628adantl 483 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (π‘ƒβ€˜π‘–) = ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–)))
630622anbi2d 630 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 β†’ ((πœ‘ ∧ 𝑗 ∈ β„•) ↔ (πœ‘ ∧ 𝑖 ∈ β„•)))
631598fveq1d 6849 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑖 β†’ ((πΆβ€˜π‘—)β€˜π‘) = ((πΆβ€˜π‘–)β€˜π‘))
632599fveq1d 6849 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑖 β†’ ((π·β€˜π‘—)β€˜π‘) = ((π·β€˜π‘–)β€˜π‘))
633631, 632oveq12d 7380 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 β†’ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) = (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)))
634633eleq2d 2824 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 β†’ (𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)) ↔ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))))
635598reseq1d 5941 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 β†’ ((πΆβ€˜π‘—) β†Ύ π‘Œ) = ((πΆβ€˜π‘–) β†Ύ π‘Œ))
636634, 635ifbieq1d 4515 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))
637623, 636eqeq12d 2753 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 β†’ ((π½β€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹) ↔ (π½β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)))
638630, 637imbi12d 345 . . . . . . . . . . . . . 14 (𝑗 = 𝑖 β†’ (((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (π½β€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((πΆβ€˜π‘—) β†Ύ π‘Œ), 𝐹)) ↔ ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (π½β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))))
639638, 149chvarvv 2003 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (π½β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))
640599reseq1d 5941 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 β†’ ((π·β€˜π‘—) β†Ύ π‘Œ) = ((π·β€˜π‘–) β†Ύ π‘Œ))
641634, 640ifbieq1d 4515 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 β†’ if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹))
642624, 641eqeq12d 2753 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 β†’ ((πΎβ€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹) ↔ (πΎβ€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)))
643630, 642imbi12d 345 . . . . . . . . . . . . . 14 (𝑗 = 𝑖 β†’ (((πœ‘ ∧ 𝑗 ∈ β„•) β†’ (πΎβ€˜π‘—) = if(𝑆 ∈ (((πΆβ€˜π‘—)β€˜π‘)[,)((π·β€˜π‘—)β€˜π‘)), ((π·β€˜π‘—) β†Ύ π‘Œ), 𝐹)) ↔ ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (πΎβ€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹))))
644643, 440chvarvv 2003 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (πΎβ€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹))
645639, 644oveq12d 7380 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((π½β€˜π‘–)(πΏβ€˜π‘Œ)(πΎβ€˜π‘–)) = (if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)(πΏβ€˜π‘Œ)if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)))
646629, 645eqtrd 2777 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (π‘ƒβ€˜π‘–) = (if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)(πΏβ€˜π‘Œ)if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)))
647 simpr 486 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ 𝑖 ∈ β„•)
648 ovexd 7397 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)) ∈ V)
649610fvmpt2 6964 . . . . . . . . . . . . 13 ((𝑖 ∈ β„• ∧ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)) ∈ V) β†’ ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–) = (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))
650647, 648, 649syl2anc 585 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–) = (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))
651 fvex 6860 . . . . . . . . . . . . . . . . . . 19 (πΆβ€˜π‘–) ∈ V
652651resex 5990 . . . . . . . . . . . . . . . . . 18 ((πΆβ€˜π‘–) β†Ύ π‘Œ) ∈ V
653652a1i 11 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ ((πΆβ€˜π‘–) β†Ύ π‘Œ) ∈ V)
65480, 143eqeltrrid 2843 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (𝑦 ∈ π‘Œ ↦ 0) ∈ V)
655653, 654ifcld 4537 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V)
656655adantr 482 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V)
657576fvmpt2 6964 . . . . . . . . . . . . . . 15 ((𝑖 ∈ β„• ∧ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
658647, 656, 657syl2anc 585 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
65980eqcomi 2746 . . . . . . . . . . . . . . . 16 (𝑦 ∈ π‘Œ ↦ 0) = 𝐹
660 ifeq2 4496 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ π‘Œ ↦ 0) = 𝐹 β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))
661659, 660ax-mp 5 . . . . . . . . . . . . . . 15 if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)
662661a1i 11 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))
663658, 662eqtrd 2777 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹))
664 fvex 6860 . . . . . . . . . . . . . . . . . . 19 (π·β€˜π‘–) ∈ V
665664resex 5990 . . . . . . . . . . . . . . . . . 18 ((π·β€˜π‘–) β†Ύ π‘Œ) ∈ V
666665a1i 11 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ ((π·β€˜π‘–) β†Ύ π‘Œ) ∈ V)
667666, 654ifcld 4537 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V)
668667adantr 482 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V)
669578fvmpt2 6964 . . . . . . . . . . . . . . 15 ((𝑖 ∈ β„• ∧ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) ∈ V) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
670647, 668, 669syl2anc 585 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))
671 biid 261 . . . . . . . . . . . . . . . 16 (𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)) ↔ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)))
672671, 659ifbieq2i 4516 . . . . . . . . . . . . . . 15 if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)
673672a1i 11 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹))
674670, 673eqtrd 2777 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–) = if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹))
675663, 674oveq12d 7380 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)) = (if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)(πΏβ€˜π‘Œ)if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)))
676650, 675eqtrd 2777 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–) = (if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), 𝐹)(πΏβ€˜π‘Œ)if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), 𝐹)))
677646, 676eqtr4d 2780 . . . . . . . . . 10 ((πœ‘ ∧ 𝑖 ∈ β„•) β†’ (π‘ƒβ€˜π‘–) = ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–))
678619, 621, 677syl2anc 585 . . . . . . . . 9 ((πœ‘ ∧ 𝑖 ∈ (1...π‘š)) β†’ (π‘ƒβ€˜π‘–) = ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–))
6796783ad2antl1 1186 . . . . . . . 8 (((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) ∧ 𝑖 ∈ (1...π‘š)) β†’ (π‘ƒβ€˜π‘–) = ((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–))
680679sumeq2dv 15595 . . . . . . 7 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–) = Σ𝑖 ∈ (1...π‘š)((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–))
681680oveq2d 7378 . . . . . 6 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)(π‘ƒβ€˜π‘–)) = ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–)))
682618, 681breqtrd 5136 . . . . 5 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑖 ∈ (1...π‘š)((𝑖 ∈ β„• ↦ (((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((πΆβ€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)(πΏβ€˜π‘Œ)((𝑖 ∈ β„• ↦ if(𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)), ((π·β€˜π‘–) β†Ύ π‘Œ), (𝑦 ∈ π‘Œ ↦ 0)))β€˜π‘–)))β€˜π‘–)))
683 fveq2 6847 . . . . . . . 8 (𝑗 = β„Ž β†’ (π·β€˜π‘—) = (π·β€˜β„Ž))
684683fveq1d 6849 . . . . . . 7 (𝑗 = β„Ž β†’ ((π·β€˜π‘—)β€˜π‘) = ((π·β€˜β„Ž)β€˜π‘))
685684cbvmptv 5223 . . . . . 6 (𝑗 ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘)) = (β„Ž ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜β„Ž)β€˜π‘))
686685rneqi 5897 . . . . 5 ran (𝑗 ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘)) = ran (β„Ž ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜β„Ž)β€˜π‘))
687 fveq2 6847 . . . . . . . . . . . 12 (β„Ž = 𝑖 β†’ (πΆβ€˜β„Ž) = (πΆβ€˜π‘–))
688687fveq1d 6849 . . . . . . . . . . 11 (β„Ž = 𝑖 β†’ ((πΆβ€˜β„Ž)β€˜π‘) = ((πΆβ€˜π‘–)β€˜π‘))
689 fveq2 6847 . . . . . . . . . . . 12 (β„Ž = 𝑖 β†’ (π·β€˜β„Ž) = (π·β€˜π‘–))
690689fveq1d 6849 . . . . . . . . . . 11 (β„Ž = 𝑖 β†’ ((π·β€˜β„Ž)β€˜π‘) = ((π·β€˜π‘–)β€˜π‘))
691688, 690oveq12d 7380 . . . . . . . . . 10 (β„Ž = 𝑖 β†’ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘)) = (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘)))
692691eleq2d 2824 . . . . . . . . 9 (β„Ž = 𝑖 β†’ (𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘)) ↔ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))))
693692cbvrabv 3420 . . . . . . . 8 {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} = {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))}
694693mpteq1i 5206 . . . . . . 7 (𝑗 ∈ {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘)) = (𝑗 ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘))
695694rneqi 5897 . . . . . 6 ran (𝑗 ∈ {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘)) = ran (𝑗 ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘))
696695uneq2i 4125 . . . . 5 ({(π΅β€˜π‘)} βˆͺ ran (𝑗 ∈ {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘))) = ({(π΅β€˜π‘)} βˆͺ ran (𝑗 ∈ {𝑖 ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜π‘–)β€˜π‘)[,)((π·β€˜π‘–)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘)))
697 eqid 2737 . . . . 5 inf(({(π΅β€˜π‘)} βˆͺ ran (𝑗 ∈ {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘))), ℝ, < ) = inf(({(π΅β€˜π‘)} βˆͺ ran (𝑗 ∈ {β„Ž ∈ (1...π‘š) ∣ 𝑆 ∈ (((πΆβ€˜β„Ž)β€˜π‘)[,)((π·β€˜β„Ž)β€˜π‘))} ↦ ((π·β€˜π‘—)β€˜π‘))), ℝ, < )
69818, 569, 570, 571, 44, 572, 573, 574, 575, 576, 577, 578, 586, 596, 5, 597, 607, 608, 609, 610, 611, 682, 686, 696, 697hoidmvlelem2 44911 . . . 4 ((πœ‘ ∧ π‘š ∈ β„• ∧ 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—))) β†’ βˆƒπ‘’ ∈ π‘ˆ 𝑆 < 𝑒)
6996983exp 1120 . . 3 (πœ‘ β†’ (π‘š ∈ β„• β†’ (𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ βˆƒπ‘’ ∈ π‘ˆ 𝑆 < 𝑒)))
700699rexlimdv 3151 . 2 (πœ‘ β†’ (βˆƒπ‘š ∈ β„• 𝐺 ≀ ((1 + 𝐸) Β· Σ𝑗 ∈ (1...π‘š)(π‘ƒβ€˜π‘—)) β†’ βˆƒπ‘’ ∈ π‘ˆ 𝑆 < 𝑒))
701568, 700mpd 15 1 (πœ‘ β†’ βˆƒπ‘’ ∈ π‘ˆ 𝑆 < 𝑒)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107   β‰  wne 2944  βˆ€wral 3065  βˆƒwrex 3074  {crab 3410  Vcvv 3448   βˆ– cdif 3912   βˆͺ cun 3913   βŠ† wss 3915  βˆ…c0 4287  ifcif 4491  {csn 4591  βˆͺ ciun 4959   class class class wbr 5110   ↦ cmpt 5193  ran crn 5639   β†Ύ cres 5640   Fn wfn 6496  βŸΆwf 6497  β€˜cfv 6501  (class class class)co 7362   ∈ cmpo 7364   ↑m cmap 8772  Xcixp 8842  Fincfn 8890  infcinf 9384  β„cr 11057  0cc0 11058  1c1 11059   + caddc 11061   Β· cmul 11063  +∞cpnf 11193  β„*cxr 11195   < clt 11196   ≀ cle 11197   βˆ’ cmin 11392   / cdiv 11819  β„•cn 12160  β„€cz 12506  β„+crp 12922  [,)cico 13273  [,]cicc 13274  ...cfz 13431  Ξ£csu 15577  βˆcprod 15795  volcvol 24843  Ξ£^csumge0 44677
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677  ax-inf2 9584  ax-cnex 11114  ax-resscn 11115  ax-1cn 11116  ax-icn 11117  ax-addcl 11118  ax-addrcl 11119  ax-mulcl 11120  ax-mulrcl 11121  ax-mulcom 11122  ax-addass 11123  ax-mulass 11124  ax-distr 11125  ax-i2m1 11126  ax-1ne0 11127  ax-1rid 11128  ax-rnegex 11129  ax-rrecex 11130  ax-cnre 11131  ax-pre-lttri 11132  ax-pre-lttrn 11133  ax-pre-ltadd 11134  ax-pre-mulgt0 11135  ax-pre-sup 11136
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3066  df-rex 3075  df-rmo 3356  df-reu 3357  df-rab 3411  df-v 3450  df-sbc 3745  df-csb 3861  df-dif 3918  df-un 3920  df-in 3922  df-ss 3932  df-pss 3934  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-se 5594  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6258  df-ord 6325  df-on 6326  df-lim 6327  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-isom 6510  df-riota 7318  df-ov 7365  df-oprab 7366  df-mpo 7367  df-of 7622  df-om 7808  df-1st 7926  df-2nd 7927  df-frecs 8217  df-wrecs 8248  df-recs 8322  df-rdg 8361  df-1o 8417  df-2o 8418  df-er 8655  df-map 8774  df-pm 8775  df-ixp 8843  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-fi 9354  df-sup 9385  df-inf 9386  df-oi 9453  df-dju 9844  df-card 9882  df-pnf 11198  df-mnf 11199  df-xr 11200  df-ltxr 11201  df-le 11202  df-sub 11394  df-neg 11395  df-div 11820  df-nn 12161  df-2 12223  df-3 12224  df-n0 12421  df-z 12507  df-uz 12771  df-q 12881  df-rp 12923  df-xneg 13040  df-xadd 13041  df-xmul 13042  df-ioo 13275  df-ico 13277  df-icc 13278  df-fz 13432  df-fzo 13575  df-fl 13704  df-seq 13914  df-exp 13975  df-hash 14238  df-cj 14991  df-re 14992  df-im 14993  df-sqrt 15127  df-abs 15128  df-clim 15377  df-rlim 15378  df-sum 15578  df-prod 15796  df-rest 17311  df-topgen 17332  df-psmet 20804  df-xmet 20805  df-met 20806  df-bl 20807  df-mopn 20808  df-top 22259  df-topon 22276  df-bases 22312  df-cmp 22754  df-ovol 24844  df-vol 24845  df-sumge0 44678
This theorem is referenced by:  hoidmvlelem4  44913
  Copyright terms: Public domain W3C validator