Theorem caucvgprprlemval 6786

Description: Lemma for caucvgprpr 6810. Cauchy condition expressed in terms of classes. (Contributed by Jim Kingdon, 3-Mar-2021.)

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 } >. ) ) ) )

Assertion

Ref	Expression
caucvgprprlemval	|- ( ( ph /\ A <N B ) -> ( ( F ` A ) <P ( ( F ` B ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) ) )

Distinct variable groups:   A, l   u, A   A, p, l   A, q, u   k, F, n   k, l, n   u, k, n

Allowed substitution hints:   ph( u, k, n, q, p, l)   A( k, n)   B( u, k, n, q, p, l)   F( u, q, p, l)

Proof of Theorem caucvgprprlemval

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

Step	Hyp	Ref	Expression
1		ltrelpi 6422	. . . . 5 |- <N C_ ( N. X. N. )
2	1	brel 4392	. . . 4 |- ( A <N B -> ( A e. N. /\ B e. N. ) )
3	2	adantl 262	. . 3 |- ( ( ph /\ A <N B ) -> ( A e. N. /\ B e. N. ) )
4		caucvgprpr.f	. . . . 5 |- ( ph -> F : N. --> P. )
5		caucvgprpr.cau	. . . . 5 |- ( 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 } >. ) ) ) )
6	4, 5	caucvgprprlemcbv 6785	. . . 4 |- ( ph -> A. a e. N. A. b e. N. ( a <N b -> ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) ) ) )
7	6	adantr 261	. . 3 |- ( ( ph /\ A <N B ) -> A. a e. N. A. b e. N. ( a <N b -> ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) ) ) )
8		simpr 103	. . 3 |- ( ( ph /\ A <N B ) -> A <N B )
9		breq1 3767	. . . . 5 |- ( a = A -> ( a <N b <-> A <N b ) )
10		fveq2 5178	. . . . . . 7 |- ( a = A -> ( F ` a ) = ( F ` A ) )
11		opeq1 3549	. . . . . . . . . . . . 13 |- ( a = A -> <. a , 1o >. = <. A , 1o >. )
12	11	eceq1d 6142	. . . . . . . . . . . 12 |- ( a = A -> [ <. a , 1o >. ] ~Q = [ <. A , 1o >. ] ~Q )
13	12	fveq2d 5182	. . . . . . . . . . 11 |- ( a = A -> ( *Q ` [ <. a , 1o >. ] ~Q ) = ( *Q ` [ <. A , 1o >. ] ~Q ) )
14	13	breq2d 3776	. . . . . . . . . 10 |- ( a = A -> ( l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) <-> l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) ) )
15	14	abbidv 2155	. . . . . . . . 9 |- ( a = A -> { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } = { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } )
16	13	breq1d 3774	. . . . . . . . . 10 |- ( a = A -> ( ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u <-> ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u ) )
17	16	abbidv 2155	. . . . . . . . 9 |- ( a = A -> { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } = { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } )
18	15, 17	opeq12d 3557	. . . . . . . 8 |- ( a = A -> <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. = <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. )
19	18	oveq2d 5528	. . . . . . 7 |- ( a = A -> ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) = ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) )
20	10, 19	breq12d 3777	. . . . . 6 |- ( a = A -> ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) )
21	10, 18	oveq12d 5530	. . . . . . 7 |- ( a = A -> ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) = ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) )
22	21	breq2d 3776	. . . . . 6 |- ( a = A -> ( ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) )
23	20, 22	anbi12d 442	. . . . 5 |- ( a = A -> ( ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) ) <-> ( ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) )
24	9, 23	imbi12d 223	. . . 4 |- ( a = A -> ( ( a <N b -> ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) ) ) <-> ( A <N b -> ( ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) ) )
25		breq2 3768	. . . . 5 |- ( b = B -> ( A <N b <-> A <N B ) )
26		fveq2 5178	. . . . . . . 8 |- ( b = B -> ( F ` b ) = ( F ` B ) )
27	26	oveq1d 5527	. . . . . . 7 |- ( b = B -> ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) = ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) )
28	27	breq2d 3776	. . . . . 6 |- ( b = B -> ( ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) )
29	26	breq1d 3774	. . . . . 6 |- ( b = B -> ( ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) )
30	28, 29	anbi12d 442	. . . . 5 |- ( b = B -> ( ( ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) <-> ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) )
31	25, 30	imbi12d 223	. . . 4 |- ( b = B -> ( ( A <N b -> ( ( F ` A ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) <-> ( A <N B -> ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) ) )
32	24, 31	rspc2v 2662	. . 3 |- ( ( A e. N. /\ B e. N. ) -> ( A. a e. N. A. b e. N. ( a <N b -> ( ( F ` a ) <P ( ( F ` b ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` b ) <P ( ( F ` a ) +P. <. { l | l <Q ( *Q ` [ <. a , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. a , 1o >. ] ~Q ) <Q u } >. ) ) ) -> ( A <N B -> ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) ) ) )
33	3, 7, 8, 32	syl3c 57	. 2 |- ( ( ph /\ A <N B ) -> ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) )
34		breq1 3767	. . . . . . 7 |- ( l = p -> ( l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) <-> p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) ) )
35	34	cbvabv 2161	. . . . . 6 |- { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } = { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) }
36		breq2 3768	. . . . . . 7 |- ( u = q -> ( ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u <-> ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q ) )
37	36	cbvabv 2161	. . . . . 6 |- { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } = { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q }
38	35, 37	opeq12i 3554	. . . . 5 |- <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. = <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >.
39	38	oveq2i 5523	. . . 4 |- ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) = ( ( F ` B ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. )
40	39	breq2i 3772	. . 3 |- ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` A ) <P ( ( F ` B ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) )
41	38	oveq2i 5523	. . . 4 |- ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) = ( ( F ` A ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. )
42	41	breq2i 3772	. . 3 |- ( ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) <-> ( F ` B ) <P ( ( F ` A ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) )
43	40, 42	anbi12i 433	. 2 |- ( ( ( F ` A ) <P ( ( F ` B ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { l | l <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { u | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q u } >. ) ) <-> ( ( F ` A ) <P ( ( F ` B ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) ) )
44	33, 43	sylib 127	1 |- ( ( ph /\ A <N B ) -> ( ( F ` A ) <P ( ( F ` B ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) /\ ( F ` B ) <P ( ( F ` A ) +P. <. { p | p <Q ( *Q ` [ <. A , 1o >. ] ~Q ) } , { q | ( *Q ` [ <. A , 1o >. ] ~Q ) <Q q } >. ) ) )

Syntax hints:   -> wi 4   /\ wa 97   = wceq 1243   e. wcel 1393   {cab 2026   A.wral 2306   <.cop 3378   class class class wbr 3764   -->wf 4898   ` cfv 4902  (class class class)co 5512   1oc1o 5994   [cec 6104   N.cnpi 6370   <N clti 6373   ~Q ceq 6377   *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-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-14 1405  ax-17 1419  ax-i9 1423  ax-ial 1427  ax-i5r 1428  ax-ext 2022  ax-sep 3875  ax-pow 3927  ax-pr 3944

This theorem depends on definitions:  df-bi 110  df-3an 887  df-tru 1246  df-nf 1350  df-sb 1646  df-clab 2027  df-cleq 2033  df-clel 2036  df-nfc 2167  df-ral 2311  df-rex 2312  df-v 2559  df-un 2922  df-in 2924  df-ss 2931  df-pw 3361  df-sn 3381  df-pr 3382  df-op 3384  df-uni 3581  df-br 3765  df-opab 3819  df-xp 4351  df-cnv 4353  df-dm 4355  df-rn 4356  df-res 4357  df-ima 4358  df-iota 4867  df-fv 4910  df-ov 5515  df-ec 6108  df-lti 6405

This theorem is referenced by:  caucvgprprlemnkltj  6787  caucvgprprlemnjltk  6789  caucvgprprlemnbj  6791