Step | Hyp | Ref
| Expression |
1 | | xrge0iifhmeo.1 |
. . 3
β’ πΉ = (π₯ β (0[,]1) β¦ if(π₯ = 0, +β, -(logβπ₯))) |
2 | | xrge0iifhmeo.k |
. . 3
β’ π½ = ((ordTopβ β€ )
βΎt (0[,]+β)) |
3 | 1, 2 | xrge0iifhmeo 32905 |
. 2
β’ πΉ β (IIHomeoπ½) |
4 | | unitsscn 13474 |
. . . . 5
β’ (0[,]1)
β β |
5 | | xpss12 5691 |
. . . . 5
β’ (((0[,]1)
β β β§ (0[,]1) β β) β ((0[,]1) Γ (0[,]1))
β (β Γ β)) |
6 | 4, 4, 5 | mp2an 691 |
. . . 4
β’ ((0[,]1)
Γ (0[,]1)) β (β Γ β) |
7 | | ax-mulf 11187 |
. . . . 5
β’ Β·
:(β Γ β)βΆβ |
8 | | ffn 6715 |
. . . . 5
β’ (
Β· :(β Γ β)βΆβ β Β· Fn (β
Γ β)) |
9 | | fnssresb 6670 |
. . . . 5
β’ (
Β· Fn (β Γ β) β (( Β· βΎ ((0[,]1)
Γ (0[,]1))) Fn ((0[,]1) Γ (0[,]1)) β ((0[,]1) Γ (0[,]1))
β (β Γ β))) |
10 | 7, 8, 9 | mp2b 10 |
. . . 4
β’ ((
Β· βΎ ((0[,]1) Γ (0[,]1))) Fn ((0[,]1) Γ (0[,]1)) β
((0[,]1) Γ (0[,]1)) β (β Γ β)) |
11 | 6, 10 | mpbir 230 |
. . 3
β’ (
Β· βΎ ((0[,]1) Γ (0[,]1))) Fn ((0[,]1) Γ
(0[,]1)) |
12 | | ovres 7570 |
. . . . 5
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (π’( Β· βΎ ((0[,]1)
Γ (0[,]1)))π£) =
(π’ Β· π£)) |
13 | | iimulcl 24445 |
. . . . 5
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (π’ Β· π£) β (0[,]1)) |
14 | 12, 13 | eqeltrd 2834 |
. . . 4
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (π’( Β· βΎ ((0[,]1)
Γ (0[,]1)))π£) β
(0[,]1)) |
15 | 14 | rgen2 3198 |
. . 3
β’
βπ’ β
(0[,]1)βπ£ β
(0[,]1)(π’( Β· βΎ
((0[,]1) Γ (0[,]1)))π£) β (0[,]1) |
16 | | ffnov 7532 |
. . 3
β’ ((
Β· βΎ ((0[,]1) Γ (0[,]1))):((0[,]1) Γ
(0[,]1))βΆ(0[,]1) β (( Β· βΎ ((0[,]1) Γ (0[,]1)))
Fn ((0[,]1) Γ (0[,]1)) β§ βπ’ β (0[,]1)βπ£ β (0[,]1)(π’( Β· βΎ ((0[,]1) Γ
(0[,]1)))π£) β
(0[,]1))) |
17 | 11, 15, 16 | mpbir2an 710 |
. 2
β’ (
Β· βΎ ((0[,]1) Γ (0[,]1))):((0[,]1) Γ
(0[,]1))βΆ(0[,]1) |
18 | | iccssxr 13404 |
. . . . . 6
β’
(0[,]+β) β β* |
19 | | xpss12 5691 |
. . . . . 6
β’
(((0[,]+β) β β* β§ (0[,]+β)
β β*) β ((0[,]+β) Γ (0[,]+β))
β (β* Γ β*)) |
20 | 18, 18, 19 | mp2an 691 |
. . . . 5
β’
((0[,]+β) Γ (0[,]+β)) β (β*
Γ β*) |
21 | | xaddf 13200 |
. . . . . 6
β’
+π :(β* Γ
β*)βΆβ* |
22 | | ffn 6715 |
. . . . . 6
β’ (
+π :(β* Γ
β*)βΆβ* β +π Fn
(β* Γ β*)) |
23 | | fnssresb 6670 |
. . . . . 6
β’ (
+π Fn (β* Γ β*)
β (( +π βΎ ((0[,]+β) Γ
(0[,]+β))) Fn ((0[,]+β) Γ (0[,]+β)) β
((0[,]+β) Γ (0[,]+β)) β (β* Γ
β*))) |
24 | 21, 22, 23 | mp2b 10 |
. . . . 5
β’ ((
+π βΎ ((0[,]+β) Γ (0[,]+β))) Fn
((0[,]+β) Γ (0[,]+β)) β ((0[,]+β) Γ
(0[,]+β)) β (β* Γ
β*)) |
25 | 20, 24 | mpbir 230 |
. . . 4
β’ (
+π βΎ ((0[,]+β) Γ (0[,]+β))) Fn
((0[,]+β) Γ (0[,]+β)) |
26 | | xrge0pluscn.1 |
. . . . 5
β’ + = (
+π βΎ ((0[,]+β) Γ
(0[,]+β))) |
27 | 26 | fneq1i 6644 |
. . . 4
β’ ( + Fn
((0[,]+β) Γ (0[,]+β)) β ( +π βΎ
((0[,]+β) Γ (0[,]+β))) Fn ((0[,]+β) Γ
(0[,]+β))) |
28 | 25, 27 | mpbir 230 |
. . 3
β’ + Fn
((0[,]+β) Γ (0[,]+β)) |
29 | 26 | oveqi 7419 |
. . . . 5
β’ (π + π) = (π( +π βΎ
((0[,]+β) Γ (0[,]+β)))π) |
30 | | ovres 7570 |
. . . . . 6
β’ ((π β (0[,]+β) β§
π β (0[,]+β))
β (π(
+π βΎ ((0[,]+β) Γ (0[,]+β)))π) = (π +π π)) |
31 | | ge0xaddcl 13436 |
. . . . . 6
β’ ((π β (0[,]+β) β§
π β (0[,]+β))
β (π
+π π)
β (0[,]+β)) |
32 | 30, 31 | eqeltrd 2834 |
. . . . 5
β’ ((π β (0[,]+β) β§
π β (0[,]+β))
β (π(
+π βΎ ((0[,]+β) Γ (0[,]+β)))π) β
(0[,]+β)) |
33 | 29, 32 | eqeltrid 2838 |
. . . 4
β’ ((π β (0[,]+β) β§
π β (0[,]+β))
β (π + π) β
(0[,]+β)) |
34 | 33 | rgen2 3198 |
. . 3
β’
βπ β
(0[,]+β)βπ
β (0[,]+β)(π
+ π) β
(0[,]+β) |
35 | | ffnov 7532 |
. . 3
β’ ( +
:((0[,]+β) Γ (0[,]+β))βΆ(0[,]+β) β ( + Fn
((0[,]+β) Γ (0[,]+β)) β§ βπ β (0[,]+β)βπ β (0[,]+β)(π + π) β (0[,]+β))) |
36 | 28, 34, 35 | mpbir2an 710 |
. 2
β’ +
:((0[,]+β) Γ (0[,]+β))βΆ(0[,]+β) |
37 | | iitopon 24387 |
. 2
β’ II β
(TopOnβ(0[,]1)) |
38 | | letopon 22701 |
. . . 4
β’
(ordTopβ β€ ) β
(TopOnββ*) |
39 | | resttopon 22657 |
. . . 4
β’
(((ordTopβ β€ ) β (TopOnββ*) β§
(0[,]+β) β β*) β ((ordTopβ β€ )
βΎt (0[,]+β)) β
(TopOnβ(0[,]+β))) |
40 | 38, 18, 39 | mp2an 691 |
. . 3
β’
((ordTopβ β€ ) βΎt (0[,]+β)) β
(TopOnβ(0[,]+β)) |
41 | 2, 40 | eqeltri 2830 |
. 2
β’ π½ β
(TopOnβ(0[,]+β)) |
42 | 26 | oveqi 7419 |
. . . 4
β’ ((πΉβπ’) + (πΉβπ£)) = ((πΉβπ’)( +π βΎ
((0[,]+β) Γ (0[,]+β)))(πΉβπ£)) |
43 | 1 | xrge0iifcnv 32902 |
. . . . . . . 8
β’ (πΉ:(0[,]1)β1-1-ontoβ(0[,]+β) β§ β‘πΉ = (π¦ β (0[,]+β) β¦ if(π¦ = +β, 0,
(expβ-π¦)))) |
44 | 43 | simpli 485 |
. . . . . . 7
β’ πΉ:(0[,]1)β1-1-ontoβ(0[,]+β) |
45 | | f1of 6831 |
. . . . . . 7
β’ (πΉ:(0[,]1)β1-1-ontoβ(0[,]+β) β πΉ:(0[,]1)βΆ(0[,]+β)) |
46 | 44, 45 | ax-mp 5 |
. . . . . 6
β’ πΉ:(0[,]1)βΆ(0[,]+β) |
47 | 46 | ffvelcdmi 7083 |
. . . . 5
β’ (π’ β (0[,]1) β (πΉβπ’) β (0[,]+β)) |
48 | 46 | ffvelcdmi 7083 |
. . . . 5
β’ (π£ β (0[,]1) β (πΉβπ£) β (0[,]+β)) |
49 | | ovres 7570 |
. . . . 5
β’ (((πΉβπ’) β (0[,]+β) β§ (πΉβπ£) β (0[,]+β)) β ((πΉβπ’)( +π βΎ
((0[,]+β) Γ (0[,]+β)))(πΉβπ£)) = ((πΉβπ’) +π (πΉβπ£))) |
50 | 47, 48, 49 | syl2an 597 |
. . . 4
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β ((πΉβπ’)( +π βΎ
((0[,]+β) Γ (0[,]+β)))(πΉβπ£)) = ((πΉβπ’) +π (πΉβπ£))) |
51 | 42, 50 | eqtrid 2785 |
. . 3
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β ((πΉβπ’) + (πΉβπ£)) = ((πΉβπ’) +π (πΉβπ£))) |
52 | 1, 2 | xrge0iifhom 32906 |
. . 3
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (πΉβ(π’ Β· π£)) = ((πΉβπ’) +π (πΉβπ£))) |
53 | 12 | eqcomd 2739 |
. . . 4
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (π’ Β· π£) = (π’( Β· βΎ ((0[,]1) Γ
(0[,]1)))π£)) |
54 | 53 | fveq2d 6893 |
. . 3
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (πΉβ(π’ Β· π£)) = (πΉβ(π’( Β· βΎ ((0[,]1) Γ
(0[,]1)))π£))) |
55 | 51, 52, 54 | 3eqtr2rd 2780 |
. 2
β’ ((π’ β (0[,]1) β§ π£ β (0[,]1)) β (πΉβ(π’( Β· βΎ ((0[,]1) Γ
(0[,]1)))π£)) = ((πΉβπ’) + (πΉβπ£))) |
56 | | eqid 2733 |
. . . 4
β’
((mulGrpββfld) βΎs (0[,]1)) =
((mulGrpββfld) βΎs
(0[,]1)) |
57 | 56 | iistmd 32871 |
. . 3
β’
((mulGrpββfld) βΎs (0[,]1))
β TopMnd |
58 | | cnfldex 20940 |
. . . . . 6
β’
βfld β V |
59 | | ovex 7439 |
. . . . . 6
β’ (0[,]1)
β V |
60 | | eqid 2733 |
. . . . . . 7
β’
(βfld βΎs (0[,]1)) =
(βfld βΎs (0[,]1)) |
61 | | eqid 2733 |
. . . . . . 7
β’
(mulGrpββfld) =
(mulGrpββfld) |
62 | 60, 61 | mgpress 19997 |
. . . . . 6
β’
((βfld β V β§ (0[,]1) β V) β
((mulGrpββfld) βΎs (0[,]1)) =
(mulGrpβ(βfld βΎs
(0[,]1)))) |
63 | 58, 59, 62 | mp2an 691 |
. . . . 5
β’
((mulGrpββfld) βΎs (0[,]1)) =
(mulGrpβ(βfld βΎs
(0[,]1))) |
64 | 60 | dfii4 24392 |
. . . . 5
β’ II =
(TopOpenβ(βfld βΎs
(0[,]1))) |
65 | 63, 64 | mgptopn 19994 |
. . . 4
β’ II =
(TopOpenβ((mulGrpββfld) βΎs
(0[,]1))) |
66 | | cnfldbas 20941 |
. . . . . . 7
β’ β =
(Baseββfld) |
67 | 61, 66 | mgpbas 19988 |
. . . . . 6
β’ β =
(Baseβ(mulGrpββfld)) |
68 | | cnfldmul 20943 |
. . . . . . 7
β’ Β·
= (.rββfld) |
69 | 61, 68 | mgpplusg 19986 |
. . . . . 6
β’ Β·
= (+gβ(mulGrpββfld)) |
70 | 7, 8 | ax-mp 5 |
. . . . . 6
β’ Β·
Fn (β Γ β) |
71 | 67, 56, 69, 70, 4 | ressplusf 32115 |
. . . . 5
β’
(+πβ((mulGrpββfld)
βΎs (0[,]1))) = ( Β· βΎ ((0[,]1) Γ
(0[,]1))) |
72 | 71 | eqcomi 2742 |
. . . 4
β’ (
Β· βΎ ((0[,]1) Γ (0[,]1))) =
(+πβ((mulGrpββfld)
βΎs (0[,]1))) |
73 | 65, 72 | tmdcn 23579 |
. . 3
β’
(((mulGrpββfld) βΎs (0[,]1))
β TopMnd β ( Β· βΎ ((0[,]1) Γ (0[,]1))) β ((II
Γt II) Cn II)) |
74 | 57, 73 | ax-mp 5 |
. 2
β’ (
Β· βΎ ((0[,]1) Γ (0[,]1))) β ((II Γt II)
Cn II) |
75 | 3, 17, 36, 37, 41, 55, 74 | mndpluscn 32895 |
1
β’ + β
((π½ Γt
π½) Cn π½) |