Metamath Proof Explorer


Theorem mpct

Description: The exponentiation of a countable set to a finite set is countable. (Contributed by Glauco Siliprandi, 24-Dec-2020)

Ref Expression
Hypotheses mpct.a φ A ω
mpct.b φ B Fin
Assertion mpct φ A B ω

Proof

Step Hyp Ref Expression
1 mpct.a φ A ω
2 mpct.b φ B Fin
3 oveq2 x = A x = A
4 3 breq1d x = A x ω A ω
5 oveq2 x = y A x = A y
6 5 breq1d x = y A x ω A y ω
7 oveq2 x = y z A x = A y z
8 7 breq1d x = y z A x ω A y z ω
9 oveq2 x = B A x = A B
10 9 breq1d x = B A x ω A B ω
11 ctex A ω A V
12 1 11 syl φ A V
13 mapdm0 A V A =
14 12 13 syl φ A =
15 snfi Fin
16 fict Fin ω
17 15 16 ax-mp ω
18 17 a1i φ ω
19 14 18 eqbrtrd φ A ω
20 vex y V
21 20 a1i φ y B z B y A y ω y V
22 snex z V
23 22 a1i φ y B z B y A y ω z V
24 12 ad2antrr φ y B z B y A y ω A V
25 eldifn z B y ¬ z y
26 disjsn y z = ¬ z y
27 25 26 sylibr z B y y z =
28 27 adantl y B z B y y z =
29 28 ad2antlr φ y B z B y A y ω y z =
30 mapunen y V z V A V y z = A y z A y × A z
31 21 23 24 29 30 syl31anc φ y B z B y A y ω A y z A y × A z
32 simpr φ y B z B y A y ω A y ω
33 vex z V
34 33 a1i φ z V
35 12 34 mapsnend φ A z A
36 endomtr A z A A ω A z ω
37 35 1 36 syl2anc φ A z ω
38 37 ad2antrr φ y B z B y A y ω A z ω
39 xpct A y ω A z ω A y × A z ω
40 32 38 39 syl2anc φ y B z B y A y ω A y × A z ω
41 endomtr A y z A y × A z A y × A z ω A y z ω
42 31 40 41 syl2anc φ y B z B y A y ω A y z ω
43 42 ex φ y B z B y A y ω A y z ω
44 4 6 8 10 19 43 2 findcard2d φ A B ω