Metamath Proof Explorer


Theorem reuf1odnf

Description: There is exactly one element in each of two isomorphic sets. Variant of reuf1od with no distinct variable condition for ch . (Contributed by AV, 19-Mar-2023)

Ref Expression
Hypotheses reuf1odnf.f ⊢ φ → F : C ⟶ 1-1 onto B
reuf1odnf.x ⊢ φ ∧ x = F ⁡ y → ψ ↔ χ
reuf1odnf.z ⊢ x = z → ψ ↔ θ
reuf1odnf.n ⊢ Ⅎ x χ
Assertion reuf1odnf ⊢ φ → ∃! x ∈ B ψ ↔ ∃! y ∈ C χ

Proof

Step Hyp Ref Expression
1 reuf1odnf.f ⊢ φ → F : C ⟶ 1-1 onto B
2 reuf1odnf.x ⊢ φ ∧ x = F ⁡ y → ψ ↔ χ
3 reuf1odnf.z ⊢ x = z → ψ ↔ θ
4 reuf1odnf.n ⊢ Ⅎ x χ
5 f1of ⊢ F : C ⟶ 1-1 onto B → F : C ⟶ B
6 1 5 syl ⊢ φ → F : C ⟶ B
7 6 ffvelcdmda ⊢ φ ∧ y ∈ C → F ⁡ y ∈ B
8 f1ofveu ⊢ F : C ⟶ 1-1 onto B ∧ x ∈ B → ∃! y ∈ C F ⁡ y = x
9 eqcom ⊢ x = F ⁡ y ↔ F ⁡ y = x
10 9 reubii ⊢ ∃! y ∈ C x = F ⁡ y ↔ ∃! y ∈ C F ⁡ y = x
11 8 10 sylibr ⊢ F : C ⟶ 1-1 onto B ∧ x ∈ B → ∃! y ∈ C x = F ⁡ y
12 1 11 sylan ⊢ φ ∧ x ∈ B → ∃! y ∈ C x = F ⁡ y
13 sbceq1a ⊢ x = F ⁡ y → ψ ↔ [˙ F ⁡ y / x]˙ ψ
14 13 adantl ⊢ φ ∧ x = F ⁡ y → ψ ↔ [˙ F ⁡ y / x]˙ ψ
15 3 cbvsbcvw ⊢ [˙ F ⁡ y / x]˙ ψ ↔ [˙ F ⁡ y / z]˙ θ
16 14 15 bitrdi ⊢ φ ∧ x = F ⁡ y → ψ ↔ [˙ F ⁡ y / z]˙ θ
17 7 12 16 reuxfr1d ⊢ φ → ∃! x ∈ B ψ ↔ ∃! y ∈ C [˙ F ⁡ y / z]˙ θ
18 15 a1i ⊢ φ → [˙ F ⁡ y / x]˙ ψ ↔ [˙ F ⁡ y / z]˙ θ
19 18 bicomd ⊢ φ → [˙ F ⁡ y / z]˙ θ ↔ [˙ F ⁡ y / x]˙ ψ
20 19 reubidv ⊢ φ → ∃! y ∈ C [˙ F ⁡ y / z]˙ θ ↔ ∃! y ∈ C [˙ F ⁡ y / x]˙ ψ
21 fvexd ⊢ φ → F ⁡ y ∈ V
22 nfv ⊢ Ⅎ x φ
23 4 a1i ⊢ φ → Ⅎ x χ
24 21 2 22 23 sbciedf ⊢ φ → [˙ F ⁡ y / x]˙ ψ ↔ χ
25 24 reubidv ⊢ φ → ∃! y ∈ C [˙ F ⁡ y / x]˙ ψ ↔ ∃! y ∈ C χ
26 17 20 25 3bitrd ⊢ φ → ∃! x ∈ B ψ ↔ ∃! y ∈ C χ