ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  suplocexprlemloc Unicode version
Theorem suplocexprlemloc 7940
Description: Lemma for suplocexpr 7944. 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 110 . . . . 5 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> q <Q r )
2 ltbtwnnqq 7634 . . . . 5 |- ( q <Q r <-> E. v e. Q. ( q <Q v /\ v <Q r ) )
31, 2sylib 122 . . . 4 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> E. v e. Q. ( q <Q v /\ v <Q r ) )
4 simplll 535 . . . . . . 7 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> ph )
5 simprl 531 . . . . . . . 8 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> q e. Q. )
65ad2antrr 488 . . . . . . 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 531 . . . . . . 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 310 . . . . . 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 541 . . . . . 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 7813 . . . . . . . . 9 |- ( q <Q v -> <. { l | l <Q q } , { u | q <Q u } >. <P <. { l | l <Q v } , { u | v <Q u } >. )
1110adantl 277 . . . . . . . 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 4092 . . . . . . . . . 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 4092 . . . . . . . . . . . 12 |- ( y = <. { l | l <Q v } , { u | v <Q u } >. -> ( z <P y <-> z <P <. { l | l <Q v } , { u | v <Q u } >. ) )
1413ralbidv 2532 . . . . . . . . . . 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 797 . . . . . . . . . 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 234 . . . . . . . . 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 4091 . . . . . . . . . . . 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 4091 . . . . . . . . . . . . . 14 |- ( x = <. { l | l <Q q } , { u | q <Q u } >. -> ( x <P z <-> <. { l | l <Q q } , { u | q <Q u } >. <P z ) )
1918rexbidv 2533 . . . . . . . . . . . . 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 798 . . . . . . . . . . . 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 234 . . . . . . . . . . 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 2532 . . . . . . . . . 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 488 . . . . . . . . . 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 537 . . . . . . . . . . 11 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> q e. Q. )
26 nqprlu 7766 . . . . . . . . . . 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 2915 . . . . . . . . 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 538 . . . . . . . . . 10 |- ( ( ( ph /\ ( q e. Q. /\ v e. Q. ) ) /\ q <Q v ) -> v e. Q. )
30 nqprlu 7766 . . . . . . . . . 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 2915 . . . . . . . 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 110 . . . . . . . . . . . 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 488 . . . . . . . . . . . . 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 7934 . . . . . . . . . . . . . . 15 |- ( ph -> A C_ P. )
3938ad4antr 494 . . . . . . . . . . . . . 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 529 . . . . . . . . . . . . . 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 3228 . . . . . . . . . . . . 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 7725 . . . . . . . . . . . . 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 411 . . . . . . . . . . . 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 147 . . . . . . . . . . 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 2805 . . . . . . . . . . . . . 14 |- w e. _V
46 breq2 4092 . . . . . . . . . . . . . 14 |- ( u = w -> ( q <Q u <-> q <Q w ) )
47 ltnqex 7768 . . . . . . . . . . . . . . 15 |- { l | l <Q q } e. _V
48 gtnqex 7769 . . . . . . . . . . . . . . 15 |- { u | q <Q u } e. _V
4947, 48op2nd 6309 . . . . . . . . . . . . . 14 |- ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) = { u | q <Q u }
5045, 46, 49elab2 2954 . . . . . . . . . . . . 13 |- ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) <-> q <Q w )
5150anbi1i 458 . . . . . . . . . . . 12 |- ( ( w e. ( 2nd ` <. { l | l <Q q } , { u | q <Q u } >. ) /\ w e. ( 1st ` z ) ) <-> ( q <Q w /\ w e. ( 1st ` z ) ) )
5251rexbii 2539 . . . . . . . . . . 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 122 . . . . . . . . . 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 536 . . . . . . . . . . . . . 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 541 . . . . . . . . . . . . . . 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 276 . . . . . . . . . . . . . . . . 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 7694 . . . . . . . . . . . . . . . . 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 542 . . . . . . . . . . . . . . . 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 7703 . . . . . . . . . . . . . . . 16 |- ( ( <. ( 1st ` z ) , ( 2nd ` z ) >. e. P. /\ w e. ( 1st ` z ) ) -> ( q <Q w -> q e. ( 1st ` z ) ) )
6158, 59, 60syl2anc 411 . . . . . . . . . . . . . . 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 306 . . . . . . . . . . . . 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 1639 . . . . . . . . . . . 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 2516 . . . . . . . . . . . 12 |- ( E. z e. A q e. ( 1st ` z ) <-> E. z ( z e. A /\ q e. ( 1st ` z ) ) )
6664, 65sylibr 134 . . . . . . . . . . 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 7932 . . . . . . . . . . 11 |- ( q e. U. ( 1st " A ) <-> E. z e. A q e. ( 1st ` z ) )
6866, 67sylibr 134 . . . . . . . . . 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 2655 . . . . . . . . 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 2653 . . . . . . . 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 6320 . . . . . . . . . . . . . . 15 |- 2nd : _V -onto-> _V
72 fofun 5560 . . . . . . . . . . . . . . 15 |- ( 2nd : _V -onto-> _V -> Fun 2nd )
7371, 72ax-mp 5 . . . . . . . . . . . . . 14 |- Fun 2nd
74 fvelima 5697 . . . . . . . . . . . . . 14 |- ( ( Fun 2nd /\ s e. ( 2nd " A ) ) -> E. t e. A ( 2nd ` t ) = s )
7573, 74mpan 424 . . . . . . . . . . . . 13 |- ( s e. ( 2nd " A ) -> E. t e. A ( 2nd ` t ) = s )
7675adantl 277 . . . . . . . . . . . 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 4091 . . . . . . . . . . . . . . 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 536 . . . . . . . . . . . . . . 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 531 . . . . . . . . . . . . . . 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 2915 . . . . . . . . . . . . . 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 492 . . . . . . . . . . . . . . 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 496 . . . . . . . . . . . . . . . 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 3228 . . . . . . . . . . . . . . 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 7771 . . . . . . . . . . . . . . 15 |- ( ( v e. Q. /\ t e. P. ) -> ( v e. ( 2nd ` t ) <-> t <P <. { l | l <Q v } , { u | v <Q u } >. ) )
8581, 83, 84syl2anc 411 . . . . . . . . . . . . . 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 167 . . . . . . . . . . . . 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 533 . . . . . . . . . . . . 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 2310 . . . . . . . . . . . 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 2655 . . . . . . . . . . 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 2605 . . . . . . . . . 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 2805 . . . . . . . . . . 11 |- v e. _V
9291elint2 3935 . . . . . . . . . 10 |- ( v e. |^| ( 2nd " A ) <-> A. s e. ( 2nd " A ) v e. s )
9390, 92sylibr 134 . . . . . . . . 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 115 . . . . . . . 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 793 . . . . . . 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 411 . . . . 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 4092 . . . . . . . . . 10 |- ( u = r -> ( w <Q u <-> w <Q r ) )
9998rexbidv 2533 . . . . . . . . 9 |- ( u = r -> ( E. w e. |^| ( 2nd " A ) w <Q u <-> E. w e. |^| ( 2nd " A ) w <Q r ) )
100 simprr 533 . . . . . . . . . 10 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> r e. Q. )
101100ad3antrrr 492 . . . . . . . . 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 110 . . . . . . . . . 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 542 . . . . . . . . . . 11 |- ( ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) /\ ( v e. Q. /\ ( q <Q v /\ v <Q r ) ) ) -> v <Q r )
104103adantr 276 . . . . . . . . . 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 4091 . . . . . . . . . . 11 |- ( w = v -> ( w <Q r <-> v <Q r ) )
106105rspcev 2910 . . . . . . . . . 10 |- ( ( v e. |^| ( 2nd " A ) /\ v <Q r ) -> E. w e. |^| ( 2nd " A ) w <Q r )
107102, 104, 106syl2anc 411 . . . . . . . . 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 2964 . . . . . . . 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 7933 . . . . . . . . . . 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 2301 . . . . . . . . 9 |- ( ph -> ( r e. ( 2nd ` B ) <-> r e. { u e. Q. | E. w e. |^| ( 2nd " A ) w <Q u } ) )
113112ad4antr 494 . . . . . . . 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 167 . . . . . . 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 115 . . . . . 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 795 . . . . 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 2655 . . 3 |- ( ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) /\ q <Q r ) -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) )
119118ex 115 . 2 |- ( ( ph /\ ( q e. Q. /\ r e. Q. ) ) -> ( q <Q r -> ( q e. U. ( 1st " A ) \/ r e. ( 2nd ` B ) ) ) )
120119ralrimivva 2614 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 104   <-> wb 105   \/ wo 715   = wceq 1397   E.wex 1540   e. wcel 2202   {cab 2217   A.wral 2510   E.wrex 2511   {crab 2514   _Vcvv 2802   C_ wss 3200   <.cop 3672   U.cuni 3893   |^|cint 3928   class class class wbr 4088   "cima 4728   Fun wfun 5320   -onto->wfo 5324   ` cfv 5326   1stc1st 6300   2ndc2nd 6301   Q.cnq 7499   <Q cltq 7504   P.cnp 7510   <P cltp 7514
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-in1 619  ax-in2 620  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-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4204  ax-sep 4207  ax-nul 4215  ax-pow 4264  ax-pr 4299  ax-un 4530  ax-setind 4635  ax-iinf 4686
This theorem depends on definitions:  df-bi 117  df-dc 842  df-3or 1005  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ne 2403  df-ral 2515  df-rex 2516  df-reu 2517  df-rab 2519  df-v 2804  df-sbc 3032  df-csb 3128  df-dif 3202  df-un 3204  df-in 3206  df-ss 3213  df-nul 3495  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-int 3929  df-iun 3972  df-br 4089  df-opab 4151  df-mpt 4152  df-tr 4188  df-eprel 4386  df-id 4390  df-po 4393  df-iso 4394  df-iord 4463  df-on 4465  df-suc 4468  df-iom 4689  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-iota 5286  df-fun 5328  df-fn 5329  df-f 5330  df-f1 5331  df-fo 5332  df-f1o 5333  df-fv 5334  df-ov 6020  df-oprab 6021  df-mpo 6022  df-1st 6302  df-2nd 6303  df-recs 6470  df-irdg 6535  df-1o 6581  df-oadd 6585  df-omul 6586  df-er 6701  df-ec 6703  df-qs 6707  df-ni 7523  df-pli 7524  df-mi 7525  df-lti 7526  df-plpq 7563  df-mpq 7564  df-enq 7566  df-nqqs 7567  df-plqqs 7568  df-mqqs 7569  df-1nqqs 7570  df-rq 7571  df-ltnqqs 7572  df-inp 7685  df-iltp 7689
This theorem is referenced by:  suplocexprlemex  7941
  Copyright terms: Public domain W3C validator