ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  suplocexprlemloc Unicode version
Theorem suplocexprlemloc 7662
Description: Lemma for suplocexpr 7666. The putative supremum is located. (Contributed by Jim Kingdon, 9-Jan-2024.)
Hypotheses
Ref Expression
suplocexpr.m |- ( ph -> E. x x e. A )
suplocexpr.ub |- ( ph -> E. x e. P. A. y e. A y <P x )
suplocexpr.loc |- ( ph -> A. x e. P. A. y e. P. ( x <P y -> ( E. z e. A x <P z \/ A. z e. A z <P y ) ) )
suplocexpr.b |- B = <. U. ( 1st " A ) , { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } >.
Assertion
Ref Expression
suplocexprlemloc |- ( ph -> A. q e. Q. A. r e. Q. ( q <Q r -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) ) )
Distinct variable groups:   u, A, z, w   x, A, y, u, z   u, q, z, w   x, q, y, ph   ph, r, w, q   ph, z, x, y   u, r
Allowed substitution hints:   ph( u)   A( r, q)   B( x, y, z, w, u, r, q)
Proof of Theorem suplocexprlemloc
Dummy variables s t v l are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 109 . . . . 5 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> q <Q r )
2 ltbtwnnqq 7356 . . . . 5 |- ( q <Q r <-> E. v e. Q. ( q <Q v /\ v <Q r ) )
31, 2sylib 121 . . . 4 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> E. v e. Q. ( q <Q v /\ v <Q r ) )
4 simplll 523 . . . . . . 7 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ph )
5 simprl 521 . . . . . . . 8 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> q e. Q. )
65ad2antrr 480 . . . . . . 7 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> q e. Q. )
7 simprl 521 . . . . . . 7 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> v e. Q. )
84, 6, 7jca32 308 . . . . . 6 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ( ph /\ ( q e. Q. /\ v e. Q. ) ) )
9 simprrl 529 . . . . . 6 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> q <Q v )
10 ltnqpri 7535 . . . . . . . . 9 |- ( q <Q v -> <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. )
1110adantl 275 . . . . . . . 8 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. )
12 breq2 3986 . . . . . . . . . 10 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( <. { l | l <Q q } , { u | q <Q u } >. <P y <-> <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. ) )
13 breq2 3986 . . . . . . . . . . . 12 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( z <P y <-> z <P <. { l | l <Q v } , { u | v <Q u } >. ) )
1413ralbidv 2466 . . . . . . . . . . 11 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( A. z e. A z <P y <-> A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) )
1514orbi2d 780 . . . . . . . . . 10 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) <-> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) ) )
1612, 15imbi12d 233 . . . . . . . . 9 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( ( <. { l | l <Q q } , { u | q <Q u } >. <P y -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) ) <-> ( <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) ) ) )
17 breq1 3985 . . . . . . . . . . . 12 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( x <P y <-> <. { l | l <Q q } , { u | q <Q u } >. <P y ) )
18 breq1 3985 . . . . . . . . . . . . . 14 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( x <P z <-> <. { l | l <Q q } , { u | q <Q u } >. <P z ) )
1918rexbidv 2467 . . . . . . . . . . . . 13 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( E. z e. A x <P z <-> E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z ) )
2019orbi1d 781 . . . . . . . . . . . 12 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( ( E. z e. A x <P z \/ A. z e. A z <P y ) <-> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) ) )
2117, 20imbi12d 233 . . . . . . . . . . 11 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( ( x <P y -> ( E. z e. A x <P z \/ A. z e. A z <P y ) ) <-> ( <. { l | l <Q q } , { u | q <Q u } >. <P y -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) ) ) )
2221ralbidv 2466 . . . . . . . . . 10 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( A. y e. P. ( x <P y -> ( E. z e. A x <P z \/ A. z e. A z <P y ) ) <-> A. y e. P. ( <. { l | l <Q q } , { u | q <Q u } >. <P y -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) ) ) )
23 suplocexpr.loc . . . . . . . . . . 11 |- ( ph -> A. x e. P. A. y e. P. ( x <P y -> ( E. z e. A x <P z \/ A. z e. A z <P y ) ) )
2423ad2antrr 480 . . . . . . . . . 10 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> A. x e. P. A. y e. P. ( x <P y -> ( E. z e. A x <P z \/ A. z e. A z <P y ) ) )
25 simplrl 525 . . . . . . . . . . 11 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> q e. Q. )
26 nqprlu 7488 . . . . . . . . . . 11 |- ( q e. Q. -> <. { l | l <Q q } , { u | q <Q u } >. e. P. )
2725, 26syl 14 . . . . . . . . . 10 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> <. { l | l <Q q } , { u | q <Q u } >. e. P. )
2822, 24, 27rspcdva 2835 . . . . . . . . 9 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> A. y e. P. ( <. { l | l <Q q } , { u | q <Q u } >. <P y -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P y ) ) )
29 simplrr 526 . . . . . . . . . 10 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> v e. Q. )
30 nqprlu 7488 . . . . . . . . . 10 |- ( v e. Q. -> <. { l | l <Q v } , { u | v <Q u } >. e. P. )
3129, 30syl 14 . . . . . . . . 9 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> <. { l | l <Q v } , { u | v <Q u } >. e. P. )
3216, 28, 31rspcdva 2835 . . . . . . . 8 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) ) )
3311, 32mpd 13 . . . . . . 7 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) )
34 simpr 109 . . . . . . . . . . . 12 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> <. { l | l <Q q } , { u | q <Q u } >. <P z )
3527ad2antrr 480 . . . . . . . . . . . . 13 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> <. { l | l <Q q } , { u | q <Q u } >. e. P. )
36 suplocexpr.m . . . . . . . . . . . . . . . 16 |- ( ph -> E. x x e. A )
37 suplocexpr.ub . . . . . . . . . . . . . . . 16 |- ( ph -> E. x e. P. A. y e. A y <P x )
3836, 37, 23suplocexprlemss 7656 . . . . . . . . . . . . . . 15 |- ( ph -> A C_ P. )
3938ad4antr 486 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> A C_ P. )
40 simplr 520 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> z e. A )
4139, 40sseldd 3143 . . . . . . . . . . . . 13 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> z e. P. )
42 ltdfpr 7447 . . . . . . . . . . . . 13 |- ( ( <. { l | l <Q q } , { u | q <Q u } >. e. P. /\ z e. P. ) -> ( <. { l | l <Q q } , { u | q <Q u } >. <P z <-> E. w e. Q. ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) ) )
4335, 41, 42syl2anc 409 . . . . . . . . . . . 12 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> ( <. { l | l <Q q } , { u | q <Q u } >. <P z <-> E. w e. Q. ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) ) )
4434, 43mpbid 146 . . . . . . . . . . 11 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> E. w e. Q. ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) )
45 vex 2729 . . . . . . . . . . . . . 14 |- w e. _V
46 breq2 3986 . . . . . . . . . . . . . 14 |- ( u = w -> ( q <Q u <-> q <Q w ) )
47 ltnqex 7490 . . . . . . . . . . . . . . 15 |- { l | l <Q q } e. _V
48 gtnqex 7491 . . . . . . . . . . . . . . 15 |- { u | q <Q u } e. _V
4947, 48op2nd 6115 . . . . . . . . . . . . . 14 |- ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) = { u | q <Q u }
5045, 46, 49elab2 2874 . . . . . . . . . . . . 13 |- ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) <-> q <Q w )
5150anbi1i 454 . . . . . . . . . . . 12 |- ( ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) <-> ( q <Q w /\ w e. ( 1st ` z ) ) )
5251rexbii 2473 . . . . . . . . . . 11 |- ( E. w e. Q. ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) <-> E. w e. Q. ( q <Q w /\ w e. ( 1st ` z ) ) )
5344, 52sylib 121 . . . . . . . . . 10 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> E. w e. Q. ( q <Q w /\ w e. ( 1st ` z ) ) )
54 simpllr 524 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> z e. A )
55 simprrl 529 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> q <Q w )
5641adantr 274 . . . . . . . . . . . . . . . . 17 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> z e. P. )
57 prop 7416 . . . . . . . . . . . . . . . . 17 |- ( z e. P. -> <. ( 1st ` z ) , ( 2nd ` z ) >. e. P. )
5856, 57syl 14 . . . . . . . . . . . . . . . 16 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> <. ( 1st ` z ) , ( 2nd ` z ) >. e. P. )
59 simprrr 530 . . . . . . . . . . . . . . . 16 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> w e. ( 1st ` z ) )
60 prcdnql 7425 . . . . . . . . . . . . . . . 16 |- ( ( <. ( 1st ` z ) , ( 2nd ` z ) >. e. P. /\ w e. ( 1st ` z ) ) -> ( q <Q w -> q e. ( 1st ` z ) ) )
6158, 59, 60syl2anc 409 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> ( q <Q w -> q e. ( 1st ` z ) ) )
6255, 61mpd 13 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> q e. ( 1st ` z ) )
6354, 62jca 304 . . . . . . . . . . . . 13 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> ( z e. A /\ q e. ( 1st ` z ) ) )
646319.8ad 1579 . . . . . . . . . . . 12 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> E. z ( z e. A /\ q e. ( 1st ` z ) ) )
65 df-rex 2450 . . . . . . . . . . . 12 |- ( E. z e. A q e. ( 1st ` z ) <-> E. z ( z e. A /\ q e. ( 1st ` z ) ) )
6664, 65sylibr 133 . . . . . . . . . . 11 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> E. z e. A q e. ( 1st ` z ) )
67 suplocexprlemell 7654 . . . . . . . . . . 11 |- ( q e. U. ( 1st " A ) <-> E. z e. A q e. ( 1st ` z ) )
6866, 67sylibr 133 . . . . . . . . . 10 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) /\ ( w e. Q. /\ ( q <Q w /\ w e. ( 1st ` z ) ) ) ) -> q e. U. ( 1st " A ) )
6953, 68rexlimddv 2588 . . . . . . . . 9 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ z e. A ) /\ <. { l | l <Q q } , { u | q <Q u } >. <P z ) -> q e. U. ( 1st " A ) )
7069rexlimdva2 2586 . . . . . . . 8 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z -> q e. U. ( 1st " A ) ) )
71 fo2nd 6126 . . . . . . . . . . . . . . 15 |- 2nd : _V -onto-> _V
72 fofun 5411 . . . . . . . . . . . . . . 15 |- ( 2nd : _V -onto-> _V -> Fun 2nd )
7371, 72ax-mp 5 . . . . . . . . . . . . . 14 |- Fun 2nd
74 fvelima 5538 . . . . . . . . . . . . . 14 |- ( ( Fun 2nd /\ s e. ( 2nd " A ) ) -> E. t e. A ( 2nd ` t ) = s )
7573, 74mpan 421 . . . . . . . . . . . . 13 |- ( s e. ( 2nd " A ) -> E. t e. A ( 2nd ` t ) = s )
7675adantl 275 . . . . . . . . . . . 12 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) -> E. t e. A ( 2nd ` t ) = s )
77 breq1 3985 . . . . . . . . . . . . . . 15 |- ( z = t -> ( z <P <. { l | l <Q v } , { u | v <Q u } >. <-> t <P <. { l | l <Q v } , { u | v <Q u } >. ) )
78 simpllr 524 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. )
79 simprl 521 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> t e. A )
8077, 78, 79rspcdva 2835 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> t <P <. { l | l <Q v } , { u | v <Q u } >. )
8129ad3antrrr 484 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> v e. Q. )
8238ad5antr 488 . . . . . . . . . . . . . . . 16 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> A C_ P. )
8382, 79sseldd 3143 . . . . . . . . . . . . . . 15 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> t e. P. )
84 nqpru 7493 . . . . . . . . . . . . . . 15 |- ( ( v e. Q. /\ t e. P. ) -> ( v e. ( 2nd ` t ) <-> t <P <. { l | l <Q v } , { u | v <Q u } >. ) )
8581, 83, 84syl2anc 409 . . . . . . . . . . . . . 14 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> ( v e. ( 2nd ` t ) <-> t <P <. { l | l <Q v } , { u | v <Q u } >. ) )
8680, 85mpbird 166 . . . . . . . . . . . . 13 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> v e. ( 2nd ` t ) )
87 simprr 522 . . . . . . . . . . . . 13 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> ( 2nd ` t ) = s )
8886, 87eleqtrd 2245 . . . . . . . . . . . 12 |- ( ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) /\ ( t e. A /\ ( 2nd ` t ) = s ) ) -> v e. s )
8976, 88rexlimddv 2588 . . . . . . . . . . 11 |- ( ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) /\ s e. ( 2nd " A ) ) -> v e. s )
9089ralrimiva 2539 . . . . . . . . . 10 |- ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) -> A. s e. ( 2nd " A ) v e. s )
91 vex 2729 . . . . . . . . . . 11 |- v e. _V
9291elint2 3831 . . . . . . . . . 10 |- ( v e. |^| ( 2nd " A ) <-> A. s e. ( 2nd " A ) v e. s )
9390, 92sylibr 133 . . . . . . . . 9 |- ( ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) /\ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) -> v e. |^| ( 2nd " A ) )
9493ex 114 . . . . . . . 8 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. -> v e. |^| ( 2nd " A ) ) )
9570, 94orim12d 776 . . . . . . 7 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( ( E. z e. A <. { l | l <Q q } , { u | q <Q u } >. <P z \/ A. z e. A z <P <. { l | l <Q v } , { u | v <Q u } >. ) -> ( q e. U. ( 1st " A ) \/ v e. |^| ( 2nd " A ) ) ) )
9633, 95mpd 13 . . . . . 6 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> ( q e. U. ( 1st " A ) \/ v e. |^| ( 2nd " A ) ) )
978, 9, 96syl2anc 409 . . . . 5 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ( q e. U. ( 1st " A ) \/ v e. |^| ( 2nd " A ) ) )
98 breq2 3986 . . . . . . . . . 10 |- ( u = r -> ( w <Q u <-> w <Q r ) )
9998rexbidv 2467 . . . . . . . . 9 |- ( u = r -> ( E. w e. |^| ( 2nd " A ) w <Q u <-> E. w e. |^| ( 2nd " A ) w <Q r ) )
100 simprr 522 . . . . . . . . . 10 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> r e. Q. )
101100ad3antrrr 484 . . . . . . . . 9 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> r e. Q. )
102 simpr 109 . . . . . . . . . 10 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> v e. |^| ( 2nd " A ) )
103 simprrr 530 . . . . . . . . . . 11 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> v <Q r )
104103adantr 274 . . . . . . . . . 10 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> v <Q r )
105 breq1 3985 . . . . . . . . . . 11 |- ( w = v -> ( w <Q r <-> v <Q r ) )
106105rspcev 2830 . . . . . . . . . 10 |- ( ( v e. |^| ( 2nd " A ) /\ v <Q r ) -> E. w e. |^| ( 2nd " A ) w <Q r )
107102, 104, 106syl2anc 409 . . . . . . . . 9 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> E. w e. |^| ( 2nd " A ) w <Q r )
10899, 101, 107elrabd 2884 . . . . . . . 8 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> r e. { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } )
109 suplocexpr.b . . . . . . . . . . . 12 |- B = <. U. ( 1st " A ) , { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } >.
110109suplocexprlem2b 7655 . . . . . . . . . . 11 |- ( A C_ P. -> ( 2nd ` B ) = { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } )
11138, 110syl 14 . . . . . . . . . 10 |- ( ph -> ( 2nd ` B ) = { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } )
112111eleq2d 2236 . . . . . . . . 9 |- ( ph -> ( r e. ( 2nd ` B ) <-> r e. { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } ) )
113112ad4antr 486 . . . . . . . 8 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> ( r e. ( 2nd ` B ) <-> r e. { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } ) )
114108, 113mpbird 166 . . . . . . 7 |- ( ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) /\ v e. |^| ( 2nd " A ) ) -> r e. ( 2nd ` B ) )
115114ex 114 . . . . . 6 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ( v e. |^| ( 2nd " A ) -> r e. ( 2nd ` B ) ) )
116115orim2d 778 . . . . 5 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ( ( q e. U. ( 1st " A ) \/ v e. |^| ( 2nd " A ) ) -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) ) )
11797, 116mpd 13 . . . 4 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) )
1183, 117rexlimddv 2588 . . 3 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) )
119118ex 114 . 2 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> ( q <Q r -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) ) )
120119ralrimivva 2548 1 |- ( ph -> A. q e. Q. A. r e. Q. ( q <Q r -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) ) )
Colors of variables: wff set class
Syntax hints:   -> wi 4   /\ wa 103   <-> wb 104   \/ wo 698   = wceq 1343   E.wex 1480   e. wcel 2136   {cab 2151   A.wral 2444   E.wrex 2445   {crab 2448   _Vcvv 2726   C_ wss 3116   <.cop 3579   U.cuni 3789   |^|cint 3824   class class class wbr 3982   "cima 4607   Fun wfun 5182   -onto->wfo 5186   ` cfv 5188   1stc1st 6106   2ndc2nd 6107   Q.cnq 7221   <Q cltq 7226   P.cnp 7232   <P cltp 7236
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-coll 4097  ax-sep 4100  ax-nul 4108  ax-pow 4153  ax-pr 4187  ax-un 4411  ax-setind 4514  ax-iinf 4565
This theorem depends on definitions:  df-bi 116  df-dc 825  df-3or 969  df-3an 970  df-tru 1346  df-fal 1349  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ne 2337  df-ral 2449  df-rex 2450  df-reu 2451  df-rab 2453  df-v 2728  df-sbc 2952  df-csb 3046  df-dif 3118  df-un 3120  df-in 3122  df-ss 3129  df-nul 3410  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-int 3825  df-iun 3868  df-br 3983  df-opab 4044  df-mpt 4045  df-tr 4081  df-eprel 4267  df-id 4271  df-po 4274  df-iso 4275  df-iord 4344  df-on 4346  df-suc 4349  df-iom 4568  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-rn 4615  df-res 4616  df-ima 4617  df-iota 5153  df-fun 5190  df-fn 5191  df-f 5192  df-f1 5193  df-fo 5194  df-f1o 5195  df-fv 5196  df-ov 5845  df-oprab 5846  df-mpo 5847  df-1st 6108  df-2nd 6109  df-recs 6273  df-irdg 6338  df-1o 6384  df-oadd 6388  df-omul 6389  df-er 6501  df-ec 6503  df-qs 6507  df-ni 7245  df-pli 7246  df-mi 7247  df-lti 7248  df-plpq 7285  df-mpq 7286  df-enq 7288  df-nqqs 7289  df-plqqs 7290  df-mqqs 7291  df-1nqqs 7292  df-rq 7293  df-ltnqqs 7294  df-inp 7407  df-iltp 7411
This theorem is referenced by:  suplocexprlemex  7663
  Copyright terms: Public domain W3C validator