Metamath Proof Explorer


Theorem mapfienlem1

Description: Lemma 1 for mapfien . (Contributed by AV, 3-Jul-2019) (Revised by AV, 28-Jul-2024)

Ref Expression
Hypotheses mapfien.s S = x B A | finSupp Z x
mapfien.t T = x D C | finSupp W x
mapfien.w W = G Z
mapfien.f φ F : C 1-1 onto A
mapfien.g φ G : B 1-1 onto D
mapfien.a φ A U
mapfien.b φ B V
mapfien.c φ C X
mapfien.d φ D Y
mapfien.z φ Z B
Assertion mapfienlem1 φ f S finSupp W G f F

Proof

Step Hyp Ref Expression
1 mapfien.s S = x B A | finSupp Z x
2 mapfien.t T = x D C | finSupp W x
3 mapfien.w W = G Z
4 mapfien.f φ F : C 1-1 onto A
5 mapfien.g φ G : B 1-1 onto D
6 mapfien.a φ A U
7 mapfien.b φ B V
8 mapfien.c φ C X
9 mapfien.d φ D Y
10 mapfien.z φ Z B
11 3 fvexi W V
12 11 a1i φ f S W V
13 10 adantr φ f S Z B
14 elrabi f x B A | finSupp Z x f B A
15 elmapi f B A f : A B
16 14 15 syl f x B A | finSupp Z x f : A B
17 16 1 eleq2s f S f : A B
18 f1of F : C 1-1 onto A F : C A
19 4 18 syl φ F : C A
20 fco f : A B F : C A f F : C B
21 17 19 20 syl2anr φ f S f F : C B
22 f1of G : B 1-1 onto D G : B D
23 5 22 syl φ G : B D
24 23 adantr φ f S G : B D
25 ssidd φ f S B B
26 8 adantr φ f S C X
27 7 adantr φ f S B V
28 breq1 x = f finSupp Z x finSupp Z f
29 28 1 elrab2 f S f B A finSupp Z f
30 29 simprbi f S finSupp Z f
31 30 adantl φ f S finSupp Z f
32 f1of1 F : C 1-1 onto A F : C 1-1 A
33 4 32 syl φ F : C 1-1 A
34 33 adantr φ f S F : C 1-1 A
35 simpr φ f S f S
36 31 34 13 35 fsuppco φ f S finSupp Z f F
37 3 eqcomi G Z = W
38 37 a1i φ f S G Z = W
39 12 13 21 24 25 26 27 36 38 fsuppcor φ f S finSupp W G f F