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

Theorem equsexd 1617
Description: Deduction form of equsex 1616. (Contributed by Jim Kingdon, 29-Dec-2017.)
Hypotheses
Ref Expression
equsexd.1  |-  ( ph  ->  A. x ph )
equsexd.2  |-  ( ph  ->  ( ch  ->  A. x ch ) )
equsexd.3  |-  ( ph  ->  ( x  =  y  ->  ( ps  <->  ch )
) )
Assertion
Ref Expression
equsexd  |-  ( ph  ->  ( E. x ( x  =  y  /\  ps )  <->  ch ) )

Proof of Theorem equsexd
StepHypRef Expression
1 equsexd.1 . . 3  |-  ( ph  ->  A. x ph )
2 equsexd.2 . . 3  |-  ( ph  ->  ( ch  ->  A. x ch ) )
3 equsexd.3 . . . 4  |-  ( ph  ->  ( x  =  y  ->  ( ps  <->  ch )
) )
4 bi1 111 . . . . 5  |-  ( ( ps  <->  ch )  ->  ( ps  ->  ch ) )
54imim2i 12 . . . 4  |-  ( ( x  =  y  -> 
( ps  <->  ch )
)  ->  ( x  =  y  ->  ( ps 
->  ch ) ) )
6 pm3.31 249 . . . 4  |-  ( ( x  =  y  -> 
( ps  ->  ch ) )  ->  (
( x  =  y  /\  ps )  ->  ch ) )
73, 5, 63syl 17 . . 3  |-  ( ph  ->  ( ( x  =  y  /\  ps )  ->  ch ) )
81, 2, 7exlimd2 1486 . 2  |-  ( ph  ->  ( E. x ( x  =  y  /\  ps )  ->  ch )
)
9 a9e 1586 . . . 4  |-  E. x  x  =  y
101a1i 9 . . . . . . . . 9  |-  ( ph  ->  ( ph  ->  A. x ph ) )
1110, 2jca 290 . . . . . . . 8  |-  ( ph  ->  ( ( ph  ->  A. x ph )  /\  ( ch  ->  A. x ch ) ) )
12 prth 326 . . . . . . . 8  |-  ( ( ( ph  ->  A. x ph )  /\  ( ch  ->  A. x ch )
)  ->  ( ( ph  /\  ch )  -> 
( A. x ph  /\ 
A. x ch )
) )
1311, 12syl 14 . . . . . . 7  |-  ( ph  ->  ( ( ph  /\  ch )  ->  ( A. x ph  /\  A. x ch ) ) )
14 19.26 1370 . . . . . . 7  |-  ( A. x ( ph  /\  ch )  <->  ( A. x ph  /\  A. x ch ) )
1513, 14syl6ibr 151 . . . . . 6  |-  ( ph  ->  ( ( ph  /\  ch )  ->  A. x
( ph  /\  ch )
) )
1615anabsi5 513 . . . . 5  |-  ( (
ph  /\  ch )  ->  A. x ( ph  /\ 
ch ) )
17 idd 21 . . . . . . . 8  |-  ( ch 
->  ( x  =  y  ->  x  =  y ) )
1817a1i 9 . . . . . . 7  |-  ( ph  ->  ( ch  ->  (
x  =  y  ->  x  =  y )
) )
1918imp 115 . . . . . 6  |-  ( (
ph  /\  ch )  ->  ( x  =  y  ->  x  =  y ) )
20 bi2 121 . . . . . . . . 9  |-  ( ( ps  <->  ch )  ->  ( ch  ->  ps ) )
2120imim2i 12 . . . . . . . 8  |-  ( ( x  =  y  -> 
( ps  <->  ch )
)  ->  ( x  =  y  ->  ( ch 
->  ps ) ) )
22 pm2.04 76 . . . . . . . 8  |-  ( ( x  =  y  -> 
( ch  ->  ps ) )  ->  ( ch  ->  ( x  =  y  ->  ps )
) )
233, 21, 223syl 17 . . . . . . 7  |-  ( ph  ->  ( ch  ->  (
x  =  y  ->  ps ) ) )
2423imp 115 . . . . . 6  |-  ( (
ph  /\  ch )  ->  ( x  =  y  ->  ps ) )
2519, 24jcad 291 . . . . 5  |-  ( (
ph  /\  ch )  ->  ( x  =  y  ->  ( x  =  y  /\  ps )
) )
2616, 25eximdh 1502 . . . 4  |-  ( (
ph  /\  ch )  ->  ( E. x  x  =  y  ->  E. x
( x  =  y  /\  ps ) ) )
279, 26mpi 15 . . 3  |-  ( (
ph  /\  ch )  ->  E. x ( x  =  y  /\  ps ) )
2827ex 108 . 2  |-  ( ph  ->  ( ch  ->  E. x
( x  =  y  /\  ps ) ) )
298, 28impbid 120 1  |-  ( ph  ->  ( E. x ( x  =  y  /\  ps )  <->  ch ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 97    <-> wb 98   A.wal 1241    = wceq 1243   E.wex 1381
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-gen 1338  ax-ie1 1382  ax-ie2 1383  ax-4 1400  ax-i9 1423  ax-ial 1427
This theorem depends on definitions:  df-bi 110
This theorem is referenced by:  cbvexdh  1801
  Copyright terms: Public domain W3C validator