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

Theorem caucvgprprlemmu 6793
Description: Lemma for caucvgprpr 6810. The upper cut of the putative limit is inhabited. (Contributed by Jim Kingdon, 29-Dec-2020.)
Hypotheses
Ref Expression
caucvgprpr.f  |-  ( ph  ->  F : N. --> P. )
caucvgprpr.cau  |-  ( ph  ->  A. n  e.  N.  A. k  e.  N.  (
n  <N  k  ->  (
( F `  n
)  <P  ( ( F `
 k )  +P. 
<. { l  |  l 
<Q  ( *Q `  [ <. n ,  1o >. ]  ~Q  ) } ,  { u  |  ( *Q `  [ <. n ,  1o >. ]  ~Q  )  <Q  u } >. )  /\  ( F `  k
)  <P  ( ( F `
 n )  +P. 
<. { l  |  l 
<Q  ( *Q `  [ <. n ,  1o >. ]  ~Q  ) } ,  { u  |  ( *Q `  [ <. n ,  1o >. ]  ~Q  )  <Q  u } >. )
) ) )
caucvgprpr.bnd  |-  ( ph  ->  A. m  e.  N.  A  <P  ( F `  m ) )
caucvgprpr.lim  |-  L  = 
<. { l  e.  Q.  |  E. r  e.  N.  <. { p  |  p  <Q  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  )
) } ,  {
q  |  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) ) 
<Q  q } >.  <P  ( F `  r ) } ,  { u  e.  Q.  |  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  u } ,  { q  |  u 
<Q  q } >. } >.
Assertion
Ref Expression
caucvgprprlemmu  |-  ( ph  ->  E. t  e.  Q.  t  e.  ( 2nd `  L ) )
Distinct variable groups:    A, m    m, F    A, r, m    F, r, u    t, L    q, p, r, u
Allowed substitution hints:    ph( u, t, k, m, n, r, q, p, l)    A( u, t, k, n, q, p, l)    F( t, k, n, q, p, l)    L( u, k, m, n, r, q, p, l)

Proof of Theorem caucvgprprlemmu
Dummy variables  f  g  h  x are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 caucvgprpr.f . . . 4  |-  ( ph  ->  F : N. --> P. )
2 1pi 6413 . . . . 5  |-  1o  e.  N.
32a1i 9 . . . 4  |-  ( ph  ->  1o  e.  N. )
41, 3ffvelrnd 5303 . . 3  |-  ( ph  ->  ( F `  1o )  e.  P. )
5 prop 6573 . . 3  |-  ( ( F `  1o )  e.  P.  ->  <. ( 1st `  ( F `  1o ) ) ,  ( 2nd `  ( F `
 1o ) )
>.  e.  P. )
6 prmu 6576 . . 3  |-  ( <.
( 1st `  ( F `  1o )
) ,  ( 2nd `  ( F `  1o ) ) >.  e.  P.  ->  E. x  e.  Q.  x  e.  ( 2nd `  ( F `  1o ) ) )
74, 5, 63syl 17 . 2  |-  ( ph  ->  E. x  e.  Q.  x  e.  ( 2nd `  ( F `  1o ) ) )
8 simprl 483 . . . 4  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  x  e.  Q. )
9 1nq 6464 . . . 4  |-  1Q  e.  Q.
10 addclnq 6473 . . . 4  |-  ( ( x  e.  Q.  /\  1Q  e.  Q. )  -> 
( x  +Q  1Q )  e.  Q. )
118, 9, 10sylancl 392 . . 3  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( x  +Q  1Q )  e.  Q. )
122a1i 9 . . . . 5  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  1o  e.  N. )
13 simprr 484 . . . . . . . 8  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  x  e.  ( 2nd `  ( F `  1o ) ) )
144adantr 261 . . . . . . . . 9  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( F `  1o )  e.  P. )
15 nqpru 6650 . . . . . . . . 9  |-  ( ( x  e.  Q.  /\  ( F `  1o )  e.  P. )  -> 
( x  e.  ( 2nd `  ( F `
 1o ) )  <-> 
( F `  1o )  <P  <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >. )
)
168, 14, 15syl2anc 391 . . . . . . . 8  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( x  e.  ( 2nd `  ( F `
 1o ) )  <-> 
( F `  1o )  <P  <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >. )
)
1713, 16mpbid 135 . . . . . . 7  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( F `  1o )  <P  <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >. )
18 ltaprg 6717 . . . . . . . . 9  |-  ( ( f  e.  P.  /\  g  e.  P.  /\  h  e.  P. )  ->  (
f  <P  g  <->  ( h  +P.  f )  <P  (
h  +P.  g )
) )
1918adantl 262 . . . . . . . 8  |-  ( ( ( ph  /\  (
x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o ) ) ) )  /\  ( f  e. 
P.  /\  g  e.  P.  /\  h  e.  P. ) )  ->  (
f  <P  g  <->  ( h  +P.  f )  <P  (
h  +P.  g )
) )
20 nqprlu 6645 . . . . . . . . 9  |-  ( x  e.  Q.  ->  <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >.  e.  P. )
218, 20syl 14 . . . . . . . 8  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  <. { p  |  p 
<Q  x } ,  {
q  |  x  <Q  q } >.  e.  P. )
22 nqprlu 6645 . . . . . . . . 9  |-  ( 1Q  e.  Q.  ->  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >.  e.  P. )
239, 22mp1i 10 . . . . . . . 8  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  <. { p  |  p 
<Q  1Q } ,  {
q  |  1Q  <Q  q } >.  e.  P. )
24 addcomprg 6676 . . . . . . . . 9  |-  ( ( f  e.  P.  /\  g  e.  P. )  ->  ( f  +P.  g
)  =  ( g  +P.  f ) )
2524adantl 262 . . . . . . . 8  |-  ( ( ( ph  /\  (
x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o ) ) ) )  /\  ( f  e. 
P.  /\  g  e.  P. ) )  ->  (
f  +P.  g )  =  ( g  +P.  f ) )
2619, 14, 21, 23, 25caovord2d 5670 . . . . . . 7  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( ( F `  1o )  <P  <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >.  <->  ( ( F `  1o )  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. )  <P  ( <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >.  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. ) ) )
2717, 26mpbid 135 . . . . . 6  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( ( F `  1o )  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. )  <P  ( <. { p  |  p  <Q  x } ,  { q  |  x 
<Q  q } >.  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. ) )
28 df-1nqqs 6449 . . . . . . . . . . . . 13  |-  1Q  =  [ <. 1o ,  1o >. ]  ~Q
2928fveq2i 5181 . . . . . . . . . . . 12  |-  ( *Q
`  1Q )  =  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )
30 rec1nq 6493 . . . . . . . . . . . 12  |-  ( *Q
`  1Q )  =  1Q
3129, 30eqtr3i 2062 . . . . . . . . . . 11  |-  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  )  =  1Q
3231breq2i 3772 . . . . . . . . . 10  |-  ( p 
<Q  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <->  p  <Q  1Q )
3332abbii 2153 . . . . . . . . 9  |-  { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) }  =  { p  |  p  <Q  1Q }
3431breq1i 3771 . . . . . . . . . 10  |-  ( ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q  q  <->  1Q  <Q  q )
3534abbii 2153 . . . . . . . . 9  |-  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q }  =  {
q  |  1Q  <Q  q }
3633, 35opeq12i 3554 . . . . . . . 8  |-  <. { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >.  =  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >.
3736oveq2i 5523 . . . . . . 7  |-  ( ( F `  1o )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q  q } >. )  =  ( ( F `  1o )  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. )
3837a1i 9 . . . . . 6  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( ( F `  1o )  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >. )  =  ( ( F `
 1o )  +P. 
<. { p  |  p 
<Q  1Q } ,  {
q  |  1Q  <Q  q } >. ) )
39 addnqpr 6659 . . . . . . 7  |-  ( ( x  e.  Q.  /\  1Q  e.  Q. )  ->  <. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>.  =  ( <. { p  |  p  <Q  x } ,  { q  |  x  <Q  q } >.  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. )
)
408, 9, 39sylancl 392 . . . . . 6  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  <. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>.  =  ( <. { p  |  p  <Q  x } ,  { q  |  x  <Q  q } >.  +P.  <. { p  |  p  <Q  1Q } ,  { q  |  1Q  <Q  q } >. )
)
4127, 38, 403brtr4d 3794 . . . . 5  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( ( F `  1o )  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. )
42 fveq2 5178 . . . . . . . 8  |-  ( r  =  1o  ->  ( F `  r )  =  ( F `  1o ) )
43 opeq1 3549 . . . . . . . . . . . . 13  |-  ( r  =  1o  ->  <. r ,  1o >.  =  <. 1o ,  1o >. )
4443eceq1d 6142 . . . . . . . . . . . 12  |-  ( r  =  1o  ->  [ <. r ,  1o >. ]  ~Q  =  [ <. 1o ,  1o >. ]  ~Q  )
4544fveq2d 5182 . . . . . . . . . . 11  |-  ( r  =  1o  ->  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  =  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  ) )
4645breq2d 3776 . . . . . . . . . 10  |-  ( r  =  1o  ->  (
p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <->  p  <Q  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  ) ) )
4746abbidv 2155 . . . . . . . . 9  |-  ( r  =  1o  ->  { p  |  p  <Q  ( *Q
`  [ <. r ,  1o >. ]  ~Q  ) }  =  { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } )
4845breq1d 3774 . . . . . . . . . 10  |-  ( r  =  1o  ->  (
( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q  <->  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q  q ) )
4948abbidv 2155 . . . . . . . . 9  |-  ( r  =  1o  ->  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q }  =  {
q  |  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  )  <Q  q } )
5047, 49opeq12d 3557 . . . . . . . 8  |-  ( r  =  1o  ->  <. { p  |  p  <Q  ( *Q
`  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >.  =  <. { p  |  p  <Q  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >. )
5142, 50oveq12d 5530 . . . . . . 7  |-  ( r  =  1o  ->  (
( F `  r
)  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  =  ( ( F `
 1o )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q  q } >. ) )
5251breq1d 3774 . . . . . 6  |-  ( r  =  1o  ->  (
( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. 
<->  ( ( F `  1o )  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. ) )
5352rspcev 2656 . . . . 5  |-  ( ( 1o  e.  N.  /\  ( ( F `  1o )  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. 1o ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. 1o ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. )  ->  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q ) 
<Q  q } >. )
5412, 41, 53syl2anc 391 . . . 4  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  E. r  e.  N.  ( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. )
55 breq2 3768 . . . . . . . . 9  |-  ( u  =  ( x  +Q  1Q )  ->  ( p 
<Q  u  <->  p  <Q  ( x  +Q  1Q ) ) )
5655abbidv 2155 . . . . . . . 8  |-  ( u  =  ( x  +Q  1Q )  ->  { p  |  p  <Q  u }  =  { p  |  p 
<Q  ( x  +Q  1Q ) } )
57 breq1 3767 . . . . . . . . 9  |-  ( u  =  ( x  +Q  1Q )  ->  ( u 
<Q  q  <->  ( x  +Q  1Q )  <Q  q ) )
5857abbidv 2155 . . . . . . . 8  |-  ( u  =  ( x  +Q  1Q )  ->  { q  |  u  <Q  q }  =  { q  |  ( x  +Q  1Q )  <Q  q } )
5956, 58opeq12d 3557 . . . . . . 7  |-  ( u  =  ( x  +Q  1Q )  ->  <. { p  |  p  <Q  u } ,  { q  |  u 
<Q  q } >.  =  <. { p  |  p  <Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. )
6059breq2d 3776 . . . . . 6  |-  ( u  =  ( x  +Q  1Q )  ->  ( ( ( F `  r
)  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  u } ,  {
q  |  u  <Q  q } >.  <->  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q ) 
<Q  q } >. )
)
6160rexbidv 2327 . . . . 5  |-  ( u  =  ( x  +Q  1Q )  ->  ( E. r  e.  N.  (
( F `  r
)  +P.  <. { p  |  p  <Q  ( *Q
`  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  u } ,  {
q  |  u  <Q  q } >.  <->  E. r  e.  N.  ( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q )  <Q  q }
>. ) )
62 caucvgprpr.lim . . . . . . 7  |-  L  = 
<. { l  e.  Q.  |  E. r  e.  N.  <. { p  |  p  <Q  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  )
) } ,  {
q  |  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) ) 
<Q  q } >.  <P  ( F `  r ) } ,  { u  e.  Q.  |  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  u } ,  { q  |  u 
<Q  q } >. } >.
6362fveq2i 5181 . . . . . 6  |-  ( 2nd `  L )  =  ( 2nd `  <. { l  e.  Q.  |  E. r  e.  N.  <. { p  |  p  <Q  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) ) } ,  { q  |  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) )  <Q 
q } >.  <P  ( F `  r ) } ,  { u  e.  Q.  |  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  u } ,  { q  |  u 
<Q  q } >. } >. )
64 nqex 6461 . . . . . . . 8  |-  Q.  e.  _V
6564rabex 3901 . . . . . . 7  |-  { l  e.  Q.  |  E. r  e.  N.  <. { p  |  p  <Q  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) ) } ,  { q  |  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) )  <Q 
q } >.  <P  ( F `  r ) }  e.  _V
6664rabex 3901 . . . . . . 7  |-  { u  e.  Q.  |  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  u } ,  { q  |  u 
<Q  q } >. }  e.  _V
6765, 66op2nd 5774 . . . . . 6  |-  ( 2nd `  <. { l  e. 
Q.  |  E. r  e.  N.  <. { p  |  p  <Q  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) ) } ,  { q  |  ( l  +Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  )
)  <Q  q } >.  <P 
( F `  r
) } ,  {
u  e.  Q.  |  E. r  e.  N.  ( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  u } ,  {
q  |  u  <Q  q } >. } >. )  =  { u  e.  Q.  |  E. r  e.  N.  ( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  u } ,  {
q  |  u  <Q  q } >. }
6863, 67eqtri 2060 . . . . 5  |-  ( 2nd `  L )  =  {
u  e.  Q.  |  E. r  e.  N.  ( ( F `  r )  +P.  <. { p  |  p  <Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q 
q } >. )  <P 
<. { p  |  p 
<Q  u } ,  {
q  |  u  <Q  q } >. }
6961, 68elrab2 2700 . . . 4  |-  ( ( x  +Q  1Q )  e.  ( 2nd `  L
)  <->  ( ( x  +Q  1Q )  e. 
Q.  /\  E. r  e.  N.  ( ( F `
 r )  +P. 
<. { p  |  p 
<Q  ( *Q `  [ <. r ,  1o >. ]  ~Q  ) } ,  { q  |  ( *Q `  [ <. r ,  1o >. ]  ~Q  )  <Q  q } >. ) 
<P  <. { p  |  p  <Q  ( x  +Q  1Q ) } ,  { q  |  ( x  +Q  1Q ) 
<Q  q } >. )
)
7011, 54, 69sylanbrc 394 . . 3  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  -> 
( x  +Q  1Q )  e.  ( 2nd `  L ) )
71 eleq1 2100 . . . 4  |-  ( t  =  ( x  +Q  1Q )  ->  ( t  e.  ( 2nd `  L
)  <->  ( x  +Q  1Q )  e.  ( 2nd `  L ) ) )
7271rspcev 2656 . . 3  |-  ( ( ( x  +Q  1Q )  e.  Q.  /\  (
x  +Q  1Q )  e.  ( 2nd `  L
) )  ->  E. t  e.  Q.  t  e.  ( 2nd `  L ) )
7311, 70, 72syl2anc 391 . 2  |-  ( (
ph  /\  ( x  e.  Q.  /\  x  e.  ( 2nd `  ( F `  1o )
) ) )  ->  E. t  e.  Q.  t  e.  ( 2nd `  L ) )
747, 73rexlimddv 2437 1  |-  ( ph  ->  E. t  e.  Q.  t  e.  ( 2nd `  L ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 97    <-> wb 98    /\ w3a 885    = wceq 1243    e. wcel 1393   {cab 2026   A.wral 2306   E.wrex 2307   {crab 2310   <.cop 3378   class class class wbr 3764   -->wf 4898   ` cfv 4902  (class class class)co 5512   1stc1st 5765   2ndc2nd 5766   1oc1o 5994   [cec 6104   N.cnpi 6370    <N clti 6373    ~Q ceq 6377   Q.cnq 6378   1Qc1q 6379    +Q cplq 6380   *Qcrq 6382    <Q cltq 6383   P.cnp 6389    +P. cpp 6391    <P cltp 6393
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-in1 544  ax-in2 545  ax-io 630  ax-5 1336  ax-7 1337  ax-gen 1338  ax-ie1 1382  ax-ie2 1383  ax-8 1395  ax-10 1396  ax-11 1397  ax-i12 1398  ax-bndl 1399  ax-4 1400  ax-13 1404  ax-14 1405  ax-17 1419  ax-i9 1423  ax-ial 1427  ax-i5r 1428  ax-ext 2022  ax-coll 3872  ax-sep 3875  ax-nul 3883  ax-pow 3927  ax-pr 3944  ax-un 4170  ax-setind 4262  ax-iinf 4311
This theorem depends on definitions:  df-bi 110  df-dc 743  df-3or 886  df-3an 887  df-tru 1246  df-fal 1249  df-nf 1350  df-sb 1646  df-eu 1903  df-mo 1904  df-clab 2027  df-cleq 2033  df-clel 2036  df-nfc 2167  df-ne 2206  df-ral 2311  df-rex 2312  df-reu 2313  df-rab 2315  df-v 2559  df-sbc 2765  df-csb 2853  df-dif 2920  df-un 2922  df-in 2924  df-ss 2931  df-nul 3225  df-pw 3361  df-sn 3381  df-pr 3382  df-op 3384  df-uni 3581  df-int 3616  df-iun 3659  df-br 3765  df-opab 3819  df-mpt 3820  df-tr 3855  df-eprel 4026  df-id 4030  df-po 4033  df-iso 4034  df-iord 4103  df-on 4105  df-suc 4108  df-iom 4314  df-xp 4351  df-rel 4352  df-cnv 4353  df-co 4354  df-dm 4355  df-rn 4356  df-res 4357  df-ima 4358  df-iota 4867  df-fun 4904  df-fn 4905  df-f 4906  df-f1 4907  df-fo 4908  df-f1o 4909  df-fv 4910  df-ov 5515  df-oprab 5516  df-mpt2 5517  df-1st 5767  df-2nd 5768  df-recs 5920  df-irdg 5957  df-1o 6001  df-2o 6002  df-oadd 6005  df-omul 6006  df-er 6106  df-ec 6108  df-qs 6112  df-ni 6402  df-pli 6403  df-mi 6404  df-lti 6405  df-plpq 6442  df-mpq 6443  df-enq 6445  df-nqqs 6446  df-plqqs 6447  df-mqqs 6448  df-1nqqs 6449  df-rq 6450  df-ltnqqs 6451  df-enq0 6522  df-nq0 6523  df-0nq0 6524  df-plq0 6525  df-mq0 6526  df-inp 6564  df-iplp 6566  df-iltp 6568
This theorem is referenced by:  caucvgprprlemm  6794
  Copyright terms: Public domain W3C validator