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

Theorem isibl 25282
Description: The predicate "š¹ is integrable". The "integrable" predicate corresponds roughly to the range of validity of āˆ«š“šµ dš‘„, which is to say that the expression āˆ«š“šµ dš‘„ doesn't make sense unless (š‘„ āˆˆ š“ ā†¦ šµ) āˆˆ šæ1. (Contributed by Mario Carneiro, 28-Jun-2014.) (Revised by Mario Carneiro, 23-Aug-2014.)
Hypotheses
Ref Expression
isibl.1 (šœ‘ ā†’ šŗ = (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ š‘‡), š‘‡, 0)))
isibl.2 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ š‘‡ = (ā„œā€˜(šµ / (iā†‘š‘˜))))
isibl.3 (šœ‘ ā†’ dom š¹ = š“)
isibl.4 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ (š¹ā€˜š‘„) = šµ)
Assertion
Ref Expression
isibl (šœ‘ ā†’ (š¹ āˆˆ šæ1 ā†” (š¹ āˆˆ MblFn āˆ§ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜šŗ) āˆˆ ā„)))
Distinct variable groups:   š‘„,š‘˜,š“   šµ,š‘˜   š‘˜,š¹,š‘„   šœ‘,š‘˜,š‘„
Allowed substitution hints:   šµ(š‘„)   š‘‡(š‘„,š‘˜)   šŗ(š‘„,š‘˜)

