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

Theorem mo23 2055
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 1516 . . . . 5  |-  F/ y  x  =  z
31, 2nfim 1560 . . . 4  |-  F/ y ( ph  ->  x  =  z )
43nfal 1564 . . 3  |-  F/ y A. x ( ph  ->  x  =  z )
5 nfv 1516 . . 3  |-  F/ z A. x ( ph  ->  x  =  y )
6 equequ2 1701 . . . . 5  |-  ( z  =  y  ->  (
x  =  z  <->  x  =  y ) )
76imbi2d 229 . . . 4  |-  ( z  =  y  ->  (
( ph  ->  x  =  z )  <->  ( ph  ->  x  =  y ) ) )
87albidv 1812 . . 3  |-  ( z  =  y  ->  ( A. x ( ph  ->  x  =  z )  <->  A. x
( ph  ->  x  =  y ) ) )
94, 5, 8cbvex 1744 . 2  |-  ( E. z A. x (
ph  ->  x  =  z )  <->  E. y A. x
( ph  ->  x  =  y ) )
10 nfs1v 1927 . . . . . . . 8  |-  F/ x [ y  /  x ] ph
11 nfv 1516 . . . . . . . 8  |-  F/ x  y  =  z
1210, 11nfim 1560 . . . . . . 7  |-  F/ x
( [ y  /  x ] ph  ->  y  =  z )
13 sbequ2 1757 . . . . . . . 8  |-  ( x  =  y  ->  ( [ y  /  x ] ph  ->  ph ) )
14 ax-8 1492 . . . . . . . 8  |-  ( x  =  y  ->  (
x  =  z  -> 
y  =  z ) )
1513, 14imim12d 74 . . . . . . 7  |-  ( x  =  y  ->  (
( ph  ->  x  =  z )  ->  ( [ y  /  x ] ph  ->  y  =  z ) ) )
163, 12, 15cbv3 1730 . . . . . 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 1507 . . . . . 6  |-  ( (
ph  ->  x  =  z )  ->  A. y
( ph  ->  x  =  z ) )
1912nfri 1507 . . . . . 6  |-  ( ( [ y  /  x ] ph  ->  y  =  z )  ->  A. x
( [ y  /  x ] ph  ->  y  =  z ) )
2018, 19aaanh 1574 . . . . 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 1699 . . . . . 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 1444 . . . 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 1586 . 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 1341   F/wnf 1448   E.wex 1480   [wsb 1750
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 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-11 1494  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523
This theorem depends on definitions:  df-bi 116  df-nf 1449  df-sb 1751
This theorem is referenced by:  modc  2057  eu2  2058  eu3h  2059
  Copyright terms: Public domain W3C validator