Step | Hyp | Ref
| Expression |
1 | | znle2.y |
. . . . . . 7
β’ π =
(β€/nβ€βπ) |
2 | | znle2.f |
. . . . . . 7
β’ πΉ = ((β€RHomβπ) βΎ π) |
3 | | znle2.w |
. . . . . . 7
β’ π = if(π = 0, β€, (0..^π)) |
4 | | znle2.l |
. . . . . . 7
β’ β€ =
(leβπ) |
5 | 1, 2, 3, 4 | znle2 21101 |
. . . . . 6
β’ (π β β0
β β€ = ((πΉ β β€ ) β β‘πΉ)) |
6 | | relco 6105 |
. . . . . . . 8
β’ Rel
((πΉ β β€ ) β
β‘πΉ) |
7 | | relssdmrn 6265 |
. . . . . . . 8
β’ (Rel
((πΉ β β€ ) β
β‘πΉ) β ((πΉ β β€ ) β β‘πΉ) β (dom ((πΉ β β€ ) β β‘πΉ) Γ ran ((πΉ β β€ ) β β‘πΉ))) |
8 | 6, 7 | ax-mp 5 |
. . . . . . 7
β’ ((πΉ β β€ ) β β‘πΉ) β (dom ((πΉ β β€ ) β β‘πΉ) Γ ran ((πΉ β β€ ) β β‘πΉ)) |
9 | | dmcoss 5969 |
. . . . . . . . 9
β’ dom
((πΉ β β€ ) β
β‘πΉ) β dom β‘πΉ |
10 | | df-rn 5687 |
. . . . . . . . . 10
β’ ran πΉ = dom β‘πΉ |
11 | | znleval.x |
. . . . . . . . . . . 12
β’ π = (Baseβπ) |
12 | 1, 11, 2, 3 | znf1o 21099 |
. . . . . . . . . . 11
β’ (π β β0
β πΉ:πβ1-1-ontoβπ) |
13 | | f1ofo 6838 |
. . . . . . . . . . 11
β’ (πΉ:πβ1-1-ontoβπ β πΉ:πβontoβπ) |
14 | | forn 6806 |
. . . . . . . . . . 11
β’ (πΉ:πβontoβπ β ran πΉ = π) |
15 | 12, 13, 14 | 3syl 18 |
. . . . . . . . . 10
β’ (π β β0
β ran πΉ = π) |
16 | 10, 15 | eqtr3id 2787 |
. . . . . . . . 9
β’ (π β β0
β dom β‘πΉ = π) |
17 | 9, 16 | sseqtrid 4034 |
. . . . . . . 8
β’ (π β β0
β dom ((πΉ β β€
) β β‘πΉ) β π) |
18 | | rncoss 5970 |
. . . . . . . . 9
β’ ran
((πΉ β β€ ) β
β‘πΉ) β ran (πΉ β β€ ) |
19 | | rncoss 5970 |
. . . . . . . . . 10
β’ ran
(πΉ β β€ ) β
ran πΉ |
20 | 19, 15 | sseqtrid 4034 |
. . . . . . . . 9
β’ (π β β0
β ran (πΉ β β€
) β π) |
21 | 18, 20 | sstrid 3993 |
. . . . . . . 8
β’ (π β β0
β ran ((πΉ β β€
) β β‘πΉ) β π) |
22 | | xpss12 5691 |
. . . . . . . 8
β’ ((dom
((πΉ β β€ ) β
β‘πΉ) β π β§ ran ((πΉ β β€ ) β β‘πΉ) β π) β (dom ((πΉ β β€ ) β β‘πΉ) Γ ran ((πΉ β β€ ) β β‘πΉ)) β (π Γ π)) |
23 | 17, 21, 22 | syl2anc 585 |
. . . . . . 7
β’ (π β β0
β (dom ((πΉ β
β€ ) β β‘πΉ) Γ ran ((πΉ β β€ ) β β‘πΉ)) β (π Γ π)) |
24 | 8, 23 | sstrid 3993 |
. . . . . 6
β’ (π β β0
β ((πΉ β β€ )
β β‘πΉ) β (π Γ π)) |
25 | 5, 24 | eqsstrd 4020 |
. . . . 5
β’ (π β β0
β β€ β (π Γ π)) |
26 | 25 | ssbrd 5191 |
. . . 4
β’ (π β β0
β (π΄ β€ π΅ β π΄(π Γ π)π΅)) |
27 | | brxp 5724 |
. . . 4
β’ (π΄(π Γ π)π΅ β (π΄ β π β§ π΅ β π)) |
28 | 26, 27 | imbitrdi 250 |
. . 3
β’ (π β β0
β (π΄ β€ π΅ β (π΄ β π β§ π΅ β π))) |
29 | 28 | pm4.71rd 564 |
. 2
β’ (π β β0
β (π΄ β€ π΅ β ((π΄ β π β§ π΅ β π) β§ π΄ β€ π΅))) |
30 | 5 | adantr 482 |
. . . . . 6
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β β€ = ((πΉ β β€ ) β β‘πΉ)) |
31 | 30 | breqd 5159 |
. . . . 5
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΄ β€ π΅ β π΄((πΉ β β€ ) β β‘πΉ)π΅)) |
32 | | brcog 5865 |
. . . . . . 7
β’ ((π΄ β π β§ π΅ β π) β (π΄((πΉ β β€ ) β β‘πΉ)π΅ β βπ₯(π΄β‘πΉπ₯ β§ π₯(πΉ β β€ )π΅))) |
33 | 32 | adantl 483 |
. . . . . 6
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΄((πΉ β β€ ) β β‘πΉ)π΅ β βπ₯(π΄β‘πΉπ₯ β§ π₯(πΉ β β€ )π΅))) |
34 | | eqcom 2740 |
. . . . . . . . 9
β’ (π₯ = (β‘πΉβπ΄) β (β‘πΉβπ΄) = π₯) |
35 | 12 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β πΉ:πβ1-1-ontoβπ) |
36 | | f1ocnv 6843 |
. . . . . . . . . . 11
β’ (πΉ:πβ1-1-ontoβπ β β‘πΉ:πβ1-1-ontoβπ) |
37 | | f1ofn 6832 |
. . . . . . . . . . 11
β’ (β‘πΉ:πβ1-1-ontoβπ β β‘πΉ Fn π) |
38 | 35, 36, 37 | 3syl 18 |
. . . . . . . . . 10
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β β‘πΉ Fn π) |
39 | | simprl 770 |
. . . . . . . . . 10
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β π΄ β π) |
40 | | fnbrfvb 6942 |
. . . . . . . . . 10
β’ ((β‘πΉ Fn π β§ π΄ β π) β ((β‘πΉβπ΄) = π₯ β π΄β‘πΉπ₯)) |
41 | 38, 39, 40 | syl2anc 585 |
. . . . . . . . 9
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((β‘πΉβπ΄) = π₯ β π΄β‘πΉπ₯)) |
42 | 34, 41 | bitr2id 284 |
. . . . . . . 8
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΄β‘πΉπ₯ β π₯ = (β‘πΉβπ΄))) |
43 | 42 | anbi1d 631 |
. . . . . . 7
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((π΄β‘πΉπ₯ β§ π₯(πΉ β β€ )π΅) β (π₯ = (β‘πΉβπ΄) β§ π₯(πΉ β β€ )π΅))) |
44 | 43 | exbidv 1925 |
. . . . . 6
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (βπ₯(π΄β‘πΉπ₯ β§ π₯(πΉ β β€ )π΅) β βπ₯(π₯ = (β‘πΉβπ΄) β§ π₯(πΉ β β€ )π΅))) |
45 | 33, 44 | bitrd 279 |
. . . . 5
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΄((πΉ β β€ ) β β‘πΉ)π΅ β βπ₯(π₯ = (β‘πΉβπ΄) β§ π₯(πΉ β β€ )π΅))) |
46 | | fvex 6902 |
. . . . . . 7
β’ (β‘πΉβπ΄) β V |
47 | | breq1 5151 |
. . . . . . 7
β’ (π₯ = (β‘πΉβπ΄) β (π₯(πΉ β β€ )π΅ β (β‘πΉβπ΄)(πΉ β β€ )π΅)) |
48 | 46, 47 | ceqsexv 3526 |
. . . . . 6
β’
(βπ₯(π₯ = (β‘πΉβπ΄) β§ π₯(πΉ β β€ )π΅) β (β‘πΉβπ΄)(πΉ β β€ )π΅) |
49 | | simprr 772 |
. . . . . . . 8
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β π΅ β π) |
50 | | brcog 5865 |
. . . . . . . 8
β’ (((β‘πΉβπ΄) β V β§ π΅ β π) β ((β‘πΉβπ΄)(πΉ β β€ )π΅ β βπ₯((β‘πΉβπ΄) β€ π₯ β§ π₯πΉπ΅))) |
51 | 46, 49, 50 | sylancr 588 |
. . . . . . 7
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((β‘πΉβπ΄)(πΉ β β€ )π΅ β βπ₯((β‘πΉβπ΄) β€ π₯ β§ π₯πΉπ΅))) |
52 | | fvex 6902 |
. . . . . . . . 9
β’ (β‘πΉβπ΅) β V |
53 | | breq2 5152 |
. . . . . . . . 9
β’ (π₯ = (β‘πΉβπ΅) β ((β‘πΉβπ΄) β€ π₯ β (β‘πΉβπ΄) β€ (β‘πΉβπ΅))) |
54 | 52, 53 | ceqsexv 3526 |
. . . . . . . 8
β’
(βπ₯(π₯ = (β‘πΉβπ΅) β§ (β‘πΉβπ΄) β€ π₯) β (β‘πΉβπ΄) β€ (β‘πΉβπ΅)) |
55 | | eqcom 2740 |
. . . . . . . . . . . . 13
β’ (π₯ = (β‘πΉβπ΅) β (β‘πΉβπ΅) = π₯) |
56 | | fnbrfvb 6942 |
. . . . . . . . . . . . . 14
β’ ((β‘πΉ Fn π β§ π΅ β π) β ((β‘πΉβπ΅) = π₯ β π΅β‘πΉπ₯)) |
57 | 38, 49, 56 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((β‘πΉβπ΅) = π₯ β π΅β‘πΉπ₯)) |
58 | 55, 57 | bitrid 283 |
. . . . . . . . . . . 12
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π₯ = (β‘πΉβπ΅) β π΅β‘πΉπ₯)) |
59 | | vex 3479 |
. . . . . . . . . . . . 13
β’ π₯ β V |
60 | | brcnvg 5878 |
. . . . . . . . . . . . 13
β’ ((π΅ β π β§ π₯ β V) β (π΅β‘πΉπ₯ β π₯πΉπ΅)) |
61 | 49, 59, 60 | sylancl 587 |
. . . . . . . . . . . 12
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΅β‘πΉπ₯ β π₯πΉπ΅)) |
62 | 58, 61 | bitrd 279 |
. . . . . . . . . . 11
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π₯ = (β‘πΉβπ΅) β π₯πΉπ΅)) |
63 | 62 | anbi1d 631 |
. . . . . . . . . 10
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((π₯ = (β‘πΉβπ΅) β§ (β‘πΉβπ΄) β€ π₯) β (π₯πΉπ΅ β§ (β‘πΉβπ΄) β€ π₯))) |
64 | 63 | biancomd 465 |
. . . . . . . . 9
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((π₯ = (β‘πΉβπ΅) β§ (β‘πΉβπ΄) β€ π₯) β ((β‘πΉβπ΄) β€ π₯ β§ π₯πΉπ΅))) |
65 | 64 | exbidv 1925 |
. . . . . . . 8
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (βπ₯(π₯ = (β‘πΉβπ΅) β§ (β‘πΉβπ΄) β€ π₯) β βπ₯((β‘πΉβπ΄) β€ π₯ β§ π₯πΉπ΅))) |
66 | 54, 65 | bitr3id 285 |
. . . . . . 7
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((β‘πΉβπ΄) β€ (β‘πΉβπ΅) β βπ₯((β‘πΉβπ΄) β€ π₯ β§ π₯πΉπ΅))) |
67 | 51, 66 | bitr4d 282 |
. . . . . 6
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β ((β‘πΉβπ΄)(πΉ β β€ )π΅ β (β‘πΉβπ΄) β€ (β‘πΉβπ΅))) |
68 | 48, 67 | bitrid 283 |
. . . . 5
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (βπ₯(π₯ = (β‘πΉβπ΄) β§ π₯(πΉ β β€ )π΅) β (β‘πΉβπ΄) β€ (β‘πΉβπ΅))) |
69 | 31, 45, 68 | 3bitrd 305 |
. . . 4
β’ ((π β β0
β§ (π΄ β π β§ π΅ β π)) β (π΄ β€ π΅ β (β‘πΉβπ΄) β€ (β‘πΉβπ΅))) |
70 | 69 | pm5.32da 580 |
. . 3
β’ (π β β0
β (((π΄ β π β§ π΅ β π) β§ π΄ β€ π΅) β ((π΄ β π β§ π΅ β π) β§ (β‘πΉβπ΄) β€ (β‘πΉβπ΅)))) |
71 | | df-3an 1090 |
. . 3
β’ ((π΄ β π β§ π΅ β π β§ (β‘πΉβπ΄) β€ (β‘πΉβπ΅)) β ((π΄ β π β§ π΅ β π) β§ (β‘πΉβπ΄) β€ (β‘πΉβπ΅))) |
72 | 70, 71 | bitr4di 289 |
. 2
β’ (π β β0
β (((π΄ β π β§ π΅ β π) β§ π΄ β€ π΅) β (π΄ β π β§ π΅ β π β§ (β‘πΉβπ΄) β€ (β‘πΉβπ΅)))) |
73 | 29, 72 | bitrd 279 |
1
β’ (π β β0
β (π΄ β€ π΅ β (π΄ β π β§ π΅ β π β§ (β‘πΉβπ΄) β€ (β‘πΉβπ΅)))) |