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 ralcom y A x A x y ¬ F y = F x x A y A x y ¬ F y = F x
40 39 biimpi y A x A x y ¬ F y = F x x A y A x y ¬ F y = F x
41 38 40 sylbi x A y A y x ¬ F x = F y x A y A x y ¬ F y = F x
42 41 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
43 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
44 42 43 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
45 10 44 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
46 fvres x A F A x = F x
47 fvres y A F A y = F y
48 46 47 eqeqan12d x A y A F A x = F A y F x = F y
49 48 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
50 ssel A On x A x On
51 ssel A On y A y On
52 50 51 anim12d A On x A y A x On y On
53 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
54 oridm ¬ F x = F y ¬ F x = F y ¬ F x = F y
55 eqcom F x = F y F y = F x
56 55 notbii ¬ F x = F y ¬ F y = F x
57 56 orbi1i ¬ F x = F y ¬ F x = F y ¬ F y = F x ¬ F x = F y
58 54 57 bitr3i ¬ F x = F y ¬ F y = F x ¬ F x = F y
59 53 58 syl6ibr x y ¬ F y = F x y x ¬ F x = F y x y y x ¬ F x = F y
60 59 con2d x y ¬ F y = F x y x ¬ F x = F y F x = F y ¬ x y y x
61 eloni x On Ord x
62 eloni y On Ord y
63 ordtri3 Ord x Ord y x = y ¬ x y y x
64 63 biimprd Ord x Ord y ¬ x y y x x = y
65 61 62 64 syl2an x On y On ¬ x y y x x = y
66 60 65 syl9r x On y On x y ¬ F y = F x y x ¬ F x = F y F x = F y x = y
67 52 66 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
68 67 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
69 49 68 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
70 69 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
71 70 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
72 71 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
73 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
74 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
75 72 73 74 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
76 45 75 syl5 A On x A y x ¬ F x = F y x A y A F A x = F A y x = y
77 76 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
78 fnssres F Fn On A On F A Fn A
79 1 78 mpan A On F A Fn A
80 dffn2 F A Fn A F A : A V
81 dff13 F A : A 1-1 V F A : A V x A y A F A x = F A y x = y
82 df-f1 F A : A 1-1 V F A : A V Fun F A -1
83 81 82 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
84 83 simprbi F A : A V x A y A F A x = F A y x = y Fun F A -1
85 80 84 sylanb F A Fn A x A y A F A x = F A y x = y Fun F A -1
86 79 85 sylan A On x A y A F A x = F A y x = y Fun F A -1
87 77 86 syl A On x A y x ¬ F x = F y Fun F A -1