Theorem prcunqu 7799

Description: An upper cut is closed upwards under the positive fractions. (Contributed by Jim Kingdon, 25-Nov-2019.)

Assertion

Ref	Expression
prcunqu	|- ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q B -> B e. U ) )

Proof of Theorem prcunqu

Dummy variables b c are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ltrelnq 7679	. . . . . 6 |- <Q C_ ( Q. X. Q. )
2	1	brel 4801	. . . . 5 |- ( C <Q B -> ( C e. Q. /\ B e. Q. ) )
3	2	simprd 114	. . . 4 |- ( C <Q B -> B e. Q. )
4	3	adantl 277	. . 3 |- ( ( ( <. L , U >. e. P. /\ C e. U ) /\ C <Q B ) -> B e. Q. )
5		breq2 4112	. . . . . . 7 |- ( b = B -> ( C <Q b <-> C <Q B ) )
6		eleq1 2295	. . . . . . 7 |- ( b = B -> ( b e. U <-> B e. U ) )
7	5, 6	imbi12d 234	. . . . . 6 |- ( b = B -> ( ( C <Q b -> b e. U ) <-> ( C <Q B -> B e. U ) ) )
8	7	imbi2d 230	. . . . 5 |- ( b = B -> ( ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q b -> b e. U ) ) <-> ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q B -> B e. U ) ) ) )
9	1	brel 4801	. . . . . . . 8 |- ( C <Q b -> ( C e. Q. /\ b e. Q. ) )
10		an42 589	. . . . . . . . 9 |- ( ( ( C e. Q. /\ b e. Q. ) /\ ( C e. U /\ <. L , U >. e. P. ) ) <-> ( ( C e. Q. /\ C e. U ) /\ ( <. L , U >. e. P. /\ b e. Q. ) ) )
11		breq1 4111	. . . . . . . . . . . . . . . 16 |- ( c = C -> ( c <Q b <-> C <Q b ) )
12		eleq1 2295	. . . . . . . . . . . . . . . 16 |- ( c = C -> ( c e. U <-> C e. U ) )
13	11, 12	anbi12d 473	. . . . . . . . . . . . . . 15 |- ( c = C -> ( ( c <Q b /\ c e. U ) <-> ( C <Q b /\ C e. U ) ) )
14	13	rspcev 2920	. . . . . . . . . . . . . 14 |- ( ( C e. Q. /\ ( C <Q b /\ C e. U ) ) -> E. c e. Q. ( c <Q b /\ c e. U ) )
15		elinp 7788	. . . . . . . . . . . . . . . 16 |- ( <. L , U >. e. P. <-> ( ( ( L C_ Q. /\ U C_ Q. ) /\ ( E. c e. Q. c e. L /\ E. b e. Q. b e. U ) ) /\ ( ( A. c e. Q. ( c e. L <-> E. b e. Q. ( c <Q b /\ b e. L ) ) /\ A. b e. Q. ( b e. U <-> E. c e. Q. ( c <Q b /\ c e. U ) ) ) /\ A. c e. Q. -. ( c e. L /\ c e. U ) /\ A. c e. Q. A. b e. Q. ( c <Q b -> ( c e. L \/ b e. U ) ) ) ) )
16		simpr1r 1082	. . . . . . . . . . . . . . . 16 |- ( ( ( ( L C_ Q. /\ U C_ Q. ) /\ ( E. c e. Q. c e. L /\ E. b e. Q. b e. U ) ) /\ ( ( A. c e. Q. ( c e. L <-> E. b e. Q. ( c <Q b /\ b e. L ) ) /\ A. b e. Q. ( b e. U <-> E. c e. Q. ( c <Q b /\ c e. U ) ) ) /\ A. c e. Q. -. ( c e. L /\ c e. U ) /\ A. c e. Q. A. b e. Q. ( c <Q b -> ( c e. L \/ b e. U ) ) ) ) -> A. b e. Q. ( b e. U <-> E. c e. Q. ( c <Q b /\ c e. U ) ) )
17	15, 16	sylbi 121	. . . . . . . . . . . . . . 15 |- ( <. L , U >. e. P. -> A. b e. Q. ( b e. U <-> E. c e. Q. ( c <Q b /\ c e. U ) ) )
18	17	r19.21bi 2630	. . . . . . . . . . . . . 14 |- ( ( <. L , U >. e. P. /\ b e. Q. ) -> ( b e. U <-> E. c e. Q. ( c <Q b /\ c e. U ) ) )
19	14, 18	syl5ibrcom 157	. . . . . . . . . . . . 13 |- ( ( C e. Q. /\ ( C <Q b /\ C e. U ) ) -> ( ( <. L , U >. e. P. /\ b e. Q. ) -> b e. U ) )
20	19	3impb 1226	. . . . . . . . . . . 12 |- ( ( C e. Q. /\ C <Q b /\ C e. U ) -> ( ( <. L , U >. e. P. /\ b e. Q. ) -> b e. U ) )
21	20	3com12 1234	. . . . . . . . . . 11 |- ( ( C <Q b /\ C e. Q. /\ C e. U ) -> ( ( <. L , U >. e. P. /\ b e. Q. ) -> b e. U ) )
22	21	3expib 1233	. . . . . . . . . 10 |- ( C <Q b -> ( ( C e. Q. /\ C e. U ) -> ( ( <. L , U >. e. P. /\ b e. Q. ) -> b e. U ) ) )
23	22	impd 254	. . . . . . . . 9 |- ( C <Q b -> ( ( ( C e. Q. /\ C e. U ) /\ ( <. L , U >. e. P. /\ b e. Q. ) ) -> b e. U ) )
24	10, 23	biimtrid 152	. . . . . . . 8 |- ( C <Q b -> ( ( ( C e. Q. /\ b e. Q. ) /\ ( C e. U /\ <. L , U >. e. P. ) ) -> b e. U ) )
25	9, 24	mpand 429	. . . . . . 7 |- ( C <Q b -> ( ( C e. U /\ <. L , U >. e. P. ) -> b e. U ) )
26	25	com12 30	. . . . . 6 |- ( ( C e. U /\ <. L , U >. e. P. ) -> ( C <Q b -> b e. U ) )
27	26	ancoms 268	. . . . 5 |- ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q b -> b e. U ) )
28	8, 27	vtoclg 2874	. . . 4 |- ( B e. Q. -> ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q B -> B e. U ) ) )
29	28	impd 254	. . 3 |- ( B e. Q. -> ( ( ( <. L , U >. e. P. /\ C e. U ) /\ C <Q B ) -> B e. U ) )
30	4, 29	mpcom 36	. 2 |- ( ( ( <. L , U >. e. P. /\ C e. U ) /\ C <Q B ) -> B e. U )
31	30	ex 115	1 |- ( ( <. L , U >. e. P. /\ C e. U ) -> ( C <Q B -> B e. U ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105   \/ wo 716   /\ w3a 1005   = wceq 1398   e. wcel 2203   A.wral 2520   E.wrex 2521   C_ wss 3210   <.cop 3691   class class class wbr 4108   Q.cnq 7594   <Q cltq 7599   P.cnp 7605

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 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-coll 4224  ax-sep 4227  ax-pow 4286  ax-pr 4321  ax-un 4553  ax-iinf 4709

This theorem depends on definitions:  df-bi 117  df-3an 1007  df-tru 1401  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ral 2525  df-rex 2526  df-reu 2527  df-rab 2529  df-v 2814  df-sbc 3042  df-csb 3138  df-dif 3212  df-un 3214  df-in 3216  df-ss 3223  df-pw 3670  df-sn 3694  df-pr 3695  df-op 3697  df-uni 3914  df-int 3949  df-iun 3992  df-br 4109  df-opab 4171  df-mpt 4172  df-id 4413  df-iom 4712  df-xp 4754  df-rel 4755  df-cnv 4756  df-co 4757  df-dm 4758  df-rn 4759  df-res 4760  df-ima 4761  df-iota 5311  df-fun 5353  df-fn 5354  df-f 5355  df-f1 5356  df-fo 5357  df-f1o 5358  df-fv 5359  df-qs 6772  df-ni 7618  df-nqqs 7662  df-ltnqqs 7667  df-inp 7780

This theorem is referenced by:  prarloc  7817  prarloc2  7818  addnqprulem  7842  nqpru  7866  prmuloc2  7881  mulnqpru  7883  distrlem4pru  7899  1idpru  7905  ltexprlemm  7914  ltexprlemupu  7918  ltexprlemrl  7924  ltexprlemfu  7925  ltexprlemru  7926  aptiprlemu  7954  suplocexprlemdisj  8034  suplocexprlemub  8037