Step | Hyp | Ref
| Expression |
1 | | smflimlem3.d |
. . . . . . . . 9
β’ π· = {π₯ β βͺ
π β π β© π β
(β€β₯βπ)dom (πΉβπ) β£ (π β π β¦ ((πΉβπ)βπ₯)) β dom β } |
2 | | ssrab2 4076 |
. . . . . . . . 9
β’ {π₯ β βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) β£ (π β π β¦ ((πΉβπ)βπ₯)) β dom β } β βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
3 | 1, 2 | eqsstri 4015 |
. . . . . . . 8
β’ π· β βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
4 | | inss1 4227 |
. . . . . . . . 9
β’ (π· β© πΌ) β π· |
5 | | smflimlem3.x |
. . . . . . . . 9
β’ (π β π β (π· β© πΌ)) |
6 | 4, 5 | sselid 3979 |
. . . . . . . 8
β’ (π β π β π·) |
7 | 3, 6 | sselid 3979 |
. . . . . . 7
β’ (π β π β βͺ
π β π β© π β
(β€β₯βπ)dom (πΉβπ)) |
8 | | fveq2 6888 |
. . . . . . . . . . . . 13
β’ (π = π β (πΉβπ) = (πΉβπ)) |
9 | 8 | dmeqd 5903 |
. . . . . . . . . . . 12
β’ (π = π β dom (πΉβπ) = dom (πΉβπ)) |
10 | | eqcom 2740 |
. . . . . . . . . . . . . 14
β’ (π = π β π = π) |
11 | 10 | imbi1i 350 |
. . . . . . . . . . . . 13
β’ ((π = π β dom (πΉβπ) = dom (πΉβπ)) β (π = π β dom (πΉβπ) = dom (πΉβπ))) |
12 | | eqcom 2740 |
. . . . . . . . . . . . . 14
β’ (dom
(πΉβπ) = dom (πΉβπ) β dom (πΉβπ) = dom (πΉβπ)) |
13 | 12 | imbi2i 336 |
. . . . . . . . . . . . 13
β’ ((π = π β dom (πΉβπ) = dom (πΉβπ)) β (π = π β dom (πΉβπ) = dom (πΉβπ))) |
14 | 11, 13 | bitri 275 |
. . . . . . . . . . . 12
β’ ((π = π β dom (πΉβπ) = dom (πΉβπ)) β (π = π β dom (πΉβπ) = dom (πΉβπ))) |
15 | 9, 14 | mpbi 229 |
. . . . . . . . . . 11
β’ (π = π β dom (πΉβπ) = dom (πΉβπ)) |
16 | 15 | cbviinv 5043 |
. . . . . . . . . 10
β’ β© π β (β€β₯βπ)dom (πΉβπ) = β© π β
(β€β₯βπ)dom (πΉβπ) |
17 | 16 | a1i 11 |
. . . . . . . . 9
β’ (π β π β β©
π β
(β€β₯βπ)dom (πΉβπ) = β© π β
(β€β₯βπ)dom (πΉβπ)) |
18 | 17 | iuneq2i 5017 |
. . . . . . . 8
β’ βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) = βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
19 | | fveq2 6888 |
. . . . . . . . . 10
β’ (π = π β (β€β₯βπ) =
(β€β₯βπ)) |
20 | 19 | iineq1d 43712 |
. . . . . . . . 9
β’ (π = π β β©
π β
(β€β₯βπ)dom (πΉβπ) = β© π β
(β€β₯βπ)dom (πΉβπ)) |
21 | 20 | cbviunv 5042 |
. . . . . . . 8
β’ βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) = βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
22 | 18, 21 | eqtri 2761 |
. . . . . . 7
β’ βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) = βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
23 | 7, 22 | eleqtrdi 2844 |
. . . . . 6
β’ (π β π β βͺ
π β π β© π β
(β€β₯βπ)dom (πΉβπ)) |
24 | | smflimlem3.z |
. . . . . . . 8
β’ π =
(β€β₯βπ) |
25 | | eqid 2733 |
. . . . . . . 8
β’ βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) = βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) |
26 | 24, 25 | allbutfi 44038 |
. . . . . . 7
β’ (π β βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) β βπ β π βπ β (β€β₯βπ)π β dom (πΉβπ)) |
27 | 26 | biimpi 215 |
. . . . . 6
β’ (π β βͺ π β π β© π β
(β€β₯βπ)dom (πΉβπ) β βπ β π βπ β (β€β₯βπ)π β dom (πΉβπ)) |
28 | 23, 27 | syl 17 |
. . . . 5
β’ (π β βπ β π βπ β (β€β₯βπ)π β dom (πΉβπ)) |
29 | 5 | elin2d 4198 |
. . . . . . . 8
β’ (π β π β πΌ) |
30 | | smflimlem3.i |
. . . . . . . . 9
β’ πΌ = β© π β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
31 | | oveq1 7411 |
. . . . . . . . . . . . . . 15
β’ (π = π β (ππ»π) = (ππ»π)) |
32 | 31 | cbviinv 5043 |
. . . . . . . . . . . . . 14
β’ β© π β (β€β₯βπ)(ππ»π) = β© π β
(β€β₯βπ)(ππ»π) |
33 | 32 | a1i 11 |
. . . . . . . . . . . . 13
β’ (π β π β β©
π β
(β€β₯βπ)(ππ»π) = β© π β
(β€β₯βπ)(ππ»π)) |
34 | 33 | iuneq2i 5017 |
. . . . . . . . . . . 12
β’ βͺ π β π β© π β
(β€β₯βπ)(ππ»π) = βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
35 | 19 | iineq1d 43712 |
. . . . . . . . . . . . 13
β’ (π = π β β©
π β
(β€β₯βπ)(ππ»π) = β© π β
(β€β₯βπ)(ππ»π)) |
36 | 35 | cbviunv 5042 |
. . . . . . . . . . . 12
β’ βͺ π β π β© π β
(β€β₯βπ)(ππ»π) = βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
37 | 34, 36 | eqtri 2761 |
. . . . . . . . . . 11
β’ βͺ π β π β© π β
(β€β₯βπ)(ππ»π) = βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
38 | 37 | a1i 11 |
. . . . . . . . . 10
β’ (π β β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π) = βͺ π β π β© π β
(β€β₯βπ)(ππ»π)) |
39 | 38 | iineq2i 5018 |
. . . . . . . . 9
β’ β© π β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π) = β© π β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
40 | 30, 39 | eqtri 2761 |
. . . . . . . 8
β’ πΌ = β© π β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π) |
41 | 29, 40 | eleqtrdi 2844 |
. . . . . . 7
β’ (π β π β β©
π β β βͺ π β π β© π β
(β€β₯βπ)(ππ»π)) |
42 | | smflimlem3.k |
. . . . . . 7
β’ (π β πΎ β β) |
43 | | oveq2 7412 |
. . . . . . . . . . 11
β’ (π = πΎ β (ππ»π) = (ππ»πΎ)) |
44 | 43 | adantr 482 |
. . . . . . . . . 10
β’ ((π = πΎ β§ π β (β€β₯βπ)) β (ππ»π) = (ππ»πΎ)) |
45 | 44 | iineq2dv 5021 |
. . . . . . . . 9
β’ (π = πΎ β β©
π β
(β€β₯βπ)(ππ»π) = β© π β
(β€β₯βπ)(ππ»πΎ)) |
46 | 45 | iuneq2d 5025 |
. . . . . . . 8
β’ (π = πΎ β βͺ
π β π β© π β
(β€β₯βπ)(ππ»π) = βͺ π β π β© π β
(β€β₯βπ)(ππ»πΎ)) |
47 | 46 | eleq2d 2820 |
. . . . . . 7
β’ (π = πΎ β (π β βͺ
π β π β© π β
(β€β₯βπ)(ππ»π) β π β βͺ
π β π β© π β
(β€β₯βπ)(ππ»πΎ))) |
48 | 41, 42, 47 | eliind 43691 |
. . . . . 6
β’ (π β π β βͺ
π β π β© π β
(β€β₯βπ)(ππ»πΎ)) |
49 | | eqid 2733 |
. . . . . . 7
β’ βͺ π β π β© π β
(β€β₯βπ)(ππ»πΎ) = βͺ
π β π β© π β
(β€β₯βπ)(ππ»πΎ) |
50 | 24, 49 | allbutfi 44038 |
. . . . . 6
β’ (π β βͺ π β π β© π β
(β€β₯βπ)(ππ»πΎ) β βπ β π βπ β (β€β₯βπ)π β (ππ»πΎ)) |
51 | 48, 50 | sylib 217 |
. . . . 5
β’ (π β βπ β π βπ β (β€β₯βπ)π β (ππ»πΎ)) |
52 | 28, 51 | jca 513 |
. . . 4
β’ (π β (βπ β π βπ β (β€β₯βπ)π β dom (πΉβπ) β§ βπ β π βπ β (β€β₯βπ)π β (ππ»πΎ))) |
53 | 24 | rexanuz2 15292 |
. . . 4
β’
(βπ β
π βπ β
(β€β₯βπ)(π β dom (πΉβπ) β§ π β (ππ»πΎ)) β (βπ β π βπ β (β€β₯βπ)π β dom (πΉβπ) β§ βπ β π βπ β (β€β₯βπ)π β (ππ»πΎ))) |
54 | 52, 53 | sylibr 233 |
. . 3
β’ (π β βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ π β (ππ»πΎ))) |
55 | | simpll 766 |
. . . . . 6
β’ (((π β§ π β π) β§ π β (β€β₯βπ)) β π) |
56 | | simpr 486 |
. . . . . . 7
β’ ((π β§ π β π) β π β π) |
57 | 24 | uztrn2 12837 |
. . . . . . 7
β’ ((π β π β§ π β (β€β₯βπ)) β π β π) |
58 | 56, 57 | sylan 581 |
. . . . . 6
β’ (((π β§ π β π) β§ π β (β€β₯βπ)) β π β π) |
59 | | simprl 770 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β π β dom (πΉβπ)) |
60 | | simp3 1139 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π β§ π β (ππ»πΎ)) β π β (ππ»πΎ)) |
61 | | smflimlem3.h |
. . . . . . . . . . . . . . . . . 18
β’ π» = (π β π, π β β β¦ (πΆβ(πππ))) |
62 | 61 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β π» = (π β π, π β β β¦ (πΆβ(πππ)))) |
63 | | oveq12 7413 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π = π β§ π = πΎ) β (πππ) = (πππΎ)) |
64 | 63 | fveq2d 6892 |
. . . . . . . . . . . . . . . . . 18
β’ ((π = π β§ π = πΎ) β (πΆβ(πππ)) = (πΆβ(πππΎ))) |
65 | 64 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β π) β§ (π = π β§ π = πΎ)) β (πΆβ(πππ)) = (πΆβ(πππΎ))) |
66 | | simpr 486 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β π β π) |
67 | 42 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β πΎ β β) |
68 | | fvexd 6903 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β (πΆβ(πππΎ)) β V) |
69 | 62, 65, 66, 67, 68 | ovmpod 7555 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π) β (ππ»πΎ) = (πΆβ(πππΎ))) |
70 | 69 | 3adant3 1133 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π β§ π β (ππ»πΎ)) β (ππ»πΎ) = (πΆβ(πππΎ))) |
71 | 60, 70 | eleqtrd 2836 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β π β§ π β (ππ»πΎ)) β π β (πΆβ(πππΎ))) |
72 | 71 | 3expa 1119 |
. . . . . . . . . . . . 13
β’ (((π β§ π β π) β§ π β (ππ»πΎ)) β π β (πΆβ(πππΎ))) |
73 | 72 | adantrl 715 |
. . . . . . . . . . . 12
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β π β (πΆβ(πππΎ))) |
74 | 73, 59 | elind 4193 |
. . . . . . . . . . 11
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β π β ((πΆβ(πππΎ)) β© dom (πΉβπ))) |
75 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} = {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} |
76 | | smflimlem3.s |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π β π β SAlg) |
77 | 75, 76 | rabexd 5332 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V) |
78 | 77 | ralrimivw 3151 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β βπ β β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V) |
79 | 78 | a1d 25 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β (π β π β βπ β β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V)) |
80 | 79 | imp 408 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π β π) β βπ β β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V) |
81 | 80 | ralrimiva 3147 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β βπ β π βπ β β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V) |
82 | | smflimlem3.p |
. . . . . . . . . . . . . . . . . . . . 21
β’ π = (π β π, π β β β¦ {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))}) |
83 | 82 | fnmpo 8050 |
. . . . . . . . . . . . . . . . . . . 20
β’
(βπ β
π βπ β β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} β V β π Fn (π Γ β)) |
84 | 81, 83 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β π Fn (π Γ β)) |
85 | 84 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β π) β π Fn (π Γ β)) |
86 | | fnovrn 7577 |
. . . . . . . . . . . . . . . . . 18
β’ ((π Fn (π Γ β) β§ π β π β§ πΎ β β) β (πππΎ) β ran π) |
87 | 85, 66, 67, 86 | syl3anc 1372 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β (πππΎ) β ran π) |
88 | | ovex 7437 |
. . . . . . . . . . . . . . . . . 18
β’ (πππΎ) β V |
89 | | eleq1 2822 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = (πππΎ) β (π¦ β ran π β (πππΎ) β ran π)) |
90 | 89 | anbi2d 630 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = (πππΎ) β ((π β§ π¦ β ran π) β (π β§ (πππΎ) β ran π))) |
91 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = (πππΎ) β (πΆβπ¦) = (πΆβ(πππΎ))) |
92 | | id 22 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = (πππΎ) β π¦ = (πππΎ)) |
93 | 91, 92 | eleq12d 2828 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = (πππΎ) β ((πΆβπ¦) β π¦ β (πΆβ(πππΎ)) β (πππΎ))) |
94 | 90, 93 | imbi12d 345 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ = (πππΎ) β (((π β§ π¦ β ran π) β (πΆβπ¦) β π¦) β ((π β§ (πππΎ) β ran π) β (πΆβ(πππΎ)) β (πππΎ)))) |
95 | | smflimlem3.c |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π¦ β ran π) β (πΆβπ¦) β π¦) |
96 | 88, 94, 95 | vtocl 3549 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ (πππΎ) β ran π) β (πΆβ(πππΎ)) β (πππΎ)) |
97 | 87, 96 | syldan 592 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π) β (πΆβ(πππΎ)) β (πππΎ)) |
98 | 82 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β π = (π β π, π β β β¦ {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))})) |
99 | 15 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π = π β§ π = πΎ) β dom (πΉβπ) = dom (πΉβπ)) |
100 | 8 | fveq1d 6890 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) |
101 | 10 | imbi1i 350 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) β (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯))) |
102 | | eqcom 2740 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (((πΉβπ)βπ₯) = ((πΉβπ)βπ₯) β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) |
103 | 102 | imbi2i 336 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) β (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯))) |
104 | 101, 103 | bitri 275 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) β (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯))) |
105 | 100, 104 | mpbi 229 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) |
106 | 105 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π = π β§ π = πΎ) β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) |
107 | | oveq2 7412 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = πΎ β (1 / π) = (1 / πΎ)) |
108 | 107 | oveq2d 7420 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = πΎ β (π΄ + (1 / π)) = (π΄ + (1 / πΎ))) |
109 | 108 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π = π β§ π = πΎ) β (π΄ + (1 / π)) = (π΄ + (1 / πΎ))) |
110 | 106, 109 | breq12d 5160 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π = π β§ π = πΎ) β (((πΉβπ)βπ₯) < (π΄ + (1 / π)) β ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ)))) |
111 | 99, 110 | rabeqbidv 3450 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π = π β§ π = πΎ) β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))}) |
112 | 15 | ineq2d 4211 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β (π β© dom (πΉβπ)) = (π β© dom (πΉβπ))) |
113 | 112 | adantr 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π = π β§ π = πΎ) β (π β© dom (πΉβπ)) = (π β© dom (πΉβπ))) |
114 | 111, 113 | eqeq12d 2749 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π = π β§ π = πΎ) β ({π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ)) β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ)))) |
115 | 114 | rabbidv 3441 |
. . . . . . . . . . . . . . . . . 18
β’ ((π = π β§ π = πΎ) β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} = {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))}) |
116 | 115 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β π) β§ (π = π β§ π = πΎ)) β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / π))} = (π β© dom (πΉβπ))} = {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))}) |
117 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . 19
β’ {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))} = {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))} |
118 | 117, 76 | rabexd 5332 |
. . . . . . . . . . . . . . . . . 18
β’ (π β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))} β V) |
119 | 118 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))} β V) |
120 | 98, 116, 66, 67, 119 | ovmpod 7555 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π) β (πππΎ) = {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))}) |
121 | 97, 120 | eleqtrd 2836 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π) β (πΆβ(πππΎ)) β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))}) |
122 | | ineq1 4204 |
. . . . . . . . . . . . . . . . 17
β’ (π = (πΆβ(πππΎ)) β (π β© dom (πΉβπ)) = ((πΆβ(πππΎ)) β© dom (πΉβπ))) |
123 | 122 | eqeq2d 2744 |
. . . . . . . . . . . . . . . 16
β’ (π = (πΆβ(πππΎ)) β ({π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ)) β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = ((πΆβ(πππΎ)) β© dom (πΉβπ)))) |
124 | 123 | elrab 3682 |
. . . . . . . . . . . . . . 15
β’ ((πΆβ(πππΎ)) β {π β π β£ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = (π β© dom (πΉβπ))} β ((πΆβ(πππΎ)) β π β§ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = ((πΆβ(πππΎ)) β© dom (πΉβπ)))) |
125 | 121, 124 | sylib 217 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β π) β ((πΆβ(πππΎ)) β π β§ {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = ((πΆβ(πππΎ)) β© dom (πΉβπ)))) |
126 | 125 | simprd 497 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π) β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} = ((πΆβ(πππΎ)) β© dom (πΉβπ))) |
127 | 126 | eqcomd 2739 |
. . . . . . . . . . . 12
β’ ((π β§ π β π) β ((πΆβ(πππΎ)) β© dom (πΉβπ)) = {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))}) |
128 | 127 | adantr 482 |
. . . . . . . . . . 11
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β ((πΆβ(πππΎ)) β© dom (πΉβπ)) = {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))}) |
129 | 74, 128 | eleqtrd 2836 |
. . . . . . . . . 10
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β π β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))}) |
130 | | fveq2 6888 |
. . . . . . . . . . . 12
β’ (π₯ = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ)) |
131 | | eqidd 2734 |
. . . . . . . . . . . 12
β’ (π₯ = π β (π΄ + (1 / πΎ)) = (π΄ + (1 / πΎ))) |
132 | 130, 131 | breq12d 5160 |
. . . . . . . . . . 11
β’ (π₯ = π β (((πΉβπ)βπ₯) < (π΄ + (1 / πΎ)) β ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) |
133 | 132 | elrab 3682 |
. . . . . . . . . 10
β’ (π β {π₯ β dom (πΉβπ) β£ ((πΉβπ)βπ₯) < (π΄ + (1 / πΎ))} β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) |
134 | 129, 133 | sylib 217 |
. . . . . . . . 9
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) |
135 | 134 | simprd 497 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) |
136 | 59, 135 | jca 513 |
. . . . . . 7
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ π β (ππ»πΎ))) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) |
137 | 136 | ex 414 |
. . . . . 6
β’ ((π β§ π β π) β ((π β dom (πΉβπ) β§ π β (ππ»πΎ)) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))))) |
138 | 55, 58, 137 | syl2anc 585 |
. . . . 5
β’ (((π β§ π β π) β§ π β (β€β₯βπ)) β ((π β dom (πΉβπ) β§ π β (ππ»πΎ)) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))))) |
139 | 138 | ralimdva 3168 |
. . . 4
β’ ((π β§ π β π) β (βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ π β (ππ»πΎ)) β βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))))) |
140 | 139 | reximdva 3169 |
. . 3
β’ (π β (βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ π β (ππ»πΎ)) β βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))))) |
141 | 54, 140 | mpd 15 |
. 2
β’ (π β βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) |
142 | | simprl 770 |
. . . . . . 7
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β π β dom (πΉβπ)) |
143 | | eleq1 2822 |
. . . . . . . . . . . . . 14
β’ (π = π β (π β π β π β π)) |
144 | 143 | anbi2d 630 |
. . . . . . . . . . . . 13
β’ (π = π β ((π β§ π β π) β (π β§ π β π))) |
145 | | fveq2 6888 |
. . . . . . . . . . . . . 14
β’ (π = π β (πΉβπ) = (πΉβπ)) |
146 | 145, 15 | feq12d 6702 |
. . . . . . . . . . . . 13
β’ (π = π β ((πΉβπ):dom (πΉβπ)βΆβ β (πΉβπ):dom (πΉβπ)βΆβ)) |
147 | 144, 146 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π = π β (((π β§ π β π) β (πΉβπ):dom (πΉβπ)βΆβ) β ((π β§ π β π) β (πΉβπ):dom (πΉβπ)βΆβ))) |
148 | 76 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π) β π β SAlg) |
149 | | smflimlem3.m |
. . . . . . . . . . . . 13
β’ ((π β§ π β π) β (πΉβπ) β (SMblFnβπ)) |
150 | | eqid 2733 |
. . . . . . . . . . . . 13
β’ dom
(πΉβπ) = dom (πΉβπ) |
151 | 148, 149,
150 | smff 45383 |
. . . . . . . . . . . 12
β’ ((π β§ π β π) β (πΉβπ):dom (πΉβπ)βΆβ) |
152 | 147, 151 | chvarvv 2003 |
. . . . . . . . . . 11
β’ ((π β§ π β π) β (πΉβπ):dom (πΉβπ)βΆβ) |
153 | 152 | adantr 482 |
. . . . . . . . . 10
β’ (((π β§ π β π) β§ π β dom (πΉβπ)) β (πΉβπ):dom (πΉβπ)βΆβ) |
154 | | simpr 486 |
. . . . . . . . . 10
β’ (((π β§ π β π) β§ π β dom (πΉβπ)) β π β dom (πΉβπ)) |
155 | 153, 154 | ffvelcdmd 7083 |
. . . . . . . . 9
β’ (((π β§ π β π) β§ π β dom (πΉβπ)) β ((πΉβπ)βπ) β β) |
156 | 155 | adantrr 716 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β ((πΉβπ)βπ) β β) |
157 | | smflimlem3.a |
. . . . . . . . . 10
β’ (π β π΄ β β) |
158 | 42 | nnrecred 12259 |
. . . . . . . . . 10
β’ (π β (1 / πΎ) β β) |
159 | 157, 158 | readdcld 11239 |
. . . . . . . . 9
β’ (π β (π΄ + (1 / πΎ)) β β) |
160 | 159 | ad2antrr 725 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β (π΄ + (1 / πΎ)) β β) |
161 | | smflimlem3.y |
. . . . . . . . . . 11
β’ (π β π β
β+) |
162 | 161 | rpred 13012 |
. . . . . . . . . 10
β’ (π β π β β) |
163 | 157, 162 | readdcld 11239 |
. . . . . . . . 9
β’ (π β (π΄ + π) β β) |
164 | 163 | ad2antrr 725 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β (π΄ + π) β β) |
165 | | simprr 772 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) |
166 | | smflimlem3.l |
. . . . . . . . . 10
β’ (π β (1 / πΎ) < π) |
167 | 158, 162,
157, 166 | ltadd2dd 11369 |
. . . . . . . . 9
β’ (π β (π΄ + (1 / πΎ)) < (π΄ + π)) |
168 | 167 | ad2antrr 725 |
. . . . . . . 8
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β (π΄ + (1 / πΎ)) < (π΄ + π)) |
169 | 156, 160,
164, 165, 168 | lttrd 11371 |
. . . . . . 7
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β ((πΉβπ)βπ) < (π΄ + π)) |
170 | 142, 169 | jca 513 |
. . . . . 6
β’ (((π β§ π β π) β§ (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ)))) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π))) |
171 | 170 | ex 414 |
. . . . 5
β’ ((π β§ π β π) β ((π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π)))) |
172 | 55, 58, 171 | syl2anc 585 |
. . . 4
β’ (((π β§ π β π) β§ π β (β€β₯βπ)) β ((π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) β (π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π)))) |
173 | 172 | ralimdva 3168 |
. . 3
β’ ((π β§ π β π) β (βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) β βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π)))) |
174 | 173 | reximdva 3169 |
. 2
β’ (π β (βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + (1 / πΎ))) β βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π)))) |
175 | 141, 174 | mpd 15 |
1
β’ (π β βπ β π βπ β (β€β₯βπ)(π β dom (πΉβπ) β§ ((πΉβπ)βπ) < (π΄ + π))) |