Metamath Proof Explorer


Theorem mo4

Description: At-most-one quantifier expressed using implicit substitution. This theorem is also a direct consequence of mo4f , but this proof is based on fewer axioms.

By the way, swapping x , y and ph , ps leads to an expression for E* y ps , which is equivalent to E* x ph (is a proof line), so the right hand side is a rare instance of an expression where swapping the quantifiers can be done without ax-11 . (Contributed by NM, 26-Jul-1995) Reduce axiom usage. (Revised by Wolf Lammen, 18-Oct-2023)

Ref Expression
Hypothesis mo4.1 ⊢ x = y → φ ↔ ψ
Assertion mo4 ⊢ ∃* x φ ↔ ∀ x ∀ y φ ∧ ψ → x = y

Proof

Step Hyp Ref Expression
1 mo4.1 ⊢ x = y → φ ↔ ψ
2 dfmo ⊢ ∃* x φ ↔ ∃ z ∀ x φ → x = z
3 equequ1 ⊢ x = y → x = z ↔ y = z
4 1 3 imbi12d ⊢ x = y → φ → x = z ↔ ψ → y = z
5 4 cbvalvw ⊢ ∀ x φ → x = z ↔ ∀ y ψ → y = z
6 5 biimpi ⊢ ∀ x φ → x = z → ∀ y ψ → y = z
7 pm2.27 ⊢ φ → φ → x = z → x = z
8 pm2.27 ⊢ ψ → ψ → y = z → y = z
9 7 8 im2anan9 ⊢ φ ∧ ψ → φ → x = z ∧ ψ → y = z → x = z ∧ y = z
10 equtr2 ⊢ x = z ∧ y = z → x = y
11 9 10 syl6com ⊢ φ → x = z ∧ ψ → y = z → φ ∧ ψ → x = y
12 11 ex ⊢ φ → x = z → ψ → y = z → φ ∧ ψ → x = y
13 12 alimdv ⊢ φ → x = z → ∀ y ψ → y = z → ∀ y φ ∧ ψ → x = y
14 13 com12 ⊢ ∀ y ψ → y = z → φ → x = z → ∀ y φ ∧ ψ → x = y
15 14 alimdv ⊢ ∀ y ψ → y = z → ∀ x φ → x = z → ∀ x ∀ y φ ∧ ψ → x = y
16 6 15 mpcom ⊢ ∀ x φ → x = z → ∀ x ∀ y φ ∧ ψ → x = y
17 16 exlimiv ⊢ ∃ z ∀ x φ → x = z → ∀ x ∀ y φ ∧ ψ → x = y
18 2 17 sylbi ⊢ ∃* x φ → ∀ x ∀ y φ ∧ ψ → x = y
19 1 cbvexvw ⊢ ∃ x φ ↔ ∃ y ψ
20 19 biimpri ⊢ ∃ y ψ → ∃ x φ
21 ax6evr ⊢ ∃ z x = z
22 pm3.2 ⊢ φ → ψ → φ ∧ ψ
23 22 imim1d ⊢ φ → φ ∧ ψ → x = y → ψ → x = y
24 ax7 ⊢ x = y → x = z → y = z
25 23 24 syl8 ⊢ φ → φ ∧ ψ → x = y → ψ → x = z → y = z
26 25 com4r ⊢ x = z → φ → φ ∧ ψ → x = y → ψ → y = z
27 26 impcom ⊢ φ ∧ x = z → φ ∧ ψ → x = y → ψ → y = z
28 27 alimdv ⊢ φ ∧ x = z → ∀ y φ ∧ ψ → x = y → ∀ y ψ → y = z
29 28 impancom ⊢ φ ∧ ∀ y φ ∧ ψ → x = y → x = z → ∀ y ψ → y = z
30 29 eximdv ⊢ φ ∧ ∀ y φ ∧ ψ → x = y → ∃ z x = z → ∃ z ∀ y ψ → y = z
31 21 30 mpi ⊢ φ ∧ ∀ y φ ∧ ψ → x = y → ∃ z ∀ y ψ → y = z
32 dfmo ⊢ ∃* y ψ ↔ ∃ z ∀ y ψ → y = z
33 31 32 sylibr ⊢ φ ∧ ∀ y φ ∧ ψ → x = y → ∃* y ψ
34 33 expcom ⊢ ∀ y φ ∧ ψ → x = y → φ → ∃* y ψ
35 34 aleximi ⊢ ∀ x ∀ y φ ∧ ψ → x = y → ∃ x φ → ∃ x ∃* y ψ
36 ax5e ⊢ ∃ x ∃* y ψ → ∃* y ψ
37 20 35 36 syl56 ⊢ ∀ x ∀ y φ ∧ ψ → x = y → ∃ y ψ → ∃* y ψ
38 5 exbii ⊢ ∃ z ∀ x φ → x = z ↔ ∃ z ∀ y ψ → y = z
39 38 2 32 3bitr4i ⊢ ∃* x φ ↔ ∃* y ψ
40 moabs ⊢ ∃* y ψ ↔ ∃ y ψ → ∃* y ψ
41 39 40 bitri ⊢ ∃* x φ ↔ ∃ y ψ → ∃* y ψ
42 37 41 sylibr ⊢ ∀ x ∀ y φ ∧ ψ → x = y → ∃* x φ
43 18 42 impbii ⊢ ∃* x φ ↔ ∀ x ∀ y φ ∧ ψ → x = y