ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  mo23 Unicode version

Theorem mo23 2060
Description: An implication between two definitions of "there exists at most one." (Contributed by Jim Kingdon, 25-Jun-2018.)
Hypothesis
Ref Expression
mo23.1  |-  F/ y
ph
Assertion
Ref Expression
mo23  |-  ( E. y A. x (
ph  ->  x  =  y )  ->  A. x A. y ( ( ph  /\ 
[ y  /  x ] ph )  ->  x  =  y ) )
Distinct variable group:    x, y
Allowed substitution hints:    ph( x, y)

Proof of Theorem mo23
Dummy variable  z is distinct from all other variables.
StepHypRef Expression
1 mo23.1 . . . . 5  |-  F/ y
ph
2 nfv 1521 . . . . 5  |-  F/ y  x  =  z
31, 2nfim 1565 . . . 4  |-  F/ y ( ph  ->  x  =  z )
43nfal 1569 . . 3  |-  F/ y A. x ( ph  ->  x  =  z )
5 nfv 1521 . . 3  |-  F/ z A. x ( ph  ->  x  =  y )
6 equequ2 1706 . . . . 5  |-  ( z  =  y  ->  (
x  =  z  <->  x  =  y ) )
76imbi2d 229 . . . 4  |-  ( z  =  y  ->  (
( ph  ->  x  =  z )  <->  ( ph  ->  x  =  y ) ) )
87albidv 1817 . . 3  |-  ( z  =  y  ->  ( A. x ( ph  ->  x  =  z )  <->  A. x
( ph  ->  x  =  y ) ) )
94, 5, 8cbvex 1749 . 2  |-  ( E. z A. x (
ph  ->  x  =  z )  <->  E. y A. x
( ph  ->  x  =  y ) )
10 nfs1v 1932 . . . . . . . 8  |-  F/ x [ y  /  x ] ph
11 nfv 1521 . . . . . . . 8  |-  F/ x  y  =  z
1210, 11nfim 1565 . . . . . . 7  |-  F/ x
( [ y  /  x ] ph  ->  y  =  z )
13 sbequ2 1762 . . . . . . . 8  |-  ( x  =  y  ->  ( [ y  /  x ] ph  ->  ph ) )
14 ax-8 1497 . . . . . . . 8  |-  ( x  =  y  ->  (
x  =  z  -> 
y  =  z ) )
1513, 14imim12d 74 . . . . . . 7  |-  ( x  =  y  ->  (
( ph  ->  x  =  z )  ->  ( [ y  /  x ] ph  ->  y  =  z ) ) )
163, 12, 15cbv3 1735 . . . . . 6  |-  ( A. x ( ph  ->  x  =  z )  ->  A. y ( [ y  /  x ] ph  ->  y  =  z ) )
1716ancli 321 . . . . 5  |-  ( A. x ( ph  ->  x  =  z )  -> 
( A. x (
ph  ->  x  =  z )  /\  A. y
( [ y  /  x ] ph  ->  y  =  z ) ) )
183nfri 1512 . . . . . 6  |-  ( (
ph  ->  x  =  z )  ->  A. y
( ph  ->  x  =  z ) )
1912nfri 1512 . . . . . 6  |-  ( ( [ y  /  x ] ph  ->  y  =  z )  ->  A. x
( [ y  /  x ] ph  ->  y  =  z ) )
2018, 19aaanh 1579 . . . . 5  |-  ( A. x A. y ( (
ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  <->  ( A. x ( ph  ->  x  =  z )  /\  A. y ( [ y  /  x ] ph  ->  y  =  z ) ) )
2117, 20sylibr 133 . . . 4  |-  ( A. x ( ph  ->  x  =  z )  ->  A. x A. y ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) ) )
22 anim12 342 . . . . . 6  |-  ( ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  -> 
( ( ph  /\  [ y  /  x ] ph )  ->  ( x  =  z  /\  y  =  z ) ) )
23 equtr2 1704 . . . . . 6  |-  ( ( x  =  z  /\  y  =  z )  ->  x  =  y )
2422, 23syl6 33 . . . . 5  |-  ( ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  -> 
( ( ph  /\  [ y  /  x ] ph )  ->  x  =  y ) )
25242alimi 1449 . . . 4  |-  ( A. x A. y ( (
ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  ->  A. x A. y ( ( ph  /\ 
[ y  /  x ] ph )  ->  x  =  y ) )
2621, 25syl 14 . . 3  |-  ( A. x ( ph  ->  x  =  z )  ->  A. x A. y ( ( ph  /\  [
y  /  x ] ph )  ->  x  =  y ) )
2726exlimiv 1591 . 2  |-  ( E. z A. x (
ph  ->  x  =  z )  ->  A. x A. y ( ( ph  /\ 
[ y  /  x ] ph )  ->  x  =  y ) )
289, 27sylbir 134 1  |-  ( E. y A. x (
ph  ->  x  =  y )  ->  A. x A. y ( ( ph  /\ 
[ y  /  x ] ph )  ->  x  =  y ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 103   A.wal 1346   F/wnf 1453   E.wex 1485   [wsb 1755
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-5 1440  ax-7 1441  ax-gen 1442  ax-ie1 1486  ax-ie2 1487  ax-8 1497  ax-11 1499  ax-4 1503  ax-17 1519  ax-i9 1523  ax-ial 1527  ax-i5r 1528
This theorem depends on definitions:  df-bi 116  df-nf 1454  df-sb 1756
This theorem is referenced by:  modc  2062  eu2  2063  eu3h  2064
  Copyright terms: Public domain W3C validator