Proof of Theorem isibl
Dummy variables š‘“ š‘¦ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fvex 6904 . . . . . . . . 9 (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) āˆˆ V
2 breq2 5152 . . . . . . . . . . 11 (š‘¦ = (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) ā†’ (0 ā‰¤ š‘¦ ā†” 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜)))))
32anbi2d 629 . . . . . . . . . 10 (š‘¦ = (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) ā†’ ((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦) ā†” (š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))))))
4 id 22 . . . . . . . . . 10 (š‘¦ = (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) ā†’ š‘¦ = (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))))
53, 4ifbieq1d 4552 . . . . . . . . 9 (š‘¦ = (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) ā†’ if((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0) = if((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))), 0))
61, 5csbie 3929 . . . . . . . 8 ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0) = if((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))), 0)
7 dmeq 5903 . . . . . . . . . . 11 (š‘“ = š¹ ā†’ dom š‘“ = dom š¹)
87eleq2d 2819 . . . . . . . . . 10 (š‘“ = š¹ ā†’ (š‘„ āˆˆ dom š‘“ ā†” š‘„ āˆˆ dom š¹))
9 fveq1 6890 . . . . . . . . . . . 12 (š‘“ = š¹ ā†’ (š‘“ā€˜š‘„) = (š¹ā€˜š‘„))
109fvoveq1d 7430 . . . . . . . . . . 11 (š‘“ = š¹ ā†’ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) = (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))))
1110breq2d 5160 . . . . . . . . . 10 (š‘“ = š¹ ā†’ (0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) ā†” 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))))
128, 11anbi12d 631 . . . . . . . . 9 (š‘“ = š¹ ā†’ ((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜)))) ā†” (š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))))))
1312, 10ifbieq1d 4552 . . . . . . . 8 (š‘“ = š¹ ā†’ if((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))), 0) = if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))
146, 13eqtrid 2784 . . . . . . 7 (š‘“ = š¹ ā†’ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0) = if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))
1514mpteq2dv 5250 . . . . . 6 (š‘“ = š¹ ā†’ (š‘„ āˆˆ ā„ ā†¦ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0)) = (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0)))
1615fveq2d 6895 . . . . 5 (š‘“ = š¹ ā†’ (āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0))) = (āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))))
1716eleq1d 2818 . . . 4 (š‘“ = š¹ ā†’ ((āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0))) āˆˆ ā„ ā†” (āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„))
1817ralbidv 3177 . . 3 (š‘“ = š¹ ā†’ (āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0))) āˆˆ ā„ ā†” āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„))
19 df-ibl 25138 . . 3 šæ1 = {š‘“ āˆˆ MblFn āˆ£ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ ā¦‹(ā„œā€˜((š‘“ā€˜š‘„) / (iā†‘š‘˜))) / š‘¦ā¦Œif((š‘„ āˆˆ dom š‘“ āˆ§ 0 ā‰¤ š‘¦), š‘¦, 0))) āˆˆ ā„}
2018, 19elrab2 3686 . 2 (š¹ āˆˆ šæ1 ā†” (š¹ āˆˆ MblFn āˆ§ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„))
21 isibl.3 . . . . . . . . . . . 12 (šœ‘ ā†’ dom š¹ = š“)
2221eleq2d 2819 . . . . . . . . . . 11 (šœ‘ ā†’ (š‘„ āˆˆ dom š¹ ā†” š‘„ āˆˆ š“))
2322anbi1d 630 . . . . . . . . . 10 (šœ‘ ā†’ ((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))) ā†” (š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))))))
2423ifbid 4551 . . . . . . . . 9 (šœ‘ ā†’ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0) = if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))
25 isibl.4 . . . . . . . . . . . 12 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ (š¹ā€˜š‘„) = šµ)
2625fvoveq1d 7430 . . . . . . . . . . 11 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))) = (ā„œā€˜(šµ / (iā†‘š‘˜))))
27 isibl.2 . . . . . . . . . . 11 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ š‘‡ = (ā„œā€˜(šµ / (iā†‘š‘˜))))
2826, 27eqtr4d 2775 . . . . . . . . . 10 ((šœ‘ āˆ§ š‘„ āˆˆ š“) ā†’ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))) = š‘‡)
2928ibllem 25281 . . . . . . . . 9 (šœ‘ ā†’ if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0) = if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ š‘‡), š‘‡, 0))
3024, 29eqtrd 2772 . . . . . . . 8 (šœ‘ ā†’ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0) = if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ š‘‡), š‘‡, 0))
3130mpteq2dv 5250 . . . . . . 7 (šœ‘ ā†’ (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0)) = (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ š‘‡), š‘‡, 0)))
32 isibl.1 . . . . . . 7 (šœ‘ ā†’ šŗ = (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ š“ āˆ§ 0 ā‰¤ š‘‡), š‘‡, 0)))
3331, 32eqtr4d 2775 . . . . . 6 (šœ‘ ā†’ (š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0)) = šŗ)
3433fveq2d 6895 . . . . 5 (šœ‘ ā†’ (āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) = (āˆ«2ā€˜šŗ))
3534eleq1d 2818 . . . 4 (šœ‘ ā†’ ((āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„ ā†” (āˆ«2ā€˜šŗ) āˆˆ ā„))
3635ralbidv 3177 . . 3 (šœ‘ ā†’ (āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„ ā†” āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜šŗ) āˆˆ ā„))
3736anbi2d 629 . 2 (šœ‘ ā†’ ((š¹ āˆˆ MblFn āˆ§ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜(š‘„ āˆˆ ā„ ā†¦ if((š‘„ āˆˆ dom š¹ āˆ§ 0 ā‰¤ (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜)))), (ā„œā€˜((š¹ā€˜š‘„) / (iā†‘š‘˜))), 0))) āˆˆ ā„) ā†” (š¹ āˆˆ MblFn āˆ§ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜šŗ) āˆˆ ā„)))
3820, 37bitrid 282 1 (šœ‘ ā†’ (š¹ āˆˆ šæ1 ā†” (š¹ āˆˆ MblFn āˆ§ āˆ€š‘˜ āˆˆ (0...3)(āˆ«2ā€˜šŗ) āˆˆ ā„)))
Colors of variables: wff setvar class
Syntax hints:   ā†’ wi 4   ā†” wb 205   āˆ§ wa 396   = wceq 1541   āˆˆ wcel 2106  āˆ€wral 3061  ā¦‹csb 3893  ifcif 4528   class class class wbr 5148   ā†¦ cmpt 5231  dom cdm 5676  ā€˜cfv 6543  (class class class)co 7408  ā„cr 11108  0cc0 11109  ici 11111   ā‰¤ cle 11248   / cdiv 11870  3c3 12267  ...cfz 13483  ā†‘cexp 14026  ā„œcre 15043  MblFncmbf 25130  āˆ«2citg2 25132  šæ1cibl 25133
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-ext 2703  ax-nul 5306
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-sb 2068  df-clab 2710  df-cleq 2724  df-clel 2810  df-ne 2941  df-ral 3062  df-rab 3433  df-v 3476  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-br 5149  df-opab 5211  df-mpt 5232  df-dm 5686  df-iota 6495  df-fv 6551  df-ov 7411  df-ibl 25138
This theorem is referenced by:  isibl2  25283  ibl0  25303  iblempty  44671
  Copyright terms: Public domain W3C validator