Step | Hyp | Ref
| Expression |
1 | | fveq2 6889 |
. . . 4
β’ (π’ = π€ β (πΊβπ’) = (πΊβπ€)) |
2 | | nfcv 2904 |
. . . 4
β’
β²π€(πΊβπ’) |
3 | | itgsubsticclem.2 |
. . . . . 6
β’ πΊ = (π’ β β β¦ if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ)))) |
4 | | nfmpt1 5256 |
. . . . . 6
β’
β²π’(π’ β β β¦ if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ)))) |
5 | 3, 4 | nfcxfr 2902 |
. . . . 5
β’
β²π’πΊ |
6 | | nfcv 2904 |
. . . . 5
β’
β²π’π€ |
7 | 5, 6 | nffv 6899 |
. . . 4
β’
β²π’(πΊβπ€) |
8 | 1, 2, 7 | cbvditg 25363 |
. . 3
β’
β¨[πΎ β
πΏ](πΊβπ’) dπ’ = β¨[πΎ β πΏ](πΊβπ€) dπ€ |
9 | | itgsubsticclem.11 |
. . . 4
β’ (π β πΎ β€ πΏ) |
10 | | itgsubsticclem.9 |
. . . . . . . . 9
β’ (π β πΎ β β) |
11 | | itgsubsticclem.10 |
. . . . . . . . 9
β’ (π β πΏ β β) |
12 | 10, 11 | iccssred 13408 |
. . . . . . . 8
β’ (π β (πΎ[,]πΏ) β β) |
13 | 12 | adantr 482 |
. . . . . . 7
β’ ((π β§ π’ β (πΎ(,)πΏ)) β (πΎ[,]πΏ) β β) |
14 | | ioossicc 13407 |
. . . . . . . . 9
β’ (πΎ(,)πΏ) β (πΎ[,]πΏ) |
15 | 14 | sseli 3978 |
. . . . . . . 8
β’ (π’ β (πΎ(,)πΏ) β π’ β (πΎ[,]πΏ)) |
16 | 15 | adantl 483 |
. . . . . . 7
β’ ((π β§ π’ β (πΎ(,)πΏ)) β π’ β (πΎ[,]πΏ)) |
17 | 13, 16 | sseldd 3983 |
. . . . . 6
β’ ((π β§ π’ β (πΎ(,)πΏ)) β π’ β β) |
18 | 16 | iftrued 4536 |
. . . . . . 7
β’ ((π β§ π’ β (πΎ(,)πΏ)) β if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))) = (πΉβπ’)) |
19 | | itgsubsticclem.1 |
. . . . . . . . . . . . 13
β’ πΉ = (π’ β (πΎ[,]πΏ) β¦ πΆ) |
20 | 19 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β πΉ = (π’ β (πΎ[,]πΏ) β¦ πΆ)) |
21 | | itgsubsticclem.8 |
. . . . . . . . . . . . 13
β’ (π β πΉ β ((πΎ[,]πΏ)βcnββ)) |
22 | | cncff 24401 |
. . . . . . . . . . . . 13
β’ (πΉ β ((πΎ[,]πΏ)βcnββ) β πΉ:(πΎ[,]πΏ)βΆβ) |
23 | 21, 22 | syl 17 |
. . . . . . . . . . . 12
β’ (π β πΉ:(πΎ[,]πΏ)βΆβ) |
24 | 20, 23 | feq1dd 43849 |
. . . . . . . . . . 11
β’ (π β (π’ β (πΎ[,]πΏ) β¦ πΆ):(πΎ[,]πΏ)βΆβ) |
25 | 24 | fvmptelcdm 7110 |
. . . . . . . . . 10
β’ ((π β§ π’ β (πΎ[,]πΏ)) β πΆ β β) |
26 | 16, 25 | syldan 592 |
. . . . . . . . 9
β’ ((π β§ π’ β (πΎ(,)πΏ)) β πΆ β β) |
27 | 19 | fvmpt2 7007 |
. . . . . . . . 9
β’ ((π’ β (πΎ[,]πΏ) β§ πΆ β β) β (πΉβπ’) = πΆ) |
28 | 16, 26, 27 | syl2anc 585 |
. . . . . . . 8
β’ ((π β§ π’ β (πΎ(,)πΏ)) β (πΉβπ’) = πΆ) |
29 | 28, 26 | eqeltrd 2834 |
. . . . . . 7
β’ ((π β§ π’ β (πΎ(,)πΏ)) β (πΉβπ’) β β) |
30 | 18, 29 | eqeltrd 2834 |
. . . . . 6
β’ ((π β§ π’ β (πΎ(,)πΏ)) β if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))) β β) |
31 | 3 | fvmpt2 7007 |
. . . . . 6
β’ ((π’ β β β§ if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))) β β) β (πΊβπ’) = if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ)))) |
32 | 17, 30, 31 | syl2anc 585 |
. . . . 5
β’ ((π β§ π’ β (πΎ(,)πΏ)) β (πΊβπ’) = if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ)))) |
33 | 32, 18, 28 | 3eqtrd 2777 |
. . . 4
β’ ((π β§ π’ β (πΎ(,)πΏ)) β (πΊβπ’) = πΆ) |
34 | 9, 33 | ditgeq3d 44667 |
. . 3
β’ (π β β¨[πΎ β πΏ](πΊβπ’) dπ’ = β¨[πΎ β πΏ]πΆ dπ’) |
35 | | itgsubsticclem.3 |
. . . 4
β’ (π β π β β) |
36 | | itgsubsticclem.4 |
. . . 4
β’ (π β π β β) |
37 | | itgsubsticclem.5 |
. . . 4
β’ (π β π β€ π) |
38 | | mnfxr 11268 |
. . . . 5
β’ -β
β β* |
39 | 38 | a1i 11 |
. . . 4
β’ (π β -β β
β*) |
40 | | pnfxr 11265 |
. . . . 5
β’ +β
β β* |
41 | 40 | a1i 11 |
. . . 4
β’ (π β +β β
β*) |
42 | | ioomax 13396 |
. . . . . . . . 9
β’
(-β(,)+β) = β |
43 | 42 | eqcomi 2742 |
. . . . . . . 8
β’ β =
(-β(,)+β) |
44 | 43 | a1i 11 |
. . . . . . 7
β’ (π β β =
(-β(,)+β)) |
45 | 12, 44 | sseqtrd 4022 |
. . . . . 6
β’ (π β (πΎ[,]πΏ) β
(-β(,)+β)) |
46 | | ax-resscn 11164 |
. . . . . . 7
β’ β
β β |
47 | 44, 46 | eqsstrrdi 4037 |
. . . . . 6
β’ (π β (-β(,)+β)
β β) |
48 | | cncfss 24407 |
. . . . . 6
β’ (((πΎ[,]πΏ) β (-β(,)+β) β§
(-β(,)+β) β β) β ((π[,]π)βcnβ(πΎ[,]πΏ)) β ((π[,]π)βcnβ(-β(,)+β))) |
49 | 45, 47, 48 | syl2anc 585 |
. . . . 5
β’ (π β ((π[,]π)βcnβ(πΎ[,]πΏ)) β ((π[,]π)βcnβ(-β(,)+β))) |
50 | | itgsubsticclem.6 |
. . . . 5
β’ (π β (π₯ β (π[,]π) β¦ π΄) β ((π[,]π)βcnβ(πΎ[,]πΏ))) |
51 | 49, 50 | sseldd 3983 |
. . . 4
β’ (π β (π₯ β (π[,]π) β¦ π΄) β ((π[,]π)βcnβ(-β(,)+β))) |
52 | | itgsubsticclem.7 |
. . . 4
β’ (π β (π₯ β (π(,)π) β¦ π΅) β (((π(,)π)βcnββ) β©
πΏ1)) |
53 | | nfmpt1 5256 |
. . . . . . . . . . 11
β’
β²π’(π’ β (πΎ[,]πΏ) β¦ πΆ) |
54 | 19, 53 | nfcxfr 2902 |
. . . . . . . . . 10
β’
β²π’πΉ |
55 | | eqid 2733 |
. . . . . . . . . 10
β’
(topGenβran (,)) = (topGenβran (,)) |
56 | | eqid 2733 |
. . . . . . . . . 10
β’ βͺ (TopOpenββfld) = βͺ (TopOpenββfld) |
57 | | eqid 2733 |
. . . . . . . . . . . 12
β’
(TopOpenββfld) =
(TopOpenββfld) |
58 | 57 | cnfldtop 24292 |
. . . . . . . . . . 11
β’
(TopOpenββfld) β Top |
59 | 58 | a1i 11 |
. . . . . . . . . 10
β’ (π β
(TopOpenββfld) β Top) |
60 | 12, 46 | sstrdi 3994 |
. . . . . . . . . . . . 13
β’ (π β (πΎ[,]πΏ) β β) |
61 | | ssid 4004 |
. . . . . . . . . . . . 13
β’ β
β β |
62 | | eqid 2733 |
. . . . . . . . . . . . . 14
β’
((TopOpenββfld) βΎt (πΎ[,]πΏ)) = ((TopOpenββfld)
βΎt (πΎ[,]πΏ)) |
63 | | unicntop 24294 |
. . . . . . . . . . . . . . . . 17
β’ β =
βͺ
(TopOpenββfld) |
64 | 63 | restid 17376 |
. . . . . . . . . . . . . . . 16
β’
((TopOpenββfld) β Top β
((TopOpenββfld) βΎt β) =
(TopOpenββfld)) |
65 | 58, 64 | ax-mp 5 |
. . . . . . . . . . . . . . 15
β’
((TopOpenββfld) βΎt β) =
(TopOpenββfld) |
66 | 65 | eqcomi 2742 |
. . . . . . . . . . . . . 14
β’
(TopOpenββfld) =
((TopOpenββfld) βΎt
β) |
67 | 57, 62, 66 | cncfcn 24418 |
. . . . . . . . . . . . 13
β’ (((πΎ[,]πΏ) β β β§ β β
β) β ((πΎ[,]πΏ)βcnββ) =
(((TopOpenββfld) βΎt (πΎ[,]πΏ)) Cn
(TopOpenββfld))) |
68 | 60, 61, 67 | sylancl 587 |
. . . . . . . . . . . 12
β’ (π β ((πΎ[,]πΏ)βcnββ) =
(((TopOpenββfld) βΎt (πΎ[,]πΏ)) Cn
(TopOpenββfld))) |
69 | | reex 11198 |
. . . . . . . . . . . . . . . 16
β’ β
β V |
70 | 69 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β β β
V) |
71 | | restabs 22661 |
. . . . . . . . . . . . . . 15
β’
(((TopOpenββfld) β Top β§ (πΎ[,]πΏ) β β β§ β β V)
β (((TopOpenββfld) βΎt β)
βΎt (πΎ[,]πΏ)) = ((TopOpenββfld)
βΎt (πΎ[,]πΏ))) |
72 | 59, 12, 70, 71 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (π β
(((TopOpenββfld) βΎt β)
βΎt (πΎ[,]πΏ)) = ((TopOpenββfld)
βΎt (πΎ[,]πΏ))) |
73 | 57 | tgioo2 24311 |
. . . . . . . . . . . . . . . . 17
β’
(topGenβran (,)) = ((TopOpenββfld)
βΎt β) |
74 | 73 | eqcomi 2742 |
. . . . . . . . . . . . . . . 16
β’
((TopOpenββfld) βΎt β) =
(topGenβran (,)) |
75 | 74 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β
((TopOpenββfld) βΎt β) =
(topGenβran (,))) |
76 | 75 | oveq1d 7421 |
. . . . . . . . . . . . . 14
β’ (π β
(((TopOpenββfld) βΎt β)
βΎt (πΎ[,]πΏ)) = ((topGenβran (,))
βΎt (πΎ[,]πΏ))) |
77 | 72, 76 | eqtr3d 2775 |
. . . . . . . . . . . . 13
β’ (π β
((TopOpenββfld) βΎt (πΎ[,]πΏ)) = ((topGenβran (,))
βΎt (πΎ[,]πΏ))) |
78 | 77 | oveq1d 7421 |
. . . . . . . . . . . 12
β’ (π β
(((TopOpenββfld) βΎt (πΎ[,]πΏ)) Cn (TopOpenββfld))
= (((topGenβran (,)) βΎt (πΎ[,]πΏ)) Cn
(TopOpenββfld))) |
79 | 68, 78 | eqtrd 2773 |
. . . . . . . . . . 11
β’ (π β ((πΎ[,]πΏ)βcnββ) = (((topGenβran (,))
βΎt (πΎ[,]πΏ)) Cn
(TopOpenββfld))) |
80 | 21, 79 | eleqtrd 2836 |
. . . . . . . . . 10
β’ (π β πΉ β (((topGenβran (,))
βΎt (πΎ[,]πΏ)) Cn
(TopOpenββfld))) |
81 | 54, 55, 56, 3, 10, 11, 9, 59, 80 | icccncfext 44590 |
. . . . . . . . 9
β’ (π β (πΊ β ((topGenβran (,)) Cn
((TopOpenββfld) βΎt ran πΉ)) β§ (πΊ βΎ (πΎ[,]πΏ)) = πΉ)) |
82 | 81 | simpld 496 |
. . . . . . . 8
β’ (π β πΊ β ((topGenβran (,)) Cn
((TopOpenββfld) βΎt ran πΉ))) |
83 | | uniretop 24271 |
. . . . . . . . 9
β’ β =
βͺ (topGenβran (,)) |
84 | | eqid 2733 |
. . . . . . . . 9
β’ βͺ ((TopOpenββfld)
βΎt ran πΉ)
= βͺ ((TopOpenββfld)
βΎt ran πΉ) |
85 | 83, 84 | cnf 22742 |
. . . . . . . 8
β’ (πΊ β ((topGenβran (,))
Cn ((TopOpenββfld) βΎt ran πΉ)) β πΊ:ββΆβͺ
((TopOpenββfld) βΎt ran πΉ)) |
86 | 82, 85 | syl 17 |
. . . . . . 7
β’ (π β πΊ:ββΆβͺ
((TopOpenββfld) βΎt ran πΉ)) |
87 | 44 | feq2d 6701 |
. . . . . . 7
β’ (π β (πΊ:ββΆβͺ
((TopOpenββfld) βΎt ran πΉ) β πΊ:(-β(,)+β)βΆβͺ ((TopOpenββfld)
βΎt ran πΉ))) |
88 | 86, 87 | mpbid 231 |
. . . . . 6
β’ (π β πΊ:(-β(,)+β)βΆβͺ ((TopOpenββfld)
βΎt ran πΉ)) |
89 | 88 | feqmptd 6958 |
. . . . 5
β’ (π β πΊ = (π€ β (-β(,)+β) β¦ (πΊβπ€))) |
90 | 23 | frnd 6723 |
. . . . . . 7
β’ (π β ran πΉ β β) |
91 | | cncfss 24407 |
. . . . . . 7
β’ ((ran
πΉ β β β§
β β β) β ((-β(,)+β)βcnβran πΉ) β ((-β(,)+β)βcnββ)) |
92 | 90, 61, 91 | sylancl 587 |
. . . . . 6
β’ (π β
((-β(,)+β)βcnβran
πΉ) β
((-β(,)+β)βcnββ)) |
93 | 43 | oveq2i 7417 |
. . . . . . . . . . 11
β’
((TopOpenββfld) βΎt β) =
((TopOpenββfld) βΎt
(-β(,)+β)) |
94 | 73, 93 | eqtri 2761 |
. . . . . . . . . 10
β’
(topGenβran (,)) = ((TopOpenββfld)
βΎt (-β(,)+β)) |
95 | | eqid 2733 |
. . . . . . . . . 10
β’
((TopOpenββfld) βΎt ran πΉ) =
((TopOpenββfld) βΎt ran πΉ) |
96 | 57, 94, 95 | cncfcn 24418 |
. . . . . . . . 9
β’
(((-β(,)+β) β β β§ ran πΉ β β) β
((-β(,)+β)βcnβran
πΉ) = ((topGenβran
(,)) Cn ((TopOpenββfld) βΎt ran πΉ))) |
97 | 47, 90, 96 | syl2anc 585 |
. . . . . . . 8
β’ (π β
((-β(,)+β)βcnβran
πΉ) = ((topGenβran
(,)) Cn ((TopOpenββfld) βΎt ran πΉ))) |
98 | 97 | eqcomd 2739 |
. . . . . . 7
β’ (π β ((topGenβran (,)) Cn
((TopOpenββfld) βΎt ran πΉ)) =
((-β(,)+β)βcnβran
πΉ)) |
99 | 82, 98 | eleqtrd 2836 |
. . . . . 6
β’ (π β πΊ β ((-β(,)+β)βcnβran πΉ)) |
100 | 92, 99 | sseldd 3983 |
. . . . 5
β’ (π β πΊ β ((-β(,)+β)βcnββ)) |
101 | 89, 100 | eqeltrrd 2835 |
. . . 4
β’ (π β (π€ β (-β(,)+β) β¦ (πΊβπ€)) β ((-β(,)+β)βcnββ)) |
102 | | itgsubsticclem.12 |
. . . 4
β’ (π β (β D (π₯ β (π[,]π) β¦ π΄)) = (π₯ β (π(,)π) β¦ π΅)) |
103 | | fveq2 6889 |
. . . 4
β’ (π€ = π΄ β (πΊβπ€) = (πΊβπ΄)) |
104 | | itgsubsticclem.14 |
. . . 4
β’ (π₯ = π β π΄ = πΎ) |
105 | | itgsubsticclem.15 |
. . . 4
β’ (π₯ = π β π΄ = πΏ) |
106 | 35, 36, 37, 39, 41, 51, 52, 101, 102, 103, 104, 105 | itgsubst 25558 |
. . 3
β’ (π β β¨[πΎ β πΏ](πΊβπ€) dπ€ = β¨[π β π]((πΊβπ΄) Β· π΅) dπ₯) |
107 | 8, 34, 106 | 3eqtr3a 2797 |
. 2
β’ (π β β¨[πΎ β πΏ]πΆ dπ’ = β¨[π β π]((πΊβπ΄) Β· π΅) dπ₯) |
108 | 3 | a1i 11 |
. . . . 5
β’ ((π β§ π₯ β (π(,)π)) β πΊ = (π’ β β β¦ if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))))) |
109 | | simpr 486 |
. . . . . . . 8
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β π’ = π΄) |
110 | 57 | cnfldtopon 24291 |
. . . . . . . . . . . . . 14
β’
(TopOpenββfld) β
(TopOnββ) |
111 | 35, 36 | iccssred 13408 |
. . . . . . . . . . . . . . 15
β’ (π β (π[,]π) β β) |
112 | 111, 46 | sstrdi 3994 |
. . . . . . . . . . . . . 14
β’ (π β (π[,]π) β β) |
113 | | resttopon 22657 |
. . . . . . . . . . . . . 14
β’
(((TopOpenββfld) β (TopOnββ)
β§ (π[,]π) β β) β
((TopOpenββfld) βΎt (π[,]π)) β (TopOnβ(π[,]π))) |
114 | 110, 112,
113 | sylancr 588 |
. . . . . . . . . . . . 13
β’ (π β
((TopOpenββfld) βΎt (π[,]π)) β (TopOnβ(π[,]π))) |
115 | | resttopon 22657 |
. . . . . . . . . . . . . 14
β’
(((TopOpenββfld) β (TopOnββ)
β§ (πΎ[,]πΏ) β β) β
((TopOpenββfld) βΎt (πΎ[,]πΏ)) β (TopOnβ(πΎ[,]πΏ))) |
116 | 110, 60, 115 | sylancr 588 |
. . . . . . . . . . . . 13
β’ (π β
((TopOpenββfld) βΎt (πΎ[,]πΏ)) β (TopOnβ(πΎ[,]πΏ))) |
117 | | eqid 2733 |
. . . . . . . . . . . . . . . 16
β’
((TopOpenββfld) βΎt (π[,]π)) = ((TopOpenββfld)
βΎt (π[,]π)) |
118 | 57, 117, 62 | cncfcn 24418 |
. . . . . . . . . . . . . . 15
β’ (((π[,]π) β β β§ (πΎ[,]πΏ) β β) β ((π[,]π)βcnβ(πΎ[,]πΏ)) = (((TopOpenββfld)
βΎt (π[,]π)) Cn ((TopOpenββfld)
βΎt (πΎ[,]πΏ)))) |
119 | 112, 60, 118 | syl2anc 585 |
. . . . . . . . . . . . . 14
β’ (π β ((π[,]π)βcnβ(πΎ[,]πΏ)) = (((TopOpenββfld)
βΎt (π[,]π)) Cn ((TopOpenββfld)
βΎt (πΎ[,]πΏ)))) |
120 | 50, 119 | eleqtrd 2836 |
. . . . . . . . . . . . 13
β’ (π β (π₯ β (π[,]π) β¦ π΄) β
(((TopOpenββfld) βΎt (π[,]π)) Cn ((TopOpenββfld)
βΎt (πΎ[,]πΏ)))) |
121 | | cnf2 22745 |
. . . . . . . . . . . . 13
β’
((((TopOpenββfld) βΎt (π[,]π)) β (TopOnβ(π[,]π)) β§
((TopOpenββfld) βΎt (πΎ[,]πΏ)) β (TopOnβ(πΎ[,]πΏ)) β§ (π₯ β (π[,]π) β¦ π΄) β
(((TopOpenββfld) βΎt (π[,]π)) Cn ((TopOpenββfld)
βΎt (πΎ[,]πΏ)))) β (π₯ β (π[,]π) β¦ π΄):(π[,]π)βΆ(πΎ[,]πΏ)) |
122 | 114, 116,
120, 121 | syl3anc 1372 |
. . . . . . . . . . . 12
β’ (π β (π₯ β (π[,]π) β¦ π΄):(π[,]π)βΆ(πΎ[,]πΏ)) |
123 | 122 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π₯ β (π(,)π)) β (π₯ β (π[,]π) β¦ π΄):(π[,]π)βΆ(πΎ[,]πΏ)) |
124 | | eqid 2733 |
. . . . . . . . . . . 12
β’ (π₯ β (π[,]π) β¦ π΄) = (π₯ β (π[,]π) β¦ π΄) |
125 | 124 | fmpt 7107 |
. . . . . . . . . . 11
β’
(βπ₯ β
(π[,]π)π΄ β (πΎ[,]πΏ) β (π₯ β (π[,]π) β¦ π΄):(π[,]π)βΆ(πΎ[,]πΏ)) |
126 | 123, 125 | sylibr 233 |
. . . . . . . . . 10
β’ ((π β§ π₯ β (π(,)π)) β βπ₯ β (π[,]π)π΄ β (πΎ[,]πΏ)) |
127 | | ioossicc 13407 |
. . . . . . . . . . . 12
β’ (π(,)π) β (π[,]π) |
128 | 127 | sseli 3978 |
. . . . . . . . . . 11
β’ (π₯ β (π(,)π) β π₯ β (π[,]π)) |
129 | 128 | adantl 483 |
. . . . . . . . . 10
β’ ((π β§ π₯ β (π(,)π)) β π₯ β (π[,]π)) |
130 | | rsp 3245 |
. . . . . . . . . 10
β’
(βπ₯ β
(π[,]π)π΄ β (πΎ[,]πΏ) β (π₯ β (π[,]π) β π΄ β (πΎ[,]πΏ))) |
131 | 126, 129,
130 | sylc 65 |
. . . . . . . . 9
β’ ((π β§ π₯ β (π(,)π)) β π΄ β (πΎ[,]πΏ)) |
132 | 131 | adantr 482 |
. . . . . . . 8
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β π΄ β (πΎ[,]πΏ)) |
133 | 109, 132 | eqeltrd 2834 |
. . . . . . 7
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β π’ β (πΎ[,]πΏ)) |
134 | 133 | iftrued 4536 |
. . . . . 6
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))) = (πΉβπ’)) |
135 | | simpll 766 |
. . . . . . . 8
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β π) |
136 | 135, 133,
25 | syl2anc 585 |
. . . . . . 7
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β πΆ β β) |
137 | 133, 136,
27 | syl2anc 585 |
. . . . . 6
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β (πΉβπ’) = πΆ) |
138 | | itgsubsticclem.13 |
. . . . . . 7
β’ (π’ = π΄ β πΆ = πΈ) |
139 | 138 | adantl 483 |
. . . . . 6
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β πΆ = πΈ) |
140 | 134, 137,
139 | 3eqtrd 2777 |
. . . . 5
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β if(π’ β (πΎ[,]πΏ), (πΉβπ’), if(π’ < πΎ, (πΉβπΎ), (πΉβπΏ))) = πΈ) |
141 | 12 | adantr 482 |
. . . . . 6
β’ ((π β§ π₯ β (π(,)π)) β (πΎ[,]πΏ) β β) |
142 | 141, 131 | sseldd 3983 |
. . . . 5
β’ ((π β§ π₯ β (π(,)π)) β π΄ β β) |
143 | | elex 3493 |
. . . . . . . 8
β’ (π΄ β (πΎ[,]πΏ) β π΄ β V) |
144 | 131, 143 | syl 17 |
. . . . . . 7
β’ ((π β§ π₯ β (π(,)π)) β π΄ β V) |
145 | | isset 3488 |
. . . . . . 7
β’ (π΄ β V β βπ’ π’ = π΄) |
146 | 144, 145 | sylib 217 |
. . . . . 6
β’ ((π β§ π₯ β (π(,)π)) β βπ’ π’ = π΄) |
147 | 139, 136 | eqeltrrd 2835 |
. . . . . 6
β’ (((π β§ π₯ β (π(,)π)) β§ π’ = π΄) β πΈ β β) |
148 | 146, 147 | exlimddv 1939 |
. . . . 5
β’ ((π β§ π₯ β (π(,)π)) β πΈ β β) |
149 | 108, 140,
142, 148 | fvmptd 7003 |
. . . 4
β’ ((π β§ π₯ β (π(,)π)) β (πΊβπ΄) = πΈ) |
150 | 149 | oveq1d 7421 |
. . 3
β’ ((π β§ π₯ β (π(,)π)) β ((πΊβπ΄) Β· π΅) = (πΈ Β· π΅)) |
151 | 37, 150 | ditgeq3d 44667 |
. 2
β’ (π β β¨[π β π]((πΊβπ΄) Β· π΅) dπ₯ = β¨[π β π](πΈ Β· π΅) dπ₯) |
152 | 107, 151 | eqtrd 2773 |
1
β’ (π β β¨[πΎ β πΏ]πΆ dπ’ = β¨[π β π](πΈ Β· π΅) dπ₯) |