Metamath Proof Explorer


Theorem psrbaglefiOLD

Description: Obsolete version of psrbaglefi as of 6-Aug-2024. (Contributed by Mario Carneiro, 29-Dec-2014) (Revised by Mario Carneiro, 25-Jan-2015) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Hypothesis psrbag.d D = f 0 I | f -1 Fin
Assertion psrbaglefiOLD I V F D y D | y f F Fin

Proof

Step Hyp Ref Expression
1 psrbag.d D = f 0 I | f -1 Fin
2 df-rab y D | y f F = y | y D y f F
3 1 psrbag I V y D y : I 0 y -1 Fin
4 3 adantr I V F D y D y : I 0 y -1 Fin
5 simpl y : I 0 y -1 Fin y : I 0
6 4 5 syl6bi I V F D y D y : I 0
7 6 adantrd I V F D y D y f F y : I 0
8 ss2ixp x I 0 F x 0 x I 0 F x x I 0
9 fz0ssnn0 0 F x 0
10 9 a1i x I 0 F x 0
11 8 10 mprg x I 0 F x x I 0
12 11 sseli y x I 0 F x y x I 0
13 vex y V
14 13 elixpconst y x I 0 y : I 0
15 12 14 sylib y x I 0 F x y : I 0
16 15 a1i I V F D y x I 0 F x y : I 0
17 ffn y : I 0 y Fn I
18 17 adantl I V F D y : I 0 y Fn I
19 13 elixp y x I 0 F x y Fn I x I y x 0 F x
20 19 baib y Fn I y x I 0 F x x I y x 0 F x
21 18 20 syl I V F D y : I 0 y x I 0 F x x I y x 0 F x
22 ffvelrn y : I 0 x I y x 0
23 22 adantll I V F D y : I 0 x I y x 0
24 nn0uz 0 = 0
25 23 24 eleqtrdi I V F D y : I 0 x I y x 0
26 1 psrbagfOLD I V F D F : I 0
27 26 adantr I V F D y : I 0 F : I 0
28 27 ffvelrnda I V F D y : I 0 x I F x 0
29 28 nn0zd I V F D y : I 0 x I F x
30 elfz5 y x 0 F x y x 0 F x y x F x
31 25 29 30 syl2anc I V F D y : I 0 x I y x 0 F x y x F x
32 31 ralbidva I V F D y : I 0 x I y x 0 F x x I y x F x
33 27 ffnd I V F D y : I 0 F Fn I
34 simpll I V F D y : I 0 I V
35 inidm I I = I
36 eqidd I V F D y : I 0 x I y x = y x
37 eqidd I V F D y : I 0 x I F x = F x
38 18 33 34 34 35 36 37 ofrfval I V F D y : I 0 y f F x I y x F x
39 32 38 bitr4d I V F D y : I 0 x I y x 0 F x y f F
40 1 psrbagleclOLD I V F D y : I 0 y f F y D
41 40 3exp2 I V F D y : I 0 y f F y D
42 41 imp31 I V F D y : I 0 y f F y D
43 42 pm4.71rd I V F D y : I 0 y f F y D y f F
44 21 39 43 3bitrrd I V F D y : I 0 y D y f F y x I 0 F x
45 44 ex I V F D y : I 0 y D y f F y x I 0 F x
46 7 16 45 pm5.21ndd I V F D y D y f F y x I 0 F x
47 46 abbi1dv I V F D y | y D y f F = x I 0 F x
48 2 47 eqtrid I V F D y D | y f F = x I 0 F x
49 simpr I V F D F D
50 cnveq f = F f -1 = F -1
51 50 imaeq1d f = F f -1 = F -1
52 51 eleq1d f = F f -1 Fin F -1 Fin
53 52 1 elrab2 F D F 0 I F -1 Fin
54 49 53 sylib I V F D F 0 I F -1 Fin
55 54 simprd I V F D F -1 Fin
56 fzfid I V F D x I 0 F x Fin
57 simpl I V F D I V
58 57 26 jca I V F D I V F : I 0
59 frnnn0supp I V F : I 0 F supp 0 = F -1
60 eqimss F supp 0 = F -1 F supp 0 F -1
61 58 59 60 3syl I V F D F supp 0 F -1
62 c0ex 0 V
63 62 a1i I V F D 0 V
64 26 61 57 63 suppssr I V F D x I F -1 F x = 0
65 64 oveq2d I V F D x I F -1 0 F x = 0 0
66 fz0sn 0 0 = 0
67 65 66 eqtrdi I V F D x I F -1 0 F x = 0
68 eqimss 0 F x = 0 0 F x 0
69 67 68 syl I V F D x I F -1 0 F x 0
70 55 56 69 ixpfi2 I V F D x I 0 F x Fin
71 48 70 eqeltrd I V F D y D | y f F Fin