Metamath Proof Explorer


Theorem enfin1ai

Description: Ia-finiteness is a cardinal property. (Contributed by Mario Carneiro, 18-May-2015)

Ref Expression
Assertion enfin1ai ⊢ A ≈ B → A ∈ FinIa → B ∈ FinIa

Proof

Step Hyp Ref Expression
1 ensym ⊢ A ≈ B → B ≈ A
2 bren ⊢ B ≈ A ↔ ∃ f f : B ⟶ 1-1 onto A
3 1 2 sylib ⊢ A ≈ B → ∃ f f : B ⟶ 1-1 onto A
4 elpwi ⊢ x ∈ 𝒫 B → x ⊆ B
5 simplr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → A ∈ FinIa
6 imassrn ⊢ f x ⊆ ran ⁡ f
7 f1of ⊢ f : B ⟶ 1-1 onto A → f : B ⟶ A
8 7 ad2antrr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f : B ⟶ A
9 8 frnd ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → ran ⁡ f ⊆ A
10 6 9 sstrid ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f x ⊆ A
11 fin1ai ⊢ A ∈ FinIa ∧ f x ⊆ A → f x ∈ Fin ∨ A ∖ f x ∈ Fin
12 5 10 11 syl2anc ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f x ∈ Fin ∨ A ∖ f x ∈ Fin
13 f1of1 ⊢ f : B ⟶ 1-1 onto A → f : B ⟶ 1-1 A
14 13 ad2antrr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f : B ⟶ 1-1 A
15 simpr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → x ⊆ B
16 vex ⊢ x ∈ V
17 16 a1i ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → x ∈ V
18 f1imaeng ⊢ f : B ⟶ 1-1 A ∧ x ⊆ B ∧ x ∈ V → f x ≈ x
19 14 15 17 18 syl3anc ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f x ≈ x
20 enfi ⊢ f x ≈ x → f x ∈ Fin ↔ x ∈ Fin
21 19 20 syl ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f x ∈ Fin ↔ x ∈ Fin
22 df-f1 ⊢ f : B ⟶ 1-1 A ↔ f : B ⟶ A ∧ Fun ⁡ f -1
23 22 simprbi ⊢ f : B ⟶ 1-1 A → Fun ⁡ f -1
24 imadif ⊢ Fun ⁡ f -1 → f B ∖ x = f B ∖ f x
25 14 23 24 3syl ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f B ∖ x = f B ∖ f x
26 f1ofo ⊢ f : B ⟶ 1-1 onto A → f : B ⟶ onto A
27 foima ⊢ f : B ⟶ onto A → f B = A
28 26 27 syl ⊢ f : B ⟶ 1-1 onto A → f B = A
29 28 ad2antrr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f B = A
30 29 difeq1d ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f B ∖ f x = A ∖ f x
31 25 30 eqtrd ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f B ∖ x = A ∖ f x
32 difssd ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → B ∖ x ⊆ B
33 vex ⊢ f ∈ V
34 7 adantr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa → f : B ⟶ A
35 dmfex ⊢ f ∈ V ∧ f : B ⟶ A → B ∈ V
36 33 34 35 sylancr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa → B ∈ V
37 36 adantr ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → B ∈ V
38 37 difexd ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → B ∖ x ∈ V
39 f1imaeng ⊢ f : B ⟶ 1-1 A ∧ B ∖ x ⊆ B ∧ B ∖ x ∈ V → f B ∖ x ≈ B ∖ x
40 14 32 38 39 syl3anc ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f B ∖ x ≈ B ∖ x
41 31 40 eqbrtrrd ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → A ∖ f x ≈ B ∖ x
42 enfi ⊢ A ∖ f x ≈ B ∖ x → A ∖ f x ∈ Fin ↔ B ∖ x ∈ Fin
43 41 42 syl ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → A ∖ f x ∈ Fin ↔ B ∖ x ∈ Fin
44 21 43 orbi12d ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → f x ∈ Fin ∨ A ∖ f x ∈ Fin ↔ x ∈ Fin ∨ B ∖ x ∈ Fin
45 12 44 mpbid ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ⊆ B → x ∈ Fin ∨ B ∖ x ∈ Fin
46 4 45 sylan2 ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa ∧ x ∈ 𝒫 B → x ∈ Fin ∨ B ∖ x ∈ Fin
47 46 ralrimiva ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa → ∀ x ∈ 𝒫 B x ∈ Fin ∨ B ∖ x ∈ Fin
48 isfin1a ⊢ B ∈ V → B ∈ FinIa ↔ ∀ x ∈ 𝒫 B x ∈ Fin ∨ B ∖ x ∈ Fin
49 36 48 syl ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa → B ∈ FinIa ↔ ∀ x ∈ 𝒫 B x ∈ Fin ∨ B ∖ x ∈ Fin
50 47 49 mpbird ⊢ f : B ⟶ 1-1 onto A ∧ A ∈ FinIa → B ∈ FinIa
51 50 ex ⊢ f : B ⟶ 1-1 onto A → A ∈ FinIa → B ∈ FinIa
52 51 exlimiv ⊢ ∃ f f : B ⟶ 1-1 onto A → A ∈ FinIa → B ∈ FinIa
53 3 52 syl ⊢ A ≈ B → A ∈ FinIa → B ∈ FinIa