Metamath Proof Explorer


Theorem tz7.48lem

Description: A way of showing an ordinal function is one-to-one. (Contributed by NM, 9-Feb-1997)

Ref Expression
Hypothesis tz7.48.1 F Fn On
Assertion tz7.48lem A On x A y x ¬ F x = F y Fun F A -1

Proof

Step Hyp Ref Expression
1 tz7.48.1 F Fn On
2 r2al x A y x ¬ F x = F y x y x A y x ¬ F x = F y
3 simpl x A y A x A
4 3 anim1i x A y A y x x A y x
5 4 imim1i x A y x ¬ F x = F y x A y A y x ¬ F x = F y
6 5 expd x A y x ¬ F x = F y x A y A y x ¬ F x = F y
7 6 2alimi x y x A y x ¬ F x = F y x y x A y A y x ¬ F x = F y
8 2 7 sylbi x A y x ¬ F x = F y x y x A y A y x ¬ F x = F y
9 r2al x A y A y x ¬ F x = F y x y x A y A y x ¬ F x = F y
10 8 9 sylibr x A y x ¬ F x = F y x A y A y x ¬ F x = F y
11 elequ1 y = w y x w x
12 fveq2 y = w F y = F w
13 12 eqeq2d y = w F x = F y F x = F w
14 13 notbid y = w ¬ F x = F y ¬ F x = F w
15 11 14 imbi12d y = w y x ¬ F x = F y w x ¬ F x = F w
16 15 cbvralvw y A y x ¬ F x = F y w A w x ¬ F x = F w
17 16 ralbii x A y A y x ¬ F x = F y x A w A w x ¬ F x = F w
18 elequ2 x = z w x w z
19 fveqeq2 x = z F x = F w F z = F w
20 19 notbid x = z ¬ F x = F w ¬ F z = F w
21 18 20 imbi12d x = z w x ¬ F x = F w w z ¬ F z = F w
22 21 ralbidv x = z w A w x ¬ F x = F w w A w z ¬ F z = F w
23 22 cbvralvw x A w A w x ¬ F x = F w z A w A w z ¬ F z = F w
24 elequ1 w = x w z x z
25 fveq2 w = x F w = F x
26 25 eqeq2d w = x F z = F w F z = F x
27 26 notbid w = x ¬ F z = F w ¬ F z = F x
28 24 27 imbi12d w = x w z ¬ F z = F w x z ¬ F z = F x
29 28 cbvralvw w A w z ¬ F z = F w x A x z ¬ F z = F x
30 29 ralbii z A w A w z ¬ F z = F w z A x A x z ¬ F z = F x
31 elequ2 z = y x z x y
32 fveqeq2 z = y F z = F x F y = F x
33 32 notbid z = y ¬ F z = F x ¬ F y = F x
34 31 33 imbi12d z = y x z ¬ F z = F x x y ¬ F y = F x
35 34 ralbidv z = y x A x z ¬ F z = F x x A x y ¬ F y = F x
36 35 cbvralvw z A x A x z ¬ F z = F x y A x A x y ¬ F y = F x
37 30 36 bitri z A w A w z ¬ F z = F w y A x A x y ¬ F y = F x
38 17 23 37 3bitri x A y A y x ¬ F x = F y y A x A x y ¬ F y = F x
39 ralcom2w y A x A x y ¬ F y = F x x A y A x y ¬ F y = F x
40 38 39 sylbi x A y A y x ¬ F x = F y x A y A x y ¬ F y = F x
41 40 ancri x A y A y x ¬ F x = F y x A y A x y ¬ F y = F x x A y A y x ¬ F x = F y
42 r19.26-2 x A y A x y ¬ F y = F x y x ¬ F x = F y x A y A x y ¬ F y = F x x A y A y x ¬ F x = F y
43 41 42 sylibr x A y A y x ¬ F x = F y x A y A x y ¬ F y = F x y x ¬ F x = F y
44 10 43 syl x A y x ¬ F x = F y x A y A x y ¬ F y = F x y x ¬ F x = F y
45 fvres x A F A x = F x
46 fvres y A F A y = F y
47 45 46 eqeqan12d x A y A F A x = F A y F x = F y
48 47 ad2antrl A On x A y A x y ¬ F y = F x y x ¬ F x = F y F A x = F A y F x = F y
49 ssel A On x A x On
50 ssel A On y A y On
51 49 50 anim12d A On x A y A x On y On
52 pm3.48 x y ¬ F y = F x y x ¬ F x = F y x y y x ¬ F y = F x ¬ F x = F y
53 oridm ¬ F x = F y ¬ F x = F y ¬ F x = F y
54 eqcom F x = F y F y = F x
55 54 notbii ¬ F x = F y ¬ F y = F x
56 55 orbi1i ¬ F x = F y ¬ F x = F y ¬ F y = F x ¬ F x = F y
57 53 56 bitr3i ¬ F x = F y ¬ F y = F x ¬ F x = F y
58 52 57 syl6ibr x y ¬ F y = F x y x ¬ F x = F y x y y x ¬ F x = F y
59 58 con2d x y ¬ F y = F x y x ¬ F x = F y F x = F y ¬ x y y x
60 eloni x On Ord x
61 eloni y On Ord y
62 ordtri3 Ord x Ord y x = y ¬ x y y x
63 62 biimprd Ord x Ord y ¬ x y y x x = y
64 60 61 63 syl2an x On y On ¬ x y y x x = y
65 59 64 syl9r x On y On x y ¬ F y = F x y x ¬ F x = F y F x = F y x = y
66 51 65 syl6 A On x A y A x y ¬ F y = F x y x ¬ F x = F y F x = F y x = y
67 66 imp32 A On x A y A x y ¬ F y = F x y x ¬ F x = F y F x = F y x = y
68 48 67 sylbid A On x A y A x y ¬ F y = F x y x ¬ F x = F y F A x = F A y x = y
69 68 exp32 A On x A y A x y ¬ F y = F x y x ¬ F x = F y F A x = F A y x = y
70 69 a2d A On x A y A x y ¬ F y = F x y x ¬ F x = F y x A y A F A x = F A y x = y
71 70 2alimdv A On x y x A y A x y ¬ F y = F x y x ¬ F x = F y x y x A y A F A x = F A y x = y
72 r2al x A y A x y ¬ F y = F x y x ¬ F x = F y x y x A y A x y ¬ F y = F x y x ¬ F x = F y
73 r2al x A y A F A x = F A y x = y x y x A y A F A x = F A y x = y
74 71 72 73 3imtr4g A On x A y A x y ¬ F y = F x y x ¬ F x = F y x A y A F A x = F A y x = y
75 44 74 syl5 A On x A y x ¬ F x = F y x A y A F A x = F A y x = y
76 75 imdistani A On x A y x ¬ F x = F y A On x A y A F A x = F A y x = y
77 fnssres F Fn On A On F A Fn A
78 1 77 mpan A On F A Fn A
79 dffn2 F A Fn A F A : A V
80 dff13 F A : A 1-1 V F A : A V x A y A F A x = F A y x = y
81 df-f1 F A : A 1-1 V F A : A V Fun F A -1
82 80 81 bitr3i F A : A V x A y A F A x = F A y x = y F A : A V Fun F A -1
83 82 simprbi F A : A V x A y A F A x = F A y x = y Fun F A -1
84 79 83 sylanb F A Fn A x A y A F A x = F A y x = y Fun F A -1
85 78 84 sylan A On x A y A F A x = F A y x = y Fun F A -1
86 76 85 syl A On x A y x ¬ F x = F y Fun F A -1