Metamath Proof Explorer


Theorem itgre

Description: Real part of an integral. (Contributed by Mario Carneiro, 14-Aug-2014)

Ref Expression
Hypotheses itgcnval.1 โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ๐ด ) โ†’ ๐ต โˆˆ ๐‘‰ )
itgcnval.2 โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ ๐ฟ1 )
Assertion itgre ( ๐œ‘ โ†’ ( โ„œ โ€˜ โˆซ ๐ด ๐ต d ๐‘ฅ ) = โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ )

Proof

Step Hyp Ref Expression
1 itgcnval.1 โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ๐ด ) โ†’ ๐ต โˆˆ ๐‘‰ )
2 itgcnval.2 โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ ๐ฟ1 )
3 1 2 itgcnval โŠข ( ๐œ‘ โ†’ โˆซ ๐ด ๐ต d ๐‘ฅ = ( โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ + ( i ยท โˆซ ๐ด ( โ„‘ โ€˜ ๐ต ) d ๐‘ฅ ) ) )
4 3 fveq2d โŠข ( ๐œ‘ โ†’ ( โ„œ โ€˜ โˆซ ๐ด ๐ต d ๐‘ฅ ) = ( โ„œ โ€˜ ( โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ + ( i ยท โˆซ ๐ด ( โ„‘ โ€˜ ๐ต ) d ๐‘ฅ ) ) ) )
5 iblmbf โŠข ( ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ ๐ฟ1 โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ MblFn )
6 2 5 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ MblFn )
7 6 1 mbfmptcl โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ๐ด ) โ†’ ๐ต โˆˆ โ„‚ )
8 7 recld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ๐ด ) โ†’ ( โ„œ โ€˜ ๐ต ) โˆˆ โ„ )
9 7 iblcn โŠข ( ๐œ‘ โ†’ ( ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ๐ต ) โˆˆ ๐ฟ1 โ†” ( ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„œ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 โˆง ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„‘ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 ) ) )
10 2 9 mpbid โŠข ( ๐œ‘ โ†’ ( ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„œ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 โˆง ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„‘ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 ) )
11 10 simpld โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„œ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 )
12 8 11 itgrecl โŠข ( ๐œ‘ โ†’ โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ โˆˆ โ„ )
13 7 imcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ๐ด ) โ†’ ( โ„‘ โ€˜ ๐ต ) โˆˆ โ„ )
14 10 simprd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ๐ด โ†ฆ ( โ„‘ โ€˜ ๐ต ) ) โˆˆ ๐ฟ1 )
15 13 14 itgrecl โŠข ( ๐œ‘ โ†’ โˆซ ๐ด ( โ„‘ โ€˜ ๐ต ) d ๐‘ฅ โˆˆ โ„ )
16 12 15 crred โŠข ( ๐œ‘ โ†’ ( โ„œ โ€˜ ( โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ + ( i ยท โˆซ ๐ด ( โ„‘ โ€˜ ๐ต ) d ๐‘ฅ ) ) ) = โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ )
17 4 16 eqtrd โŠข ( ๐œ‘ โ†’ ( โ„œ โ€˜ โˆซ ๐ด ๐ต d ๐‘ฅ ) = โˆซ ๐ด ( โ„œ โ€˜ ๐ต ) d ๐‘ฅ )