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

Theorem mo23 1941
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 1421 . . . . 5  |-  F/ y  x  =  z
31, 2nfim 1464 . . . 4  |-  F/ y ( ph  ->  x  =  z )
43nfal 1468 . . 3  |-  F/ y A. x ( ph  ->  x  =  z )
5 nfv 1421 . . 3  |-  F/ z A. x ( ph  ->  x  =  y )
6 equequ2 1599 . . . . 5  |-  ( z  =  y  ->  (
x  =  z  <->  x  =  y ) )
76imbi2d 219 . . . 4  |-  ( z  =  y  ->  (
( ph  ->  x  =  z )  <->  ( ph  ->  x  =  y ) ) )
87albidv 1705 . . 3  |-  ( z  =  y  ->  ( A. x ( ph  ->  x  =  z )  <->  A. x
( ph  ->  x  =  y ) ) )
94, 5, 8cbvex 1639 . 2  |-  ( E. z A. x (
ph  ->  x  =  z )  <->  E. y A. x
( ph  ->  x  =  y ) )
10 nfs1v 1815 . . . . . . . 8  |-  F/ x [ y  /  x ] ph
11 nfv 1421 . . . . . . . 8  |-  F/ x  y  =  z
1210, 11nfim 1464 . . . . . . 7  |-  F/ x
( [ y  /  x ] ph  ->  y  =  z )
13 sbequ2 1652 . . . . . . . 8  |-  ( x  =  y  ->  ( [ y  /  x ] ph  ->  ph ) )
14 ax-8 1395 . . . . . . . 8  |-  ( x  =  y  ->  (
x  =  z  -> 
y  =  z ) )
1513, 14imim12d 68 . . . . . . 7  |-  ( x  =  y  ->  (
( ph  ->  x  =  z )  ->  ( [ y  /  x ] ph  ->  y  =  z ) ) )
163, 12, 15cbv3 1630 . . . . . 6  |-  ( A. x ( ph  ->  x  =  z )  ->  A. y ( [ y  /  x ] ph  ->  y  =  z ) )
1716ancli 306 . . . . 5  |-  ( A. x ( ph  ->  x  =  z )  -> 
( A. x (
ph  ->  x  =  z )  /\  A. y
( [ y  /  x ] ph  ->  y  =  z ) ) )
183nfri 1412 . . . . . 6  |-  ( (
ph  ->  x  =  z )  ->  A. y
( ph  ->  x  =  z ) )
1912nfri 1412 . . . . . 6  |-  ( ( [ y  /  x ] ph  ->  y  =  z )  ->  A. x
( [ y  /  x ] ph  ->  y  =  z ) )
2018, 19aaanh 1478 . . . . 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 137 . . . 4  |-  ( A. x ( ph  ->  x  =  z )  ->  A. x A. y ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) ) )
22 prth 326 . . . . . 6  |-  ( ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  -> 
( ( ph  /\  [ y  /  x ] ph )  ->  ( x  =  z  /\  y  =  z ) ) )
23 equtr2 1597 . . . . . 6  |-  ( ( x  =  z  /\  y  =  z )  ->  x  =  y )
2422, 23syl6 29 . . . . 5  |-  ( ( ( ph  ->  x  =  z )  /\  ( [ y  /  x ] ph  ->  y  =  z ) )  -> 
( ( ph  /\  [ y  /  x ] ph )  ->  x  =  y ) )
25242alimi 1345 . . . 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 1489 . 2  |-  ( E. z A. x (
ph  ->  x  =  z )  ->  A. x A. y ( ( ph  /\ 
[ y  /  x ] ph )  ->  x  =  y ) )
289, 27sylbir 125 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 97   A.wal 1241   F/wnf 1349   E.wex 1381   [wsb 1645
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-5 1336  ax-7 1337  ax-gen 1338  ax-ie1 1382  ax-ie2 1383  ax-8 1395  ax-11 1397  ax-4 1400  ax-17 1419  ax-i9 1423  ax-ial 1427  ax-i5r 1428
This theorem depends on definitions:  df-bi 110  df-nf 1350  df-sb 1646
This theorem is referenced by:  modc  1943  eu2  1944  eu3h  1945
  Copyright terms: Public domain W3C validator