Step | Hyp | Ref
| Expression |
1 | | eqid 2177 |
. . . 4
β’ (π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < )) = (π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, <
)) |
2 | | simp1 997 |
. . . . 5
β’ ((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β πΆ β (βMetβπ)) |
3 | 2 | adantr 276 |
. . . 4
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β πΆ β (βMetβπ)) |
4 | | simp2 998 |
. . . . 5
β’ ((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β π· β (βMetβπ)) |
5 | 4 | adantr 276 |
. . . 4
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β π· β (βMetβπ)) |
6 | 1, 3, 5 | xmetxp 14046 |
. . 3
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < )) β
(βMetβ(π
Γ π))) |
7 | | simpl3 1002 |
. . 3
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β πΈ β (βMetβπ)) |
8 | | simprl 529 |
. . . 4
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β π΄ β π) |
9 | | simprr 531 |
. . . 4
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β π΅ β π) |
10 | 8, 9 | opelxpd 4661 |
. . 3
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β β¨π΄, π΅β© β (π Γ π)) |
11 | | eqid 2177 |
. . . 4
β’
(MetOpenβ(π
β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) =
(MetOpenβ(π β
(π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, <
))) |
12 | | txmetcnp.4 |
. . . 4
β’ πΏ = (MetOpenβπΈ) |
13 | 11, 12 | metcnp 14051 |
. . 3
β’ (((π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < )) β
(βMetβ(π
Γ π)) β§ πΈ β (βMetβπ) β§ β¨π΄, π΅β© β (π Γ π)) β (πΉ β (((MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) CnP πΏ)ββ¨π΄, π΅β©) β (πΉ:(π Γ π)βΆπ β§ βπ§ β β+ βπ€ β β+
βπ‘ β (π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§)))) |
14 | 6, 7, 10, 13 | syl3anc 1238 |
. 2
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (πΉ β (((MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) CnP πΏ)ββ¨π΄, π΅β©) β (πΉ:(π Γ π)βΆπ β§ βπ§ β β+ βπ€ β β+
βπ‘ β (π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§)))) |
15 | | metcn.2 |
. . . . . 6
β’ π½ = (MetOpenβπΆ) |
16 | | metcn.4 |
. . . . . 6
β’ πΎ = (MetOpenβπ·) |
17 | 1, 3, 5, 15, 16, 11 | xmettx 14049 |
. . . . 5
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) = (π½ Γt πΎ)) |
18 | 17 | oveq1d 5892 |
. . . 4
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β ((MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) CnP πΏ) = ((π½ Γt πΎ) CnP πΏ)) |
19 | 18 | fveq1d 5519 |
. . 3
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (((MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) CnP πΏ)ββ¨π΄, π΅β©) = (((π½ Γt πΎ) CnP πΏ)ββ¨π΄, π΅β©)) |
20 | 19 | eleq2d 2247 |
. 2
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (πΉ β (((MetOpenβ(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))) CnP πΏ)ββ¨π΄, π΅β©) β πΉ β (((π½ Γt πΎ) CnP πΏ)ββ¨π΄, π΅β©))) |
21 | | oveq2 5885 |
. . . . . . . . 9
β’ (π‘ = β¨π’, π£β© β (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) = (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©)) |
22 | 21 | breq1d 4015 |
. . . . . . . 8
β’ (π‘ = β¨π’, π£β© β ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€)) |
23 | | fveq2 5517 |
. . . . . . . . . 10
β’ (π‘ = β¨π’, π£β© β (πΉβπ‘) = (πΉββ¨π’, π£β©)) |
24 | 23 | oveq2d 5893 |
. . . . . . . . 9
β’ (π‘ = β¨π’, π£β© β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) = ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©))) |
25 | 24 | breq1d 4015 |
. . . . . . . 8
β’ (π‘ = β¨π’, π£β© β (((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§)) |
26 | 22, 25 | imbi12d 234 |
. . . . . . 7
β’ (π‘ = β¨π’, π£β© β (((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§) β ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§))) |
27 | 26 | ralxp 4772 |
. . . . . 6
β’
(βπ‘ β
(π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§) β βπ’ β π βπ£ β π ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§)) |
28 | 8 | ad4antr 494 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π΄ β π) |
29 | 9 | ad4antr 494 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π΅ β π) |
30 | 28, 29 | opelxpd 4661 |
. . . . . . . . . . . . 13
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β β¨π΄, π΅β© β (π Γ π)) |
31 | | simplr 528 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π’ β π) |
32 | | simpr 110 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π£ β π) |
33 | 31, 32 | opelxpd 4661 |
. . . . . . . . . . . . 13
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β β¨π’, π£β© β (π Γ π)) |
34 | 2 | ad5antr 496 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β πΆ β (βMetβπ)) |
35 | | xmetf 13889 |
. . . . . . . . . . . . . . . 16
β’ (πΆ β (βMetβπ) β πΆ:(π Γ π)βΆβ*) |
36 | 34, 35 | syl 14 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β πΆ:(π Γ π)βΆβ*) |
37 | | op1stg 6153 |
. . . . . . . . . . . . . . . . 17
β’ ((π΄ β π β§ π΅ β π) β (1st ββ¨π΄, π΅β©) = π΄) |
38 | 28, 29, 37 | syl2anc 411 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (1st ββ¨π΄, π΅β©) = π΄) |
39 | 38, 28 | eqeltrd 2254 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (1st ββ¨π΄, π΅β©) β π) |
40 | | op1stg 6153 |
. . . . . . . . . . . . . . . . 17
β’ ((π’ β π β§ π£ β π) β (1st ββ¨π’, π£β©) = π’) |
41 | 40 | adantll 476 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (1st ββ¨π’, π£β©) = π’) |
42 | 41, 31 | eqeltrd 2254 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (1st ββ¨π’, π£β©) β π) |
43 | 36, 39, 42 | fovcdmd 6021 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)) β
β*) |
44 | 4 | ad5antr 496 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π· β (βMetβπ)) |
45 | | xmetf 13889 |
. . . . . . . . . . . . . . . 16
β’ (π· β (βMetβπ) β π·:(π Γ π)βΆβ*) |
46 | 44, 45 | syl 14 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π·:(π Γ π)βΆβ*) |
47 | | op2ndg 6154 |
. . . . . . . . . . . . . . . . 17
β’ ((π΄ β π β§ π΅ β π) β (2nd ββ¨π΄, π΅β©) = π΅) |
48 | 28, 29, 47 | syl2anc 411 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (2nd ββ¨π΄, π΅β©) = π΅) |
49 | 48, 29 | eqeltrd 2254 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (2nd ββ¨π΄, π΅β©) β π) |
50 | | op2ndg 6154 |
. . . . . . . . . . . . . . . . 17
β’ ((π’ β π β§ π£ β π) β (2nd ββ¨π’, π£β©) = π£) |
51 | 50 | adantll 476 |
. . . . . . . . . . . . . . . 16
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (2nd ββ¨π’, π£β©) = π£) |
52 | 51, 32 | eqeltrd 2254 |
. . . . . . . . . . . . . . 15
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (2nd ββ¨π’, π£β©) β π) |
53 | 46, 49, 52 | fovcdmd 6021 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©)) β
β*) |
54 | | xrmaxcl 11262 |
. . . . . . . . . . . . . 14
β’
((((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)) β β* β§
((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©)) β β*) β
sup({((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, < ) β
β*) |
55 | 43, 53, 54 | syl2anc 411 |
. . . . . . . . . . . . 13
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β sup({((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, < ) β
β*) |
56 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = β¨π΄, π΅β© β (1st βπ) = (1st
ββ¨π΄, π΅β©)) |
57 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = β¨π’, π£β© β (1st βπ ) = (1st
ββ¨π’, π£β©)) |
58 | 56, 57 | oveqan12d 5896 |
. . . . . . . . . . . . . . . 16
β’ ((π = β¨π΄, π΅β© β§ π = β¨π’, π£β©) β ((1st βπ)πΆ(1st βπ )) = ((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©))) |
59 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = β¨π΄, π΅β© β (2nd βπ) = (2nd
ββ¨π΄, π΅β©)) |
60 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = β¨π’, π£β© β (2nd βπ ) = (2nd
ββ¨π’, π£β©)) |
61 | 59, 60 | oveqan12d 5896 |
. . . . . . . . . . . . . . . 16
β’ ((π = β¨π΄, π΅β© β§ π = β¨π’, π£β©) β ((2nd βπ)π·(2nd βπ )) = ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))) |
62 | 58, 61 | preq12d 3679 |
. . . . . . . . . . . . . . 15
β’ ((π = β¨π΄, π΅β© β§ π = β¨π’, π£β©) β {((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))} = {((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}) |
63 | 62 | supeq1d 6988 |
. . . . . . . . . . . . . 14
β’ ((π = β¨π΄, π΅β© β§ π = β¨π’, π£β©) β sup({((1st
βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ) =
sup({((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, <
)) |
64 | 63, 1 | ovmpoga 6006 |
. . . . . . . . . . . . 13
β’
((β¨π΄, π΅β© β (π Γ π) β§ β¨π’, π£β© β (π Γ π) β§ sup({((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, < ) β
β*) β (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) = sup({((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, <
)) |
65 | 30, 33, 55, 64 | syl3anc 1238 |
. . . . . . . . . . . 12
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) = sup({((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, <
)) |
66 | 38, 41 | oveq12d 5895 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((1st ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)) = (π΄πΆπ’)) |
67 | 48, 51 | oveq12d 5895 |
. . . . . . . . . . . . . 14
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©)) = (π΅π·π£)) |
68 | 66, 67 | preq12d 3679 |
. . . . . . . . . . . . 13
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β {((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))} = {(π΄πΆπ’), (π΅π·π£)}) |
69 | 68 | supeq1d 6988 |
. . . . . . . . . . . 12
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β sup({((1st
ββ¨π΄, π΅β©)πΆ(1st ββ¨π’, π£β©)), ((2nd ββ¨π΄, π΅β©)π·(2nd ββ¨π’, π£β©))}, β*, < ) =
sup({(π΄πΆπ’), (π΅π·π£)}, β*, <
)) |
70 | 65, 69 | eqtrd 2210 |
. . . . . . . . . . 11
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) = sup({(π΄πΆπ’), (π΅π·π£)}, β*, <
)) |
71 | 70 | breq1d 4015 |
. . . . . . . . . 10
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β sup({(π΄πΆπ’), (π΅π·π£)}, β*, < ) < π€)) |
72 | | xmetcl 13891 |
. . . . . . . . . . . 12
β’ ((πΆ β (βMetβπ) β§ π΄ β π β§ π’ β π) β (π΄πΆπ’) β
β*) |
73 | 34, 28, 31, 72 | syl3anc 1238 |
. . . . . . . . . . 11
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (π΄πΆπ’) β
β*) |
74 | | xmetcl 13891 |
. . . . . . . . . . . 12
β’ ((π· β (βMetβπ) β§ π΅ β π β§ π£ β π) β (π΅π·π£) β
β*) |
75 | 44, 29, 32, 74 | syl3anc 1238 |
. . . . . . . . . . 11
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (π΅π·π£) β
β*) |
76 | | rpxr 9663 |
. . . . . . . . . . . 12
β’ (π€ β β+
β π€ β
β*) |
77 | 76 | ad3antlr 493 |
. . . . . . . . . . 11
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β π€ β β*) |
78 | | xrmaxltsup 11268 |
. . . . . . . . . . 11
β’ (((π΄πΆπ’) β β* β§ (π΅π·π£) β β* β§ π€ β β*)
β (sup({(π΄πΆπ’), (π΅π·π£)}, β*, < ) < π€ β ((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€))) |
79 | 73, 75, 77, 78 | syl3anc 1238 |
. . . . . . . . . 10
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (sup({(π΄πΆπ’), (π΅π·π£)}, β*, < ) < π€ β ((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€))) |
80 | 71, 79 | bitrd 188 |
. . . . . . . . 9
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€))) |
81 | | df-ov 5880 |
. . . . . . . . . . . . 13
β’ (π΄πΉπ΅) = (πΉββ¨π΄, π΅β©) |
82 | | df-ov 5880 |
. . . . . . . . . . . . 13
β’ (π’πΉπ£) = (πΉββ¨π’, π£β©) |
83 | 81, 82 | oveq12i 5889 |
. . . . . . . . . . . 12
β’ ((π΄πΉπ΅)πΈ(π’πΉπ£)) = ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) |
84 | 83 | breq1i 4012 |
. . . . . . . . . . 11
β’ (((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§) |
85 | 84 | bicomi 132 |
. . . . . . . . . 10
β’ (((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§ β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§) |
86 | 85 | a1i 9 |
. . . . . . . . 9
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§ β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§)) |
87 | 80, 86 | imbi12d 234 |
. . . . . . . 8
β’
(((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β§ π£ β π) β (((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§) β (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
88 | 87 | ralbidva 2473 |
. . . . . . 7
β’
((((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β§ π’ β π) β (βπ£ β π ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§) β βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
89 | 88 | ralbidva 2473 |
. . . . . 6
β’
(((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β (βπ’ β
π βπ£ β π ((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))β¨π’, π£β©) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉββ¨π’, π£β©)) < π§) β βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
90 | 27, 89 | bitrid 192 |
. . . . 5
β’
(((((πΆ β
(βMetβπ) β§
π· β
(βMetβπ) β§
πΈ β
(βMetβπ)) β§
(π΄ β π β§ π΅ β π)) β§ π§ β β+) β§ π€ β β+)
β (βπ‘ β
(π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§) β βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
91 | 90 | rexbidva 2474 |
. . . 4
β’ ((((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β§ π§ β β+) β
(βπ€ β
β+ βπ‘ β (π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§) β βπ€ β β+ βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
92 | 91 | ralbidva 2473 |
. . 3
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (βπ§ β β+ βπ€ β β+
βπ‘ β (π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§) β βπ§ β β+ βπ€ β β+
βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§))) |
93 | 92 | anbi2d 464 |
. 2
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β ((πΉ:(π Γ π)βΆπ β§ βπ§ β β+ βπ€ β β+
βπ‘ β (π Γ π)((β¨π΄, π΅β©(π β (π Γ π), π β (π Γ π) β¦ sup({((1st βπ)πΆ(1st βπ )), ((2nd βπ)π·(2nd βπ ))}, β*, < ))π‘) < π€ β ((πΉββ¨π΄, π΅β©)πΈ(πΉβπ‘)) < π§)) β (πΉ:(π Γ π)βΆπ β§ βπ§ β β+ βπ€ β β+
βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§)))) |
94 | 14, 20, 93 | 3bitr3d 218 |
1
β’ (((πΆ β (βMetβπ) β§ π· β (βMetβπ) β§ πΈ β (βMetβπ)) β§ (π΄ β π β§ π΅ β π)) β (πΉ β (((π½ Γt πΎ) CnP πΏ)ββ¨π΄, π΅β©) β (πΉ:(π Γ π)βΆπ β§ βπ§ β β+ βπ€ β β+
βπ’ β π βπ£ β π (((π΄πΆπ’) < π€ β§ (π΅π·π£) < π€) β ((π΄πΉπ΅)πΈ(π’πΉπ£)) < π§)))) |