Metamath Proof Explorer


Theorem wl-eujustlem1

Description: Version of cbvexvw with references to ax-6 listed as antecedents. (Contributed by Wolf Lammen, 18-Feb-2026)

Ref Expression
Hypothesis wl-eujustlem1.1 ⊢ x = y → φ ↔ ψ
Assertion wl-eujustlem1 ⊢ ∀ y ∃ x x = y ∧ ∀ x ∃ y x = y → ∃ x φ ↔ ∃ y ψ

Proof

Step Hyp Ref Expression
1 wl-eujustlem1.1 ⊢ x = y → φ ↔ ψ
2 1 notbid ⊢ x = y → ¬ φ ↔ ¬ ψ
3 2 biimpcd ⊢ ¬ φ → x = y → ¬ ψ
4 3 aleximi ⊢ ∀ x ¬ φ → ∃ x x = y → ∃ x ¬ ψ
5 ax5e ⊢ ∃ x ¬ ψ → ¬ ψ
6 4 5 syl6 ⊢ ∀ x ¬ φ → ∃ x x = y → ¬ ψ
7 6 alimdv ⊢ ∀ x ¬ φ → ∀ y ∃ x x = y → ∀ y ¬ ψ
8 7 com12 ⊢ ∀ y ∃ x x = y → ∀ x ¬ φ → ∀ y ¬ ψ
9 2 biimprcd ⊢ ¬ ψ → x = y → ¬ φ
10 9 aleximi ⊢ ∀ y ¬ ψ → ∃ y x = y → ∃ y ¬ φ
11 ax5e ⊢ ∃ y ¬ φ → ¬ φ
12 10 11 syl6 ⊢ ∀ y ¬ ψ → ∃ y x = y → ¬ φ
13 12 alimdv ⊢ ∀ y ¬ ψ → ∀ x ∃ y x = y → ∀ x ¬ φ
14 13 com12 ⊢ ∀ x ∃ y x = y → ∀ y ¬ ψ → ∀ x ¬ φ
15 8 14 anbiim ⊢ ∀ y ∃ x x = y ∧ ∀ x ∃ y x = y → ∀ x ¬ φ ↔ ∀ y ¬ ψ
16 15 notbid ⊢ ∀ y ∃ x x = y ∧ ∀ x ∃ y x = y → ¬ ∀ x ¬ φ ↔ ¬ ∀ y ¬ ψ
17 df-ex ⊢ ∃ x φ ↔ ¬ ∀ x ¬ φ
18 df-ex ⊢ ∃ y ψ ↔ ¬ ∀ y ¬ ψ
19 16 17 18 3bitr4g ⊢ ∀ y ∃ x x = y ∧ ∀ x ∃ y x = y → ∃ x φ ↔ ∃ y ψ