Metamath Proof Explorer


Theorem infxpenc2

Description: Existence form of infxpenc . A "uniform" or "canonical" version of infxpen , asserting the existence of a single function g that simultaneously demonstrates product idempotence of all ordinals below a given bound. (Contributed by Mario Carneiro, 30-May-2015)

Ref Expression
Assertion infxpenc2 A On g b A ω b g b : b × b 1-1 onto b

Proof

Step Hyp Ref Expression
1 cnfcom3c A On n x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y
2 df-2o 2 𝑜 = suc 1 𝑜
3 2 oveq2i ω 𝑜 2 𝑜 = ω 𝑜 suc 1 𝑜
4 omelon ω On
5 1on 1 𝑜 On
6 oesuc ω On 1 𝑜 On ω 𝑜 suc 1 𝑜 = ω 𝑜 1 𝑜 𝑜 ω
7 4 5 6 mp2an ω 𝑜 suc 1 𝑜 = ω 𝑜 1 𝑜 𝑜 ω
8 oe1 ω On ω 𝑜 1 𝑜 = ω
9 4 8 ax-mp ω 𝑜 1 𝑜 = ω
10 9 oveq1i ω 𝑜 1 𝑜 𝑜 ω = ω 𝑜 ω
11 3 7 10 3eqtri ω 𝑜 2 𝑜 = ω 𝑜 ω
12 omxpen ω On ω On ω 𝑜 ω ω × ω
13 4 4 12 mp2an ω 𝑜 ω ω × ω
14 11 13 eqbrtri ω 𝑜 2 𝑜 ω × ω
15 xpomen ω × ω ω
16 14 15 entri ω 𝑜 2 𝑜 ω
17 16 a1i A On ω 𝑜 2 𝑜 ω
18 bren ω 𝑜 2 𝑜 ω f f : ω 𝑜 2 𝑜 1-1 onto ω
19 17 18 sylib A On f f : ω 𝑜 2 𝑜 1-1 onto ω
20 exdistrv n f x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω n x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f f : ω 𝑜 2 𝑜 1-1 onto ω
21 simpl A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω A On
22 simprl A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y
23 sseq2 x = b ω x ω b
24 oveq2 y = w ω 𝑜 y = ω 𝑜 w
25 24 f1oeq3d y = w n x : x 1-1 onto ω 𝑜 y n x : x 1-1 onto ω 𝑜 w
26 25 cbvrexvw y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y w On 1 𝑜 n x : x 1-1 onto ω 𝑜 w
27 fveq2 x = b n x = n b
28 f1oeq1 n x = n b n x : x 1-1 onto ω 𝑜 w n b : x 1-1 onto ω 𝑜 w
29 27 28 syl x = b n x : x 1-1 onto ω 𝑜 w n b : x 1-1 onto ω 𝑜 w
30 f1oeq2 x = b n b : x 1-1 onto ω 𝑜 w n b : b 1-1 onto ω 𝑜 w
31 29 30 bitrd x = b n x : x 1-1 onto ω 𝑜 w n b : b 1-1 onto ω 𝑜 w
32 31 rexbidv x = b w On 1 𝑜 n x : x 1-1 onto ω 𝑜 w w On 1 𝑜 n b : b 1-1 onto ω 𝑜 w
33 26 32 syl5bb x = b y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y w On 1 𝑜 n b : b 1-1 onto ω 𝑜 w
34 23 33 imbi12d x = b ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y ω b w On 1 𝑜 n b : b 1-1 onto ω 𝑜 w
35 34 cbvralvw x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y b A ω b w On 1 𝑜 n b : b 1-1 onto ω 𝑜 w
36 22 35 sylib A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω b A ω b w On 1 𝑜 n b : b 1-1 onto ω 𝑜 w
37 oveq2 b = z ω 𝑜 b = ω 𝑜 z
38 37 cbvmptv b On 1 𝑜 ω 𝑜 b = z On 1 𝑜 ω 𝑜 z
39 38 cnveqi b On 1 𝑜 ω 𝑜 b -1 = z On 1 𝑜 ω 𝑜 z -1
40 39 fveq1i b On 1 𝑜 ω 𝑜 b -1 ran n b = z On 1 𝑜 ω 𝑜 z -1 ran n b
41 2on 2 𝑜 On
42 peano1 ω
43 oen0 ω On 2 𝑜 On ω ω 𝑜 2 𝑜
44 42 43 mpan2 ω On 2 𝑜 On ω 𝑜 2 𝑜
45 4 41 44 mp2an ω 𝑜 2 𝑜
46 eqid f I ω 𝑜 2 𝑜 f -1 f -1 f -1 = f I ω 𝑜 2 𝑜 f -1 f -1 f -1
47 46 fveqf1o f : ω 𝑜 2 𝑜 1-1 onto ω ω 𝑜 2 𝑜 ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 =
48 45 42 47 mp3an23 f : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 =
49 48 ad2antll A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 =
50 49 simpld A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 : ω 𝑜 2 𝑜 1-1 onto ω
51 49 simprd A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω f I ω 𝑜 2 𝑜 f -1 f -1 f -1 =
52 21 36 40 50 51 infxpenc2lem3 A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω g b A ω b g b : b × b 1-1 onto b
53 52 ex A On x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω g b A ω b g b : b × b 1-1 onto b
54 53 exlimdvv A On n f x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f : ω 𝑜 2 𝑜 1-1 onto ω g b A ω b g b : b × b 1-1 onto b
55 20 54 syl5bir A On n x A ω x y On 1 𝑜 n x : x 1-1 onto ω 𝑜 y f f : ω 𝑜 2 𝑜 1-1 onto ω g b A ω b g b : b × b 1-1 onto b
56 1 19 55 mp2and A On g b A ω b g b : b × b 1-1 onto b