ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  suplocexprlemloc Unicode version
Theorem suplocexprlemloc 7553
Description: Lemma for suplocexpr 7557. 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 7247 . . . . 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 7426 . . . . . . . . 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 3941 . . . . . . . . . 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 3941 . . . . . . . . . . . 12 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( z <P y <-> z <P <. { l | l <Q v } , { u | v <Q u } >. ) )
1413ralbidv 2438 . . . . . . . . . . 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 3940 . . . . . . . . . . . 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 3940 . . . . . . . . . . . . . 14 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( x <P z <-> <. { l | l <Q q } , { u | q <Q u } >. <P z ) )
1918rexbidv 2439 . . . . . . . . . . . . 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 2438 . . . . . . . . . 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 7379 . . . . . . . . . . 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 2798 . . . . . . . . 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 7379 . . . . . . . . . 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 2798 . . . . . . . 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 7547 . . . . . . . . . . . . . . 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 3103 . . . . . . . . . . . . 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 7338 . . . . . . . . . . . . 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 2692 . . . . . . . . . . . . . 14 |- w e. _V
46 breq2 3941 . . . . . . . . . . . . . 14 |- ( u = w -> ( q <Q u <-> q <Q w ) )
47 ltnqex 7381 . . . . . . . . . . . . . . 15 |- { l | l <Q q } e. _V
48 gtnqex 7382 . . . . . . . . . . . . . . 15 |- { u | q <Q u } e. _V
4947, 48op2nd 6053 . . . . . . . . . . . . . 14 |- ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) = { u | q <Q u }
5045, 46, 49elab2 2836 . . . . . . . . . . . . 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 2445 . . . . . . . . . . 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 7307 . . . . . . . . . . . . . . . . 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 7316 . . . . . . . . . . . . . . . 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 1571 . . . . . . . . . . . 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 2423 . . . . . . . . . . . 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 7545 . . . . . . . . . . 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 2557 . . . . . . . . 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 2555 . . . . . . . 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 6064 . . . . . . . . . . . . . . 15 |- 2nd : _V -onto-> _V
72 fofun 5354 . . . . . . . . . . . . . . 15 |- ( 2nd : _V -onto-> _V -> Fun 2nd )
7371, 72ax-mp 5 . . . . . . . . . . . . . 14 |- Fun 2nd
74 fvelima 5481 . . . . . . . . . . . . . 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 3940 . . . . . . . . . . . . . . 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 2798 . . . . . . . . . . . . . 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 3103 . . . . . . . . . . . . . . 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 7384 . . . . . . . . . . . . . . 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 2219 . . . . . . . . . . . 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 2557 . . . . . . . . . . 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 2508 . . . . . . . . . 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 2692 . . . . . . . . . . 11 |- v e. _V
9291elint2 3786 . . . . . . . . . 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 3941 . . . . . . . . . 10 |- ( u = r -> ( w <Q u <-> w <Q r ) )
9998rexbidv 2439 . . . . . . . . 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 3940 . . . . . . . . . . 11 |- ( w = v -> ( w <Q r <-> v <Q r ) )
106105rspcev 2793 . . . . . . . . . 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 2846 . . . . . . . 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 7546 . . . . . . . . . . 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 2210 . . . . . . . . 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 2557 . . 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 2517 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 1332   E.wex 1469   e. wcel 1481   {cab 2126   A.wral 2417   E.wrex 2418   {crab 2421   _Vcvv 2689   C_ wss 3076   <.cop 3535   U.cuni 3744   |^|cint 3779   class class class wbr 3937   "cima 4550   Fun wfun 5125   -onto->wfo 5129   ` cfv 5131   1stc1st 6044   2ndc2nd 6045   Q.cnq 7112   <Q cltq 7117   P.cnp 7123   <P cltp 7127
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 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-13 1492  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-coll 4051  ax-sep 4054  ax-nul 4062  ax-pow 4106  ax-pr 4139  ax-un 4363  ax-setind 4460  ax-iinf 4510
This theorem depends on definitions:  df-bi 116  df-dc 821  df-3or 964  df-3an 965  df-tru 1335  df-fal 1338  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ne 2310  df-ral 2422  df-rex 2423  df-reu 2424  df-rab 2426  df-v 2691  df-sbc 2914  df-csb 3008  df-dif 3078  df-un 3080  df-in 3082  df-ss 3089  df-nul 3369  df-pw 3517  df-sn 3538  df-pr 3539  df-op 3541  df-uni 3745  df-int 3780  df-iun 3823  df-br 3938  df-opab 3998  df-mpt 3999  df-tr 4035  df-eprel 4219  df-id 4223  df-po 4226  df-iso 4227  df-iord 4296  df-on 4298  df-suc 4301  df-iom 4513  df-xp 4553  df-rel 4554  df-cnv 4555  df-co 4556  df-dm 4557  df-rn 4558  df-res 4559  df-ima 4560  df-iota 5096  df-fun 5133  df-fn 5134  df-f 5135  df-f1 5136  df-fo 5137  df-f1o 5138  df-fv 5139  df-ov 5785  df-oprab 5786  df-mpo 5787  df-1st 6046  df-2nd 6047  df-recs 6210  df-irdg 6275  df-1o 6321  df-oadd 6325  df-omul 6326  df-er 6437  df-ec 6439  df-qs 6443  df-ni 7136  df-pli 7137  df-mi 7138  df-lti 7139  df-plpq 7176  df-mpq 7177  df-enq 7179  df-nqqs 7180  df-plqqs 7181  df-mqqs 7182  df-1nqqs 7183  df-rq 7184  df-ltnqqs 7185  df-inp 7298  df-iltp 7302
This theorem is referenced by:  suplocexprlemex  7554
  Copyright terms: Public domain W3C validator