HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
Unicode version

Theorem eu2 1023
Description: An alternate way of defining existential uniqueness. Definition 6.10 of [TakeutiZaring] p. 26.
Hypothesis
Ref Expression
eu2.1 |- (ph -> A.yph)
Assertion
Ref Expression
eu2 |- (E!xph <-> (E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)))
Distinct variable group(s):   x,y

Proof of Theorem eu2
StepHypRef Expression
1 euex 1021 . . 3 |- (E!xph -> E.xph)
2 eu2.1 . . . . 5 |- (ph -> A.yph)
32eumo0 1022 . . . 4 |- (E!xph -> E.yA.x(ph -> x = y))
42mo 1020 . . . 4 |- (E.yA.x(ph -> x = y) <-> A.xA.y((ph /\ [y / x]ph) -> x = y))
53, 4sylib 173 . . 3 |- (E!xph -> A.xA.y((ph /\ [y / x]ph) -> x = y))
61, 5jca 236 . 2 |- (E!xph -> (E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)))
7 19.29r 753 . . . 4 |- ((E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)) -> E.x(ph /\ A.y((ph /\ [y / x]ph) -> x = y)))
8 impexp 276 . . . . . . . . 9 |- (((ph /\ [y / x]ph) -> x = y) <-> (ph -> ([y / x]ph -> x = y)))
98bial 695 . . . . . . . 8 |- (A.y((ph /\ [y / x]ph) -> x = y) <-> A.y(ph -> ([y / x]ph -> x = y)))
10219.21 738 . . . . . . . 8 |- (A.y(ph -> ([y / x]ph -> x = y)) <-> (ph -> A.y([y / x]ph -> x = y)))
119, 10bitr 151 . . . . . . 7 |- (A.y((ph /\ [y / x]ph) -> x = y) <-> (ph -> A.y([y / x]ph -> x = y)))
1211anbi2i 367 . . . . . 6 |- ((ph /\ A.y((ph /\ [y / x]ph) -> x = y)) <-> (ph /\ (ph -> A.y([y / x]ph -> x = y))))
13 abai 366 . . . . . 6 |- ((ph /\ A.y([y / x]ph -> x = y)) <-> (ph /\ (ph -> A.y([y / x]ph -> x = y))))
1412, 13bitr4 154 . . . . 5 |- ((ph /\ A.y((ph /\ [y / x]ph) -> x = y)) <-> (ph /\ A.y([y / x]ph -> x = y)))
1514biex 733 . . . 4 |- (E.x(ph /\ A.y((ph /\ [y / x]ph) -> x = y)) <-> E.x(ph /\ A.y([y / x]ph -> x = y)))
167, 15sylib 173 . . 3 |- ((E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)) -> E.x(ph /\ A.y([y / x]ph -> x = y)))
172eu1 1019 . . 3 |- (E!xph <-> E.x(ph /\ A.y([y / x]ph -> x = y)))
1816, 17sylibr 175 . 2 |- ((E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)) -> E!xph)
196, 18impbi 139 1 |- (E!xph <-> (E.xph /\ A.xA.y((ph /\ [y / x]ph) -> x = y)))
Colors of variables: wff set class
Syntax hints:   -> wi 2   <-> wb 127   /\ wa 196  A.wal 672  E.wex 678   = weq 797  [wsb 852  E!weu 1007
This theorem is referenced by:  eu3 1024  bm1.1 1088  reu2 1338
This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-7 676  ax-gen 677  ax-8 798  ax-9 799  ax-10 800  ax-11 801  ax-12 802  ax-16 922  ax-17 925
This theorem depends on definitions:  df-bi 128  df-or 197  df-an 198  df-ex 679  df-sb 853  df-eu 1009
metamath.org