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

Theorem 2ecoptocl 6791
Description: Implicit substitution of classes for equivalence classes of ordered pairs. (Contributed by NM, 23-Jul-1995.)
Hypotheses
Ref Expression
2ecoptocl.1  |-  S  =  ( ( C  X.  D ) /. R
)
2ecoptocl.2  |-  ( [
<. x ,  y >. ] R  =  A  ->  ( ph  <->  ps )
)
2ecoptocl.3  |-  ( [
<. z ,  w >. ] R  =  B  -> 
( ps  <->  ch )
)
2ecoptocl.4  |-  ( ( ( x  e.  C  /\  y  e.  D
)  /\  ( z  e.  C  /\  w  e.  D ) )  ->  ph )
Assertion
Ref Expression
2ecoptocl  |-  ( ( A  e.  S  /\  B  e.  S )  ->  ch )
Distinct variable groups:    x, y, z, w, A    z, B, w    x, C, y, z, w    x, D, y, z, w    z, S, w    x, R, y, z, w    ps, x, y    ch, z, w
Allowed substitution hints:    ph( x, y, z, w)    ps( z, w)    ch( x, y)    B( x, y)    S( x, y)

Proof of Theorem 2ecoptocl
StepHypRef Expression
1 2ecoptocl.1 . . 3  |-  S  =  ( ( C  X.  D ) /. R
)
2 2ecoptocl.3 . . . 4  |-  ( [
<. z ,  w >. ] R  =  B  -> 
( ps  <->  ch )
)
32imbi2d 230 . . 3  |-  ( [
<. z ,  w >. ] R  =  B  -> 
( ( A  e.  S  ->  ps )  <->  ( A  e.  S  ->  ch ) ) )
4 2ecoptocl.2 . . . . . 6  |-  ( [
<. x ,  y >. ] R  =  A  ->  ( ph  <->  ps )
)
54imbi2d 230 . . . . 5  |-  ( [
<. x ,  y >. ] R  =  A  ->  ( ( ( z  e.  C  /\  w  e.  D )  ->  ph )  <->  ( ( z  e.  C  /\  w  e.  D
)  ->  ps )
) )
6 2ecoptocl.4 . . . . . 6  |-  ( ( ( x  e.  C  /\  y  e.  D
)  /\  ( z  e.  C  /\  w  e.  D ) )  ->  ph )
76ex 115 . . . . 5  |-  ( ( x  e.  C  /\  y  e.  D )  ->  ( ( z  e.  C  /\  w  e.  D )  ->  ph )
)
81, 5, 7ecoptocl 6790 . . . 4  |-  ( A  e.  S  ->  (
( z  e.  C  /\  w  e.  D
)  ->  ps )
)
98com12 30 . . 3  |-  ( ( z  e.  C  /\  w  e.  D )  ->  ( A  e.  S  ->  ps ) )
101, 3, 9ecoptocl 6790 . 2  |-  ( B  e.  S  ->  ( A  e.  S  ->  ch ) )
1110impcom 125 1  |-  ( ( A  e.  S  /\  B  e.  S )  ->  ch )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    <-> wb 105    = wceq 1397    e. wcel 2202   <.cop 3672    X. cxp 4723   [cec 6699   /.cqs 6700
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-14 2205  ax-ext 2213  ax-sep 4207  ax-pow 4264  ax-pr 4299
This theorem depends on definitions:  df-bi 117  df-3an 1006  df-tru 1400  df-nf 1509  df-sb 1811  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ral 2515  df-rex 2516  df-v 2804  df-un 3204  df-in 3206  df-ss 3213  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-br 4089  df-opab 4151  df-xp 4731  df-cnv 4733  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-ec 6703  df-qs 6707
This theorem is referenced by:  3ecoptocl  6792  ecovcom  6810  ecovicom  6811  addclnq  7594  mulclnq  7595  nqtri3or  7615  ltexnqq  7627  addclnq0  7670  mulclnq0  7671  distrnq0  7678  mulcomnq0  7679  addassnq0  7681  addclsr  7972  mulclsr  7973  mulgt0sr  7997  aptisr  7998
  Copyright terms: Public domain W3C validator