Users' Mathboxes Mathbox for Jonathan Ben-Naim < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bnj865 Structured version   Unicode version

Theorem bnj865 33688
Description: Technical lemma for bnj69 33773. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
bnj865.1  |-  ( ph  <->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
bnj865.2  |-  ( ps  <->  A. i  e.  om  ( suc  i  e.  n  ->  ( f `  suc  i )  =  U_ y  e.  ( f `  i )  pred (
y ,  A ,  R ) ) )
bnj865.3  |-  D  =  ( om  \  { (/)
} )
bnj865.5  |-  ( ch  <->  ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )
)
bnj865.6  |-  ( th  <->  ( f  Fn  n  /\  ph 
/\  ps ) )
Assertion
Ref Expression
bnj865  |-  E. w A. n ( ch  ->  E. f  e.  w  th )
Distinct variable groups:    A, f,
i, n, y    w, A, f, n    D, f, i, n    w, D    R, f, i, n, y   
w, R    f, X, n, w    ph, w    ps, w
Allowed substitution hints:    ph( y, f, i, n)    ps( y,
f, i, n)    ch( y, w, f, i, n)    th( y, w, f, i, n)    D( y)    X( y, i)

Proof of Theorem bnj865
Dummy variable  z is distinct from all other variables.
StepHypRef Expression
1 bnj865.1 . . . . . . 7  |-  ( ph  <->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
2 bnj865.2 . . . . . . 7  |-  ( ps  <->  A. i  e.  om  ( suc  i  e.  n  ->  ( f `  suc  i )  =  U_ y  e.  ( f `  i )  pred (
y ,  A ,  R ) ) )
3 bnj865.3 . . . . . . 7  |-  D  =  ( om  \  { (/)
} )
41, 2, 3bnj852 33686 . . . . . 6  |-  ( ( R  FrSe  A  /\  X  e.  A )  ->  A. n  e.  D  E! f ( f  Fn  n  /\  ph  /\  ps ) )
5 omex 8058 . . . . . . . . 9  |-  om  e.  _V
6 difexg 4581 . . . . . . . . 9  |-  ( om  e.  _V  ->  ( om  \  { (/) } )  e.  _V )
75, 6ax-mp 5 . . . . . . . 8  |-  ( om 
\  { (/) } )  e.  _V
83, 7eqeltri 2525 . . . . . . 7  |-  D  e. 
_V
9 raleq 3038 . . . . . . . 8  |-  ( z  =  D  ->  ( A. n  e.  z  E! f ( f  Fn  n  /\  ph  /\  ps )  <->  A. n  e.  D  E! f ( f  Fn  n  /\  ph  /\  ps ) ) )
10 raleq 3038 . . . . . . . . 9  |-  ( z  =  D  ->  ( A. n  e.  z  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )  <->  A. n  e.  D  E. f  e.  w  (
f  Fn  n  /\  ph 
/\  ps ) ) )
1110exbidv 1699 . . . . . . . 8  |-  ( z  =  D  ->  ( E. w A. n  e.  z  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )  <->  E. w A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
129, 11imbi12d 320 . . . . . . 7  |-  ( z  =  D  ->  (
( A. n  e.  z  E! f ( f  Fn  n  /\  ph 
/\  ps )  ->  E. w A. n  e.  z  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
)  <->  ( A. n  e.  D  E! f
( f  Fn  n  /\  ph  /\  ps )  ->  E. w A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) ) )
13 zfrep6 6749 . . . . . . 7  |-  ( A. n  e.  z  E! f ( f  Fn  n  /\  ph  /\  ps )  ->  E. w A. n  e.  z  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
)
148, 12, 13vtocl 3145 . . . . . 6  |-  ( A. n  e.  D  E! f ( f  Fn  n  /\  ph  /\  ps )  ->  E. w A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
)
154, 14syl 16 . . . . 5  |-  ( ( R  FrSe  A  /\  X  e.  A )  ->  E. w A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )
16 19.37v 1753 . . . . 5  |-  ( E. w ( ( R 
FrSe  A  /\  X  e.  A )  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  ( ( R  FrSe  A  /\  X  e.  A )  ->  E. w A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )
1715, 16mpbir 209 . . . 4  |-  E. w
( ( R  FrSe  A  /\  X  e.  A
)  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )
18 df-ral 2796 . . . . . . . 8  |-  ( A. n  e.  D  E. f  e.  w  (
f  Fn  n  /\  ph 
/\  ps )  <->  A. n
( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )
1918imbi2i 312 . . . . . . 7  |-  ( ( ( R  FrSe  A  /\  X  e.  A
)  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  ( ( R  FrSe  A  /\  X  e.  A )  ->  A. n
( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) ) )
20 19.21v 1714 . . . . . . 7  |-  ( A. n ( ( R 
FrSe  A  /\  X  e.  A )  ->  (
n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )  <->  ( ( R  FrSe  A  /\  X  e.  A )  ->  A. n
( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) ) )
2119, 20bitr4i 252 . . . . . 6  |-  ( ( ( R  FrSe  A  /\  X  e.  A
)  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  A. n
( ( R  FrSe  A  /\  X  e.  A
)  ->  ( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) ) )
2221exbii 1652 . . . . 5  |-  ( E. w ( ( R 
FrSe  A  /\  X  e.  A )  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  E. w A. n ( ( R 
FrSe  A  /\  X  e.  A )  ->  (
n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) ) )
23 impexp 446 . . . . . . . 8  |-  ( ( ( ( R  FrSe  A  /\  X  e.  A
)  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  ( ( R  FrSe  A  /\  X  e.  A )  ->  (
n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) ) )
24 df-3an 974 . . . . . . . . . 10  |-  ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )  <->  ( ( R  FrSe  A  /\  X  e.  A
)  /\  n  e.  D ) )
2524bicomi 202 . . . . . . . . 9  |-  ( ( ( R  FrSe  A  /\  X  e.  A
)  /\  n  e.  D )  <->  ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D ) )
2625imbi1i 325 . . . . . . . 8  |-  ( ( ( ( R  FrSe  A  /\  X  e.  A
)  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
2723, 26bitr3i 251 . . . . . . 7  |-  ( ( ( R  FrSe  A  /\  X  e.  A
)  ->  ( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )  <->  ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
2827albii 1625 . . . . . 6  |-  ( A. n ( ( R 
FrSe  A  /\  X  e.  A )  ->  (
n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )  <->  A. n
( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D
)  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
2928exbii 1652 . . . . 5  |-  ( E. w A. n ( ( R  FrSe  A  /\  X  e.  A
)  ->  ( n  e.  D  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )  <->  E. w A. n ( ( R 
FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
3022, 29bitri 249 . . . 4  |-  ( E. w ( ( R 
FrSe  A  /\  X  e.  A )  ->  A. n  e.  D  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  E. w A. n ( ( R 
FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
3117, 30mpbi 208 . . 3  |-  E. w A. n ( ( R 
FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )
32 bnj865.5 . . . . . . 7  |-  ( ch  <->  ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )
)
3332bicomi 202 . . . . . 6  |-  ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D )  <->  ch )
3433imbi1i 325 . . . . 5  |-  ( ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D
)  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  ( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )
3534albii 1625 . . . 4  |-  ( A. n ( ( R 
FrSe  A  /\  X  e.  A  /\  n  e.  D )  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  A. n
( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
3635exbii 1652 . . 3  |-  ( E. w A. n ( ( R  FrSe  A  /\  X  e.  A  /\  n  e.  D
)  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) )  <->  E. w A. n ( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph 
/\  ps ) ) )
3731, 36mpbi 208 . 2  |-  E. w A. n ( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph 
/\  ps ) )
38 bnj865.6 . . . . . 6  |-  ( th  <->  ( f  Fn  n  /\  ph 
/\  ps ) )
3938rexbii 2943 . . . . 5  |-  ( E. f  e.  w  th  <->  E. f  e.  w  ( f  Fn  n  /\  ph 
/\  ps ) )
4039imbi2i 312 . . . 4  |-  ( ( ch  ->  E. f  e.  w  th )  <->  ( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
4140albii 1625 . . 3  |-  ( A. n ( ch  ->  E. f  e.  w  th ) 
<-> 
A. n ( ch 
->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps )
) )
4241exbii 1652 . 2  |-  ( E. w A. n ( ch  ->  E. f  e.  w  th )  <->  E. w A. n ( ch  ->  E. f  e.  w  ( f  Fn  n  /\  ph  /\  ps ) ) )
4337, 42mpbir 209 1  |-  E. w A. n ( ch  ->  E. f  e.  w  th )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 369    /\ w3a 972   A.wal 1379    = wceq 1381   E.wex 1597    e. wcel 1802   E!weu 2266   A.wral 2791   E.wrex 2792   _Vcvv 3093    \ cdif 3455   (/)c0 3767   {csn 4010   U_ciun 4311   suc csuc 4866    Fn wfn 5569   ` cfv 5574   omcom 6681    predc-bnj14 33448    FrSe w-bnj15 33452
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1603  ax-4 1616  ax-5 1689  ax-6 1732  ax-7 1774  ax-8 1804  ax-9 1806  ax-10 1821  ax-11 1826  ax-12 1838  ax-13 1983  ax-ext 2419  ax-rep 4544  ax-sep 4554  ax-nul 4562  ax-pow 4611  ax-pr 4672  ax-un 6573  ax-reg 8016  ax-inf2 8056
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 973  df-3an 974  df-tru 1384  df-fal 1387  df-ex 1598  df-nf 1602  df-sb 1725  df-eu 2270  df-mo 2271  df-clab 2427  df-cleq 2433  df-clel 2436  df-nfc 2591  df-ne 2638  df-ral 2796  df-rex 2797  df-reu 2798  df-rab 2800  df-v 3095  df-sbc 3312  df-csb 3418  df-dif 3461  df-un 3463  df-in 3465  df-ss 3472  df-pss 3474  df-nul 3768  df-if 3923  df-pw 3995  df-sn 4011  df-pr 4013  df-tp 4015  df-op 4017  df-uni 4231  df-iun 4313  df-br 4434  df-opab 4492  df-mpt 4493  df-tr 4527  df-eprel 4777  df-id 4781  df-po 4786  df-so 4787  df-fr 4824  df-we 4826  df-ord 4867  df-on 4868  df-lim 4869  df-suc 4870  df-xp 4991  df-rel 4992  df-cnv 4993  df-co 4994  df-dm 4995  df-rn 4996  df-res 4997  df-ima 4998  df-iota 5537  df-fun 5576  df-fn 5577  df-f 5578  df-f1 5579  df-fo 5580  df-f1o 5581  df-fv 5582  df-om 6682  df-1o 7128  df-bnj17 33447  df-bnj14 33449  df-bnj13 33451  df-bnj15 33453
This theorem is referenced by:  bnj849  33690
  Copyright terms: Public domain W3C validator