Metamath Proof Explorer


Theorem derangenlem

Description: One half of derangen . (Contributed by Mario Carneiro, 22-Jan-2015)

Ref Expression
Hypothesis derang.d ⊢ D = x ∈ Fin ⟼ f | f : x ⟶ 1-1 onto x ∧ ∀ y ∈ x f ⁡ y ≠ y
Assertion derangenlem ⊢ A ≈ B ∧ B ∈ Fin → D ⁡ A ≤ D ⁡ B

Proof

Step Hyp Ref Expression
1 derang.d ⊢ D = x ∈ Fin ⟼ f | f : x ⟶ 1-1 onto x ∧ ∀ y ∈ x f ⁡ y ≠ y
2 bren ⊢ A ≈ B ↔ ∃ s s : A ⟶ 1-1 onto B
3 2 birani ⊢ A ≈ B ∧ B ∈ Fin → ∃ s s : A ⟶ 1-1 onto B
4 deranglem ⊢ B ∈ Fin → f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin
5 4 adantl ⊢ A ≈ B ∧ B ∈ Fin → f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin
6 f1oco ⊢ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A → s ∘ g : A ⟶ 1-1 onto B
7 6 ad2ant2lr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s ∘ g : A ⟶ 1-1 onto B
8 f1ocnv ⊢ s : A ⟶ 1-1 onto B → s -1 : B ⟶ 1-1 onto A
9 8 ad2antlr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s -1 : B ⟶ 1-1 onto A
10 f1oco ⊢ s ∘ g : A ⟶ 1-1 onto B ∧ s -1 : B ⟶ 1-1 onto A → s ∘ g ∘ s -1 : B ⟶ 1-1 onto B
11 7 9 10 syl2anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s ∘ g ∘ s -1 : B ⟶ 1-1 onto B
12 coass ⊢ s ∘ g ∘ s -1 = s ∘ g ∘ s -1
13 12 fveq1i ⊢ s ∘ g ∘ s -1 ⁡ z = s ∘ g ∘ s -1 ⁡ z
14 simprl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → g : A ⟶ 1-1 onto A
15 f1oco ⊢ g : A ⟶ 1-1 onto A ∧ s -1 : B ⟶ 1-1 onto A → g ∘ s -1 : B ⟶ 1-1 onto A
16 14 9 15 syl2anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → g ∘ s -1 : B ⟶ 1-1 onto A
17 f1of ⊢ g ∘ s -1 : B ⟶ 1-1 onto A → g ∘ s -1 : B ⟶ A
18 16 17 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → g ∘ s -1 : B ⟶ A
19 fvco3 ⊢ g ∘ s -1 : B ⟶ A ∧ z ∈ B → s ∘ g ∘ s -1 ⁡ z = s ⁡ g ∘ s -1 ⁡ z
20 18 19 sylan ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s ∘ g ∘ s -1 ⁡ z = s ⁡ g ∘ s -1 ⁡ z
21 13 20 eqtrid ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s ∘ g ∘ s -1 ⁡ z = s ⁡ g ∘ s -1 ⁡ z
22 f1of ⊢ s -1 : B ⟶ 1-1 onto A → s -1 : B ⟶ A
23 9 22 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s -1 : B ⟶ A
24 fvco3 ⊢ s -1 : B ⟶ A ∧ z ∈ B → g ∘ s -1 ⁡ z = g ⁡ s -1 ⁡ z
25 23 24 sylan ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → g ∘ s -1 ⁡ z = g ⁡ s -1 ⁡ z
26 23 ffvelcdmda ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s -1 ⁡ z ∈ A
27 simplrr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → ∀ y ∈ A g ⁡ y ≠ y
28 fveq2 ⊢ y = s -1 ⁡ z → g ⁡ y = g ⁡ s -1 ⁡ z
29 id ⊢ y = s -1 ⁡ z → y = s -1 ⁡ z
30 28 29 neeq12d ⊢ y = s -1 ⁡ z → g ⁡ y ≠ y ↔ g ⁡ s -1 ⁡ z ≠ s -1 ⁡ z
31 30 rspcv ⊢ s -1 ⁡ z ∈ A → ∀ y ∈ A g ⁡ y ≠ y → g ⁡ s -1 ⁡ z ≠ s -1 ⁡ z
32 26 27 31 sylc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → g ⁡ s -1 ⁡ z ≠ s -1 ⁡ z
33 25 32 eqnetrd ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → g ∘ s -1 ⁡ z ≠ s -1 ⁡ z
34 33 necomd ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s -1 ⁡ z ≠ g ∘ s -1 ⁡ z
35 simpllr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s : A ⟶ 1-1 onto B
36 18 ffvelcdmda ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → g ∘ s -1 ⁡ z ∈ A
37 f1ocnvfv ⊢ s : A ⟶ 1-1 onto B ∧ g ∘ s -1 ⁡ z ∈ A → s ⁡ g ∘ s -1 ⁡ z = z → s -1 ⁡ z = g ∘ s -1 ⁡ z
38 35 36 37 syl2anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s ⁡ g ∘ s -1 ⁡ z = z → s -1 ⁡ z = g ∘ s -1 ⁡ z
39 38 necon3d ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s -1 ⁡ z ≠ g ∘ s -1 ⁡ z → s ⁡ g ∘ s -1 ⁡ z ≠ z
40 34 39 mpd ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s ⁡ g ∘ s -1 ⁡ z ≠ z
41 21 40 eqnetrd ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ z ∈ B → s ∘ g ∘ s -1 ⁡ z ≠ z
42 41 ralrimiva ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → ∀ z ∈ B s ∘ g ∘ s -1 ⁡ z ≠ z
43 fveq2 ⊢ z = y → s ∘ g ∘ s -1 ⁡ z = s ∘ g ∘ s -1 ⁡ y
44 id ⊢ z = y → z = y
45 43 44 neeq12d ⊢ z = y → s ∘ g ∘ s -1 ⁡ z ≠ z ↔ s ∘ g ∘ s -1 ⁡ y ≠ y
46 45 cbvralvw ⊢ ∀ z ∈ B s ∘ g ∘ s -1 ⁡ z ≠ z ↔ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
47 42 46 sylib ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
48 11 47 jca ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s ∘ g ∘ s -1 : B ⟶ 1-1 onto B ∧ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
49 48 ex ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B → g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y → s ∘ g ∘ s -1 : B ⟶ 1-1 onto B ∧ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
50 vex ⊢ g ∈ V
51 f1oeq1 ⊢ f = g → f : A ⟶ 1-1 onto A ↔ g : A ⟶ 1-1 onto A
52 fveq1 ⊢ f = g → f ⁡ y = g ⁡ y
53 52 neeq1d ⊢ f = g → f ⁡ y ≠ y ↔ g ⁡ y ≠ y
54 53 ralbidv ⊢ f = g → ∀ y ∈ A f ⁡ y ≠ y ↔ ∀ y ∈ A g ⁡ y ≠ y
55 51 54 anbi12d ⊢ f = g → f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ↔ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y
56 50 55 elab ⊢ g ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ↔ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y
57 vex ⊢ s ∈ V
58 57 50 coex ⊢ s ∘ g ∈ V
59 57 cnvex ⊢ s -1 ∈ V
60 58 59 coex ⊢ s ∘ g ∘ s -1 ∈ V
61 f1oeq1 ⊢ f = s ∘ g ∘ s -1 → f : B ⟶ 1-1 onto B ↔ s ∘ g ∘ s -1 : B ⟶ 1-1 onto B
62 fveq1 ⊢ f = s ∘ g ∘ s -1 → f ⁡ y = s ∘ g ∘ s -1 ⁡ y
63 62 neeq1d ⊢ f = s ∘ g ∘ s -1 → f ⁡ y ≠ y ↔ s ∘ g ∘ s -1 ⁡ y ≠ y
64 63 ralbidv ⊢ f = s ∘ g ∘ s -1 → ∀ y ∈ B f ⁡ y ≠ y ↔ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
65 61 64 anbi12d ⊢ f = s ∘ g ∘ s -1 → f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ↔ s ∘ g ∘ s -1 : B ⟶ 1-1 onto B ∧ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
66 60 65 elab ⊢ s ∘ g ∘ s -1 ∈ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ↔ s ∘ g ∘ s -1 : B ⟶ 1-1 onto B ∧ ∀ y ∈ B s ∘ g ∘ s -1 ⁡ y ≠ y
67 49 56 66 3imtr4g ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B → g ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y → s ∘ g ∘ s -1 ∈ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
68 vex ⊢ h ∈ V
69 f1oeq1 ⊢ f = h → f : A ⟶ 1-1 onto A ↔ h : A ⟶ 1-1 onto A
70 fveq1 ⊢ f = h → f ⁡ y = h ⁡ y
71 70 neeq1d ⊢ f = h → f ⁡ y ≠ y ↔ h ⁡ y ≠ y
72 71 ralbidv ⊢ f = h → ∀ y ∈ A f ⁡ y ≠ y ↔ ∀ y ∈ A h ⁡ y ≠ y
73 69 72 anbi12d ⊢ f = h → f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ↔ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y
74 68 73 elab ⊢ h ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ↔ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y
75 56 74 anbi12i ⊢ g ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ∧ h ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ↔ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y
76 8 ad2antlr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s -1 : B ⟶ 1-1 onto A
77 f1ofo ⊢ s -1 : B ⟶ 1-1 onto A → s -1 : B ⟶ onto A
78 76 77 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s -1 : B ⟶ onto A
79 7 adantrr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g : A ⟶ 1-1 onto B
80 f1ofn ⊢ s ∘ g : A ⟶ 1-1 onto B → s ∘ g Fn A
81 79 80 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g Fn A
82 simplr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s : A ⟶ 1-1 onto B
83 simprrl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → h : A ⟶ 1-1 onto A
84 f1oco ⊢ s : A ⟶ 1-1 onto B ∧ h : A ⟶ 1-1 onto A → s ∘ h : A ⟶ 1-1 onto B
85 82 83 84 syl2anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ h : A ⟶ 1-1 onto B
86 f1ofn ⊢ s ∘ h : A ⟶ 1-1 onto B → s ∘ h Fn A
87 85 86 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ h Fn A
88 cocan2 ⊢ s -1 : B ⟶ onto A ∧ s ∘ g Fn A ∧ s ∘ h Fn A → s ∘ g ∘ s -1 = s ∘ h ∘ s -1 ↔ s ∘ g = s ∘ h
89 78 81 87 88 syl3anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g ∘ s -1 = s ∘ h ∘ s -1 ↔ s ∘ g = s ∘ h
90 f1of1 ⊢ s : A ⟶ 1-1 onto B → s : A ⟶ 1-1 B
91 90 ad2antlr ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s : A ⟶ 1-1 B
92 simprll ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → g : A ⟶ 1-1 onto A
93 f1of ⊢ g : A ⟶ 1-1 onto A → g : A ⟶ A
94 92 93 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → g : A ⟶ A
95 f1of ⊢ h : A ⟶ 1-1 onto A → h : A ⟶ A
96 83 95 syl ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → h : A ⟶ A
97 cocan1 ⊢ s : A ⟶ 1-1 B ∧ g : A ⟶ A ∧ h : A ⟶ A → s ∘ g = s ∘ h ↔ g = h
98 91 94 96 97 syl3anc ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g = s ∘ h ↔ g = h
99 89 98 bitrd ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B ∧ g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g ∘ s -1 = s ∘ h ∘ s -1 ↔ g = h
100 99 ex ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B → g : A ⟶ 1-1 onto A ∧ ∀ y ∈ A g ⁡ y ≠ y ∧ h : A ⟶ 1-1 onto A ∧ ∀ y ∈ A h ⁡ y ≠ y → s ∘ g ∘ s -1 = s ∘ h ∘ s -1 ↔ g = h
101 75 100 biimtrid ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B → g ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ∧ h ∈ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y → s ∘ g ∘ s -1 = s ∘ h ∘ s -1 ↔ g = h
102 67 101 dom2d ⊢ A ≈ B ∧ B ∈ Fin ∧ s : A ⟶ 1-1 onto B → f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
103 102 ex ⊢ A ≈ B ∧ B ∈ Fin → s : A ⟶ 1-1 onto B → f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
104 103 exlimdv ⊢ A ≈ B ∧ B ∈ Fin → ∃ s s : A ⟶ 1-1 onto B → f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
105 3 5 104 mp2d ⊢ A ≈ B ∧ B ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
106 enfii ⊢ B ∈ Fin ∧ A ≈ B → A ∈ Fin
107 106 ancoms ⊢ A ≈ B ∧ B ∈ Fin → A ∈ Fin
108 deranglem ⊢ A ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ∈ Fin
109 107 108 syl ⊢ A ≈ B ∧ B ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ∈ Fin
110 hashdom ⊢ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ∈ Fin ∧ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≤ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ↔ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
111 109 5 110 syl2anc ⊢ A ≈ B ∧ B ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≤ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y ↔ f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≼ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
112 105 111 mpbird ⊢ A ≈ B ∧ B ∈ Fin → f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y ≤ f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
113 1 derangval ⊢ A ∈ Fin → D ⁡ A = f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y
114 107 113 syl ⊢ A ≈ B ∧ B ∈ Fin → D ⁡ A = f | f : A ⟶ 1-1 onto A ∧ ∀ y ∈ A f ⁡ y ≠ y
115 1 derangval ⊢ B ∈ Fin → D ⁡ B = f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
116 115 adantl ⊢ A ≈ B ∧ B ∈ Fin → D ⁡ B = f | f : B ⟶ 1-1 onto B ∧ ∀ y ∈ B f ⁡ y ≠ y
117 112 114 116 3brtr4d ⊢ A ≈ B ∧ B ∈ Fin → D ⁡ A ≤ D ⁡ B