Table of ContentsTable of Contents Mathbox for Jeff Madsen < Previous   Next >
Related theorems
Unicode version

Theorem mettrifi2 15848
Description: Generalized triangle inequality for arbitrary finite sums.
Hypotheses
Ref Expression
mettrifi2.1 |- X = dom dom M
mettrifi2.2 |- S e. _V
Assertion
Ref Expression
mettrifi2 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> ((F` N)M(F` P)) <_ sum_k e. (N...(P - 1))((F` k)M(F` (k + 1))))
Distinct variable groups:   k,M   k,N   k,F   S,k   k,X   P,k

Proof of Theorem mettrifi2
StepHypRef Expression
1 simpll 448 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> M e. Met)
2 eluzadd 15782 . . . . . . . 8 |- ((P e. (ZZ>=` (N + 1)) /\ -uN e. ZZ) -> (P + -uN) e. (ZZ>=` ((N + 1) + -uN)))
3 znegcl 7372 . . . . . . . 8 |- (N e. ZZ -> -uN e. ZZ)
42, 3sylan2 500 . . . . . . 7 |- ((P e. (ZZ>=` (N + 1)) /\ N e. ZZ) -> (P + -uN) e. (ZZ>=` ((N + 1) + -uN)))
54ancoms 484 . . . . . 6 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> (P + -uN) e. (ZZ>=` ((N + 1) + -uN)))
6 eluzelz 7592 . . . . . . . . . 10 |- (P e. (ZZ>=` (N + 1)) -> P e. ZZ)
7 zcn 7349 . . . . . . . . . 10 |- (P e. ZZ -> P e. CC)
86, 7syl 12 . . . . . . . . 9 |- (P e. (ZZ>=` (N + 1)) -> P e. CC)
98adantl 424 . . . . . . . 8 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> P e. CC)
10 zcn 7349 . . . . . . . . 9 |- (N e. ZZ -> N e. CC)
1110adantr 425 . . . . . . . 8 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> N e. CC)
12 negsub 6540 . . . . . . . 8 |- ((P e. CC /\ N e. CC) -> (P + -uN) = (P - N))
139, 11, 12syl11anc 524 . . . . . . 7 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> (P + -uN) = (P - N))
14 peano2z 7375 . . . . . . . . . . . . 13 |- (N e. ZZ -> (N + 1) e. ZZ)
15 zcn 7349 . . . . . . . . . . . . 13 |- ((N + 1) e. ZZ -> (N + 1) e. CC)
1614, 15syl 12 . . . . . . . . . . . 12 |- (N e. ZZ -> (N + 1) e. CC)
17 negsub 6540 . . . . . . . . . . . 12 |- (((N + 1) e. CC /\ N e. CC) -> ((N + 1) + -uN) = ((N + 1) - N))
1816, 10, 17syl11anc 524 . . . . . . . . . . 11 |- (N e. ZZ -> ((N + 1) + -uN) = ((N + 1) - N))
19 pncan2 6558 . . . . . . . . . . . 12 |- ((N e. CC /\ 1 e. CC) -> ((N + 1) - N) = 1)
20 ax1cn 6422 . . . . . . . . . . . 12 |- 1 e. CC
2119, 10, 20sylancl 525 . . . . . . . . . . 11 |- (N e. ZZ -> ((N + 1) - N) = 1)
2218, 21eqtrd 1925 . . . . . . . . . 10 |- (N e. ZZ -> ((N + 1) + -uN) = 1)
2322fveq2d 4685 . . . . . . . . 9 |- (N e. ZZ -> (ZZ>=` ((N + 1) + -uN)) = (ZZ>=`
1))
24 nnuz 7608 . . . . . . . . 9 |- NN = (ZZ>=` 1)
2523, 24syl6eqr 1946 . . . . . . . 8 |- (N e. ZZ -> (ZZ>=` ((N + 1) + -uN)) = NN)
2625adantr 425 . . . . . . 7 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> (ZZ>=`
((N + 1) + -uN)) = NN)
2713, 26eleq12d 1965 . . . . . 6 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> ((P + -uN) e. (ZZ>=` ((N + 1) + -uN)) <-> (P - N) e. NN))
285, 27mpbid 212 . . . . 5 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> (P - N) e. NN)
29283adant3 896 . . . 4 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (P - N) e. NN)
3029adantl 424 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (P - N) e. NN)
31 mettrifi2.2 . . . . . . . . . 10 |- S e. _V
32 fex 4595 . . . . . . . . . 10 |- ((F:S-->X /\ S e. _V) -> F e. _V)
3331, 32mpan2 760 . . . . . . . . 9 |- (F:S-->X -> F e. _V)
34 opreq1 4889 . . . . . . . . . . . . 13 |- (f = F -> (f shift -u(N - 1)) = (F shift -u(N - 1)))
3534fveq1d 4683 . . . . . . . . . . . 12 |- (f = F -> ((f shift -u(N - 1))` k) = ((F shift -u(N - 1))` k))
36 fveq1 4680 . . . . . . . . . . . 12 |- (f = F -> (f` ((N - 1) + k)) = (F` ((N - 1) + k)))
3735, 36eqeq12d 1899 . . . . . . . . . . 11 |- (f = F -> (((f shift -u(N - 1))` k) = (f` ((N - 1) + k)) <-> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k))))
3837imbi2d 674 . . . . . . . . . 10 |- (f = F -> ((((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1))) -> ((f shift -u(N - 1))` k) = (f` ((N - 1) + k))) <-> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k)))))
39 visset 2295 . . . . . . . . . . . 12 |- f e. _V
4039shftval4 7762 . . . . . . . . . . 11 |- (((N - 1) e. CC /\ k e. CC) -> ((f shift -u(N - 1))` k) = (f` ((N - 1) + k)))
41 subcl 6524 . . . . . . . . . . . . 13 |- ((N e. CC /\ 1 e. CC) -> (N - 1) e. CC)
4241, 10, 20sylancl 525 . . . . . . . . . . . 12 |- (N e. ZZ -> (N - 1) e. CC)
43423ad2ant1 897 . . . . . . . . . . 11 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (N - 1) e. CC)
44 elfzuz 7658 . . . . . . . . . . . 12 |- (k e. (1...((P - N) + 1)) -> k e. (ZZ>=`
1))
45 eluzelz 7592 . . . . . . . . . . . 12 |- (k e. (ZZ>=`
1) -> k e. ZZ)
46 zcn 7349 . . . . . . . . . . . 12 |- (k e. ZZ -> k e. CC)
4744, 45, 463syl 24 . . . . . . . . . . 11 |- (k e. (1...((P - N) + 1)) -> k e. CC)
4840, 43, 47syl2an 503 . . . . . . . . . 10 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1))) -> ((f shift -u(N - 1))` k) = (f` ((N - 1) + k)))
4938, 48vtoclg 2346 . . . . . . . . 9 |- (F e. _V -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k))))
5033, 49syl 12 . . . . . . . 8 |- (F:S-->X -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k))))
5150imp 377 . . . . . . 7 |- ((F:S-->X /\ ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...((P - N) + 1)))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k)))
5251anassrs 489 . . . . . 6 |- (((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k)))
5352adantlll 432 . . . . 5 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) = (F` ((N - 1) + k)))
54 1z 7368 . . . . . . . . . . . . 13 |- 1 e. ZZ
5554a1i 8 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> 1 e. ZZ)
5663ad2ant2 898 . . . . . . . . . . . . . . 15 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> P e. ZZ)
57 simp1 876 . . . . . . . . . . . . . . 15 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> N e. ZZ)
58 zsubcl 7377 . . . . . . . . . . . . . . 15 |- ((P e. ZZ /\ N e. ZZ) -> (P - N) e. ZZ)
5956, 57, 58syl11anc 524 . . . . . . . . . . . . . 14 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (P - N) e. ZZ)
6059peano2zdi 7376 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> ((P - N) + 1) e. ZZ)
6160ad2antlr 441 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((P - N) + 1) e. ZZ)
62 elfzelz 7652 . . . . . . . . . . . . 13 |- (k e. (1...((P - N) + 1)) -> k e. ZZ)
6362adantl 424 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> k e. ZZ)
64 peano2zm 7378 . . . . . . . . . . . . . 14 |- (N e. ZZ -> (N - 1) e. ZZ)
65643ad2ant1 897 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (N - 1) e. ZZ)
6665ad2antlr 441 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (N - 1) e. ZZ)
67 fzaddel 7672 . . . . . . . . . . . 12 |- (((1 e. ZZ /\ ((P - N) + 1) e. ZZ) /\ (k e. ZZ /\ (N - 1) e. ZZ)) -> (k e. (1...((P - N) + 1)) <-> (k + (N - 1)) e. ((1 + (N - 1))...(((P - N) + 1) + (N - 1)))))
6855, 61, 63, 66, 67syl22anc 1101 . . . . . . . . . . 11 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (k e. (1...((P - N) + 1)) <-> (k + (N - 1)) e. ((1 + (N - 1))...(((P - N) + 1) + (N - 1)))))
6968biimpd 170 . . . . . . . . . 10 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (k e. (1...((P - N) + 1)) -> (k + (N - 1)) e. ((1 + (N - 1))...(((P - N) + 1) + (N - 1)))))
7047adantl 424 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> k e. CC)
7143ad2antlr 441 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (N - 1) e. CC)
72 addcom 6458 . . . . . . . . . . . 12 |- ((k e. CC /\ (N - 1) e. CC) -> (k + (N - 1)) = ((N - 1) + k))
7370, 71, 72syl11anc 524 . . . . . . . . . . 11 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (k + (N - 1)) = ((N - 1) + k))
74 pncan3 6534 . . . . . . . . . . . . . 14 |- ((1 e. CC /\ N e. CC) -> (1 + (N - 1)) = N)
75103ad2ant1 897 . . . . . . . . . . . . . 14 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> N e. CC)
7674, 20, 75sylancr 526 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (1 + (N - 1)) = N)
7783ad2ant2 898 . . . . . . . . . . . . . 14 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> P e. CC)
78 addcl 6454 . . . . . . . . . . . . . . . . 17 |- (((P - N) e. CC /\ 1 e. CC) -> ((P - N) + 1) e. CC)
79 subcl 6524 . . . . . . . . . . . . . . . . . 18 |- ((P e. CC /\ N e. CC) -> (P - N) e. CC)
8079ancoms 484 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC) -> (P - N) e. CC)
8178, 80, 20sylancl 525 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC) -> ((P - N) + 1) e. CC)
82 simpl 346 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC) -> N e. CC)
8320a1i 8 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC) -> 1 e. CC)
84 addsub12 6545 . . . . . . . . . . . . . . . 16 |- ((((P - N) + 1) e. CC /\ N e. CC /\ 1 e. CC) -> (((P - N) + 1) + (N - 1)) = (N + (((P - N) + 1) - 1)))
8581, 82, 83, 84syl111anc 1100 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ P e. CC) -> (((P - N) + 1) + (N - 1)) = (N + (((P - N) + 1) - 1)))
86 pncan 6557 . . . . . . . . . . . . . . . . 17 |- (((P - N) e. CC /\ 1 e. CC) -> (((P - N) + 1) - 1) = (P - N))
8786, 80, 20sylancl 525 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC) -> (((P - N) + 1) - 1) = (P - N))
8887opreq2d 4898 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ P e. CC) -> (N + (((P - N) + 1) - 1)) = (N + (P - N)))
89 pncan3 6534 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ P e. CC) -> (N + (P - N)) = P)
9085, 88, 893eqtrd 1929 . . . . . . . . . . . . . 14 |- ((N e. CC /\ P e. CC) -> (((P - N) + 1) + (N - 1)) = P)
9175, 77, 90syl11anc 524 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((P - N) + 1) + (N - 1)) = P)
9276, 91opreq12d 4900 . . . . . . . . . . . 12 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> ((1 + (N - 1))...(((P - N) + 1) + (N - 1))) = (N...P))
9392ad2antlr 441 . . . . . . . . . . 11 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((1 + (N - 1))...(((P - N) + 1) + (N - 1))) = (N...P))
9473, 93eleq12d 1965 . . . . . . . . . 10 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((k + (N - 1)) e. ((1 + (N - 1))...(((P - N) + 1) + (N - 1))) <-> ((N - 1) + k) e. (N...P)))
9569, 94sylibd 219 . . . . . . . . 9 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (k e. (1...((P - N) + 1)) -> ((N - 1) + k) e. (N...P)))
9695ex 402 . . . . . . . 8 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (k e. (1...((P - N) + 1)) -> (k e. (1...((P - N) + 1)) -> ((N - 1) + k) e. (N...P))))
9796pm2.43d 79 . . . . . . 7 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (k e. (1...((P - N) + 1)) -> ((N - 1) + k) e. (N...P)))
98 ffvelrn 4787 . . . . . . . . . . . 12 |- ((F:S-->X /\ ((N - 1) + k) e. S) -> (F` ((N - 1) + k)) e. X)
9998ex 402 . . . . . . . . . . 11 |- (F:S-->X -> (((N - 1) + k) e. S -> (F` ((N - 1) + k)) e. X))
100 ssel2 2616 . . . . . . . . . . 11 |- (((N...P) C_ S /\ ((N - 1) + k) e. (N...P)) -> ((N - 1) + k) e. S)
10199, 100syl5 20 . . . . . . . . . 10 |- (F:S-->X -> (((N...P) C_ S /\ ((N - 1) + k) e. (N...P)) -> (F` ((N - 1) + k)) e. X))
102101expdimp 406 . . . . . . . . 9 |- ((F:S-->X /\ (N...P) C_ S) -> (((N - 1) + k) e. (N...P) -> (F` ((N - 1) + k)) e. X))
1031023ad2antr3 1043 . . . . . . . 8 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (((N - 1) + k) e. (N...P) -> (F` ((N - 1) + k)) e. X))
104103adantll 428 . . . . . . 7 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (((N - 1) + k) e. (N...P) -> (F` ((N - 1) + k)) e. X))
10597, 104syld 30 . . . . . 6 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (k e. (1...((P - N) + 1)) -> (F` ((N - 1) + k)) e. X))
106105imp 377 . . . . 5 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> (F` ((N - 1) + k)) e. X)
10753, 106eqeltrd 1971 . . . 4 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...((P - N) + 1))) -> ((F shift -u(N - 1))` k) e. X)
108107r19.21aiva 2176 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> A.k e. (1...((P - N) + 1))((F shift -u(N - 1))` k) e. X)
109 fveq2 4681 . . . . . . 7 |- (j = k -> ((F shift -u(N - 1))` j) = ((F shift -u(N - 1))` k))
110 opreq1 4889 . . . . . . . 8 |- (j = k -> (j + 1) = (k + 1))
111110fveq2d 4685 . . . . . . 7 |- (j = k -> ((F shift -u(N - 1))` (j + 1)) = ((F shift -u(N - 1))` (k + 1)))
112109, 111opreq12d 4900 . . . . . 6 |- (j = k -> (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))) = (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
113 eqid 1884 . . . . . 6 |- {<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))} = {<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}
114 oprex 4907 . . . . . 6 |- (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. _V
115112, 113, 114fvopab4 4743 . . . . 5 |- (k e. (1...(P - N)) -> ({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
116115rgen 2159 . . . 4 |- A.k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1)))
117116a1i 8 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> A.k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
118 mettrifi2.1 . . . 4 |- X = dom dom M
119118mettrifi 15847 . . 3 |- (((M e. Met /\ (P - N) e. NN) /\ (A.k e. (1...((P - N) + 1))((F shift -u(N - 1))` k) e. X /\ A.k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) <_ sum_k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k))
1201, 30, 108, 117, 119syl22anc 1101 . 2 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) <_ sum_k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k))
12134fveq1d 4683 . . . . . . . . 9 |- (f = F -> ((f shift -u(N - 1))` 1) = ((F shift -u(N - 1))` 1))
12234fveq1d 4683 . . . . . . . . 9 |- (f = F -> ((f shift -u(N - 1))` ((P - N) + 1)) = ((F shift -u(N - 1))` ((P - N) + 1)))
123121, 122opreq12d 4900 . . . . . . . 8 |- (f = F -> (((f shift -u(N - 1))` 1)M((f shift -u(N - 1))` ((P - N) + 1))) = (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))))
124 fveq1 4680 . . . . . . . . 9 |- (f = F -> (f` N) = (F` N))
125 fveq1 4680 . . . . . . . . 9 |- (f = F -> (f` P) = (F` P))
126124, 125opreq12d 4900 . . . . . . . 8 |- (f = F -> ((f` N)M(f` P)) = ((F` N)M(F` P)))
127123, 126eqeq12d 1899 . . . . . . 7 |- (f = F -> ((((f shift -u(N - 1))` 1)M((f shift -u(N - 1))` ((P - N) + 1))) = ((f` N)M(f` P)) <-> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P))))
128127imbi2d 674 . . . . . 6 |- (f = F -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((f shift -u(N - 1))` 1)M((f shift -u(N - 1))` ((P - N) + 1))) = ((f` N)M(f` P))) <-> ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P)))))
12939shftval4 7762 . . . . . . . . . 10 |- (((N - 1) e. CC /\ 1 e. CC) -> ((f shift -u(N - 1))` 1) = (f` ((N - 1) + 1)))
13020, 41mpan2 760 . . . . . . . . . . 11 |- (N e. CC -> (N - 1) e. CC)
131130adantr 425 . . . . . . . . . 10 |- ((N e. CC /\ P e. CC) -> (N - 1) e. CC)
132129, 131, 20sylancl 525 . . . . . . . . 9 |- ((N e. CC /\ P e. CC) -> ((f shift -u(N - 1))` 1) = (f` ((N - 1) + 1)))
133 npcan 6559 . . . . . . . . . . 11 |- ((N e. CC /\ 1 e. CC) -> ((N - 1) + 1) = N)
13420a1i 8 . . . . . . . . . . 11 |- (P e. CC -> 1 e. CC)
135133, 134sylan2 500 . . . . . . . . . 10 |- ((N e. CC /\ P e. CC) -> ((N - 1) + 1) = N)
136135fveq2d 4685 . . . . . . . . 9 |- ((N e. CC /\ P e. CC) -> (f` ((N - 1) + 1)) = (f` N))
137132, 136eqtrd 1925 . . . . . . . 8 |- ((N e. CC /\ P e. CC) -> ((f shift -u(N - 1))` 1) = (f` N))
13839shftval4 7762 . . . . . . . . . 10 |- (((N - 1) e. CC /\ ((P - N) + 1) e. CC) -> ((f shift -u(N - 1))` ((P - N) + 1)) = (f` ((N - 1) + ((P - N) + 1))))
139131, 81, 138syl11anc 524 . . . . . . . . 9 |- ((N e. CC /\ P e. CC) -> ((f shift -u(N - 1))` ((P - N) + 1)) = (f` ((N - 1) + ((P - N) + 1))))
140 subadd23 6544 . . . . . . . . . . . 12 |- ((N e. CC /\ 1 e. CC /\ ((P - N) + 1) e. CC) -> ((N - 1) + ((P - N) + 1)) = (N + (((P - N) + 1) - 1)))
14182, 83, 81, 140syl111anc 1100 . . . . . . . . . . 11 |- ((N e. CC /\ P e. CC) -> ((N - 1) + ((P - N) + 1)) = (N + (((P - N) + 1) - 1)))
142141, 88, 893eqtrd 1929 . . . . . . . . . 10 |- ((N e. CC /\ P e. CC) -> ((N - 1) + ((P - N) + 1)) = P)
143142fveq2d 4685 . . . . . . . . 9 |- ((N e. CC /\ P e. CC) -> (f` ((N - 1) + ((P - N) + 1))) = (f` P))
144139, 143eqtrd 1925 . . . . . . . 8 |- ((N e. CC /\ P e. CC) -> ((f shift -u(N - 1))` ((P - N) + 1)) = (f` P))
145137, 144opreq12d 4900 . . . . . . 7 |- ((N e. CC /\ P e. CC) -> (((f shift -u(N - 1))` 1)M((f shift -u(N - 1))` ((P - N) + 1))) = ((f` N)M(f` P)))
14675, 77, 145syl11anc 524 . . . . . 6 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((f shift -u(N - 1))` 1)M((f shift -u(N - 1))` ((P - N) + 1))) = ((f` N)M(f` P)))
147128, 146vtoclg 2346 . . . . 5 |- (F e. _V -> ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P))))
14833, 147syl 12 . . . 4 |- (F:S-->X -> ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P))))
149148imp 377 . . 3 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P)))
150149adantll 428 . 2 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (((F shift -u(N - 1))` 1)M((F shift -u(N - 1))` ((P - N) + 1))) = ((F` N)M(F` P)))
151115sumeq2i 8248 . . . 4 |- sum_k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = sum_k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1)))
152151a1i 8 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = sum_k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
15328, 24syl6eleq 1981 . . . . . 6 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> (P - N) e. (ZZ>=` 1))
1541533adant3 896 . . . . 5 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> (P - N) e. (ZZ>=` 1))
155154adantl 424 . . . 4 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (P - N) e. (ZZ>=` 1))
15665adantl 424 . . . 4 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> (N - 1) e. ZZ)
157 simplll 452 . . . . . . 7 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> M e. Met)
158 oprex 4907 . . . . . . . . 9 |- (P - N) e. _V
159158fzelp1i 7682 . . . . . . . 8 |- (k e. (1...(P - N)) -> k e. (1...((P - N) + 1)))
160107, 159sylan2 500 . . . . . . 7 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` k) e. X)
16134fveq1d 4683 . . . . . . . . . . . . . . . 16 |- (f = F -> ((f shift -u(N - 1))` (k + 1)) = ((F shift -u(N - 1))` (k + 1)))
162 fveq1 4680 . . . . . . . . . . . . . . . 16 |- (f = F -> (f` ((N - 1) + (k + 1))) = (F` ((N - 1) + (k + 1))))
163161, 162eqeq12d 1899 . . . . . . . . . . . . . . 15 |- (f = F -> (((f shift -u(N - 1))` (k + 1)) = (f` ((N - 1) + (k + 1))) <-> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1)))))
164163imbi2d 674 . . . . . . . . . . . . . 14 |- (f = F -> ((((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((f shift -u(N - 1))` (k + 1)) = (f` ((N - 1) + (k + 1)))) <-> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1))))))
16539shftval4 7762 . . . . . . . . . . . . . . 15 |- (((N - 1) e. CC /\ (k + 1) e. CC) -> ((f shift -u(N - 1))` (k + 1)) = (f` ((N - 1) + (k + 1))))
166 elfzuz 7658 . . . . . . . . . . . . . . . 16 |- (k e. (1...(P - N)) -> k e. (ZZ>=`
1))
167 peano2z 7375 . . . . . . . . . . . . . . . . 17 |- (k e. ZZ -> (k + 1) e. ZZ)
168 zcn 7349 . . . . . . . . . . . . . . . . 17 |- ((k + 1) e. ZZ -> (k + 1) e. CC)
169167, 168syl 12 . . . . . . . . . . . . . . . 16 |- (k e. ZZ -> (k + 1) e. CC)
170166, 45, 1693syl 24 . . . . . . . . . . . . . . 15 |- (k e. (1...(P - N)) -> (k + 1) e. CC)
171165, 43, 170syl2an 503 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((f shift -u(N - 1))` (k + 1)) = (f` ((N - 1) + (k + 1))))
172164, 171vtoclg 2346 . . . . . . . . . . . . 13 |- (F e. _V -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1)))))
17333, 172syl 12 . . . . . . . . . . . 12 |- (F:S-->X -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1)))))
174173imp 377 . . . . . . . . . . 11 |- ((F:S-->X /\ ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N)))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1))))
175174anassrs 489 . . . . . . . . . 10 |- (((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1))))
176175adantlll 432 . . . . . . . . 9 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` ((N - 1) + (k + 1))))
177 simpl 346 . . . . . . . . . . . . . 14 |- ((N e. CC /\ k e. CC) -> N e. CC)
17820a1i 8 . . . . . . . . . . . . . 14 |- ((N e. CC /\ k e. CC) -> 1 e. CC)
179 peano2cn 6498 . . . . . . . . . . . . . . 15 |- (k e. CC -> (k + 1) e. CC)
180179adantl 424 . . . . . . . . . . . . . 14 |- ((N e. CC /\ k e. CC) -> (k + 1) e. CC)
181 subadd23 6544 . . . . . . . . . . . . . 14 |- ((N e. CC /\ 1 e. CC /\ (k + 1) e. CC) -> ((N - 1) + (k + 1)) = (N + ((k + 1) - 1)))
182177, 178, 180, 181syl111anc 1100 . . . . . . . . . . . . 13 |- ((N e. CC /\ k e. CC) -> ((N - 1) + (k + 1)) = (N + ((k + 1) - 1)))
183 pncan 6557 . . . . . . . . . . . . . . 15 |- ((k e. CC /\ 1 e. CC) -> ((k + 1) - 1) = k)
184 simpr 350 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ k e. CC) -> k e. CC)
185183, 184, 20sylancl 525 . . . . . . . . . . . . . 14 |- ((N e. CC /\ k e. CC) -> ((k + 1) - 1) = k)
186185opreq2d 4898 . . . . . . . . . . . . 13 |- ((N e. CC /\ k e. CC) -> (N + ((k + 1) - 1)) = (N + k))
187 addcom 6458 . . . . . . . . . . . . 13 |- ((N e. CC /\ k e. CC) -> (N + k) = (k + N))
188182, 186, 1873eqtrd 1929 . . . . . . . . . . . 12 |- ((N e. CC /\ k e. CC) -> ((N - 1) + (k + 1)) = (k + N))
189166, 45, 463syl 24 . . . . . . . . . . . 12 |- (k e. (1...(P - N)) -> k e. CC)
190188, 75, 189syl2an 503 . . . . . . . . . . 11 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((N - 1) + (k + 1)) = (k + N))
191190fveq2d 4685 . . . . . . . . . 10 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> (F` ((N - 1) + (k + 1))) = (F` (k + N)))
192191adantll 428 . . . . . . . . 9 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (F` ((N - 1) + (k + 1))) = (F` (k + N)))
193176, 192eqtrd 1925 . . . . . . . 8 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) = (F` (k + N)))
194 simpr 350 . . . . . . . . 9 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> k e. (1...(P - N)))
19554a1i 8 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> 1 e. ZZ)
19659adantr 425 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> (P - N) e. ZZ)
197 elfzelz 7652 . . . . . . . . . . . . . . 15 |- (k e. (1...(P - N)) -> k e. ZZ)
198197adantl 424 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> k e. ZZ)
199 simpl1 879 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> N e. ZZ)
200 fzaddel 7672 . . . . . . . . . . . . . 14 |- (((1 e. ZZ /\ (P - N) e. ZZ) /\ (k e. ZZ /\ N e. ZZ)) -> (k e. (1...(P - N)) <-> (k + N) e. ((1 + N)...((P - N) + N))))
201195, 196, 198, 199, 200syl22anc 1101 . . . . . . . . . . . . 13 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> (k e. (1...(P - N)) <-> (k + N) e. ((1 + N)...((P - N) + N))))
20220a1i 8 . . . . . . . . . . . . . . . . . 18 |- ((P e. CC /\ N e. CC) -> 1 e. CC)
203 addcom 6458 . . . . . . . . . . . . . . . . . 18 |- ((1 e. CC /\ N e. CC) -> (1 + N) = (N + 1))
204202, 203sylancom 531 . . . . . . . . . . . . . . . . 17 |- ((P e. CC /\ N e. CC) -> (1 + N) = (N + 1))
205 npcan 6559 . . . . . . . . . . . . . . . . 17 |- ((P e. CC /\ N e. CC) -> ((P - N) + N) = P)
206204, 205opreq12d 4900 . . . . . . . . . . . . . . . 16 |- ((P e. CC /\ N e. CC) -> ((1 + N)...((P - N) + N)) = ((N + 1)...P))
20777, 75, 206syl11anc 524 . . . . . . . . . . . . . . 15 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> ((1 + N)...((P - N) + N)) = ((N + 1)...P))
208207adantr 425 . . . . . . . . . . . . . 14 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((1 + N)...((P - N) + N)) = ((N + 1)...P))
209208eleq2d 1964 . . . . . . . . . . . . 13 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> ((k + N) e. ((1 + N)...((P - N) + N)) <-> (k + N) e. ((N + 1)...P)))
210201, 209bitrd 587 . . . . . . . . . . . 12 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) /\ k e. (1...(P - N))) -> (k e. (1...(P - N)) <-> (k + N) e. ((N + 1)...P)))
211210adantll 428 . . . . . . . . . . 11 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (k e. (1...(P - N)) <-> (k + N) e. ((N + 1)...P)))
212 fzp1ss 7680 . . . . . . . . . . . . . 14 |- ((N e. ZZ /\ P e. ZZ) -> ((N + 1)...P) C_ (N...P))
21357, 56, 212syl11anc 524 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S) -> ((N + 1)...P) C_ (N...P))
214213ad2antlr 441 . . . . . . . . . . . 12 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((N + 1)...P) C_ (N...P))
215214sseld 2619 . . . . . . . . . . 11 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((k + N) e. ((N + 1)...P) -> (k + N) e. (N...P)))
216211, 215sylbid 220 . . . . . . . . . 10 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (k e. (1...(P - N)) -> (k + N) e. (N...P)))
217 ffvelrn 4787 . . . . . . . . . . . . . . . 16 |- ((F:S-->X /\ (k + N) e. S) -> (F` (k + N)) e. X)
218217ex 402 . . . . . . . . . . . . . . 15 |- (F:S-->X -> ((k + N) e. S -> (F` (k + N)) e. X))
219 ssel2 2616 . . . . . . . . . . . . . . 15 |- (((N...P) C_ S /\ (k + N) e. (N...P)) -> (k + N) e. S)
220218, 219syl5 20 . . . . . . . . . . . . . 14 |- (F:S-->X -> (((N...P) C_ S /\ (k + N) e. (N...P)) -> (F` (k + N)) e. X))
221220expdimp 406 . . . . . . . . . . . . 13 |- ((F:S-->X /\ (N...P) C_ S) -> ((k + N) e. (N...P) -> (F` (k + N)) e. X))
2222213ad2antr3 1043 . . . . . . . . . . . 12 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> ((k + N) e. (N...P) -> (F` (k + N)) e. X))
223222adantr 425 . . . . . . . . . . 11 |- (((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((k + N) e. (N...P) -> (F` (k + N)) e. X))
224223adantlll 432 . . . . . . . . . 10 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((k + N) e. (N...P) -> (F` (k + N)) e. X))
225216, 224syld 30 . . . . . . . . 9 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (k e. (1...(P - N)) -> (F` (k + N)) e. X))
226194, 225mpd 29 . . . . . . . 8 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (F` (k + N)) e. X)
227193, 226eqeltrd 1971 . . . . . . 7 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> ((F shift -u(N - 1))` (k + 1)) e. X)
228118metcl 9088 . . . . . . 7 |- ((M e. Met /\ ((F shift -u(N - 1))` k) e. X /\ ((F shift -u(N - 1))` (k + 1)) e. X) -> (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. RR)
229157, 160, 227, 228syl111anc 1100 . . . . . 6 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. RR)
230229recnd 6468 . . . . 5 |- ((((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) /\ k e. (1...(P - N))) -> (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. CC)
231230r19.21aiva 2176 . . . 4 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> A.k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. CC)
232 fsumshft 8291 . . . 4 |- (((P - N) e. (ZZ>=` 1) /\ (N - 1) e. ZZ /\ A.k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) e. CC) -> sum_k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
233155, 156, 231, 232syl111anc 1100 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_k e. (1...(P - N))(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))))
23420, 74mpan 759 . . . . . . . . . . 11 |- (N e. CC -> (1 + (N - 1)) = N)
235234adantr 425 . . . . . . . . . 10 |- ((N e. CC /\ P e. CC) -> (1 + (N - 1)) = N)
236 npncan 6560 . . . . . . . . . . . 12 |- ((P e. CC /\ N e. CC /\ 1 e. CC) -> ((P - N) + (N - 1)) = (P - 1))
23720, 236mp3an3 1180 . . . . . . . . . . 11 |- ((P e. CC /\ N e. CC) -> ((P - N) + (N - 1)) = (P - 1))
238237ancoms 484 . . . . . . . . . 10 |- ((N e. CC /\ P e. CC) -> ((P - N) + (N - 1)) = (P - 1))
239235, 238opreq12d 4900 . . . . . . . . 9 |- ((N e. CC /\ P e. CC) -> ((1 + (N - 1))...((P - N) + (N - 1))) = (N...(P - 1)))
240239, 10, 8syl2an 503 . . . . . . . 8 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) -> ((1 + (N - 1))...((P - N) + (N - 1))) = (N...(P - 1)))
241240adantl 424 . . . . . . 7 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)))) -> ((1 + (N - 1))...((P - N) + (N - 1))) = (N...(P - 1)))
24234fveq1d 4683 . . . . . . . . . . . . . . 15 |- (f = F -> ((f shift -u(N - 1))` (j - (N - 1))) = ((F shift -u(N - 1))` (j - (N - 1))))
24334fveq1d 4683 . . . . . . . . . . . . . . 15 |- (f = F -> ((f shift -u(N - 1))` ((j - (N - 1)) + 1)) = ((F shift -u(N - 1))` ((j - (N - 1)) + 1)))
244242, 243opreq12d 4900 . . . . . . . . . . . . . 14 |- (f = F -> (((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))))
245 fveq1 4680 . . . . . . . . . . . . . . 15 |- (f = F -> (f` j) = (F` j))
246 fveq1 4680 . . . . . . . . . . . . . . 15 |- (f = F -> (f` (j + 1)) = (F` (j + 1)))
247245, 246opreq12d 4900 . . . . . . . . . . . . . 14 |- (f = F -> ((f` j)M(f` (j + 1))) = ((F` j)M(F` (j + 1))))
248244, 247eqeq12d 1899 . . . . . . . . . . . . 13 |- (f = F -> ((((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((f` j)M(f` (j + 1))) <-> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1)))))
249248imbi2d 674 . . . . . . . . . . . 12 |- (f = F -> ((((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((f` j)M(f` (j + 1)))) <-> (((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1))))))
2501303ad2ant1 897 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (N - 1) e. CC)
251 simp3 878 . . . . . . . . . . . . . . . . . 18 |- ((N e. CC /\ P e. CC /\ j e. CC) -> j e. CC)
252 subcl 6524 . . . . . . . . . . . . . . . . . 18 |- ((j e. CC /\ (N - 1) e. CC) -> (j - (N - 1)) e. CC)
253251, 250, 252syl11anc 524 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (j - (N - 1)) e. CC)
25439shftval4 7762 . . . . . . . . . . . . . . . . 17 |- (((N - 1) e. CC /\ (j - (N - 1)) e. CC) -> ((f shift -u(N - 1))` (j - (N - 1))) = (f` ((N - 1) + (j - (N - 1)))))
255250, 253, 254syl11anc 524 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((f shift -u(N - 1))` (j - (N - 1))) = (f` ((N - 1) + (j - (N - 1)))))
256 pncan3 6534 . . . . . . . . . . . . . . . . . 18 |- (((N - 1) e. CC /\ j e. CC) -> ((N - 1) + (j - (N - 1))) = j)
257250, 251, 256syl11anc 524 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((N - 1) + (j - (N - 1))) = j)
258257fveq2d 4685 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (f` ((N - 1) + (j - (N - 1)))) = (f` j))
259255, 258eqtrd 1925 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((f shift -u(N - 1))` (j - (N - 1))) = (f` j))
260 peano2cn 6498 . . . . . . . . . . . . . . . . . 18 |- ((j - (N - 1)) e. CC -> ((j - (N - 1)) + 1) e. CC)
261253, 260syl 12 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((j - (N - 1)) + 1) e. CC)
26239shftval4 7762 . . . . . . . . . . . . . . . . 17 |- (((N - 1) e. CC /\ ((j - (N - 1)) + 1) e. CC) -> ((f shift -u(N - 1))` ((j - (N - 1)) + 1)) = (f` ((N - 1) + ((j - (N - 1)) + 1))))
263250, 261, 262syl11anc 524 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((f shift -u(N - 1))` ((j - (N - 1)) + 1)) = (f` ((N - 1) + ((j - (N - 1)) + 1))))
26420a1i 8 . . . . . . . . . . . . . . . . . . 19 |- ((N e. CC /\ P e. CC /\ j e. CC) -> 1 e. CC)
265 addass 6460 . . . . . . . . . . . . . . . . . . 19 |- (((N - 1) e. CC /\ (j - (N - 1)) e. CC /\ 1 e. CC) -> (((N - 1) + (j - (N - 1))) + 1) = ((N - 1) + ((j - (N - 1)) + 1)))
266250, 253, 264, 265syl111anc 1100 . . . . . . . . . . . . . . . . . 18 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (((N - 1) + (j - (N - 1))) + 1) = ((N - 1) + ((j - (N - 1)) + 1)))
267257opreq1d 4897 . . . . . . . . . . . . . . . . . 18 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (((N - 1) + (j - (N - 1))) + 1) = (j + 1))
268266, 267eqtr3d 1927 . . . . . . . . . . . . . . . . 17 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((N - 1) + ((j - (N - 1)) + 1)) = (j + 1))
269268fveq2d 4685 . . . . . . . . . . . . . . . 16 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (f` ((N - 1) + ((j - (N - 1)) + 1))) = (f` (j + 1)))
270263, 269eqtrd 1925 . . . . . . . . . . . . . . 15 |- ((N e. CC /\ P e. CC /\ j e. CC) -> ((f shift -u(N - 1))` ((j - (N - 1)) + 1)) = (f` (j + 1)))
271259, 270opreq12d 4900 . . . . . . . . . . . . . 14 |- ((N e. CC /\ P e. CC /\ j e. CC) -> (((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((f` j)M(f` (j + 1))))
272 elfzuz 7658 . . . . . . . . . . . . . . 15 |- (j e. ((1 + (N - 1))...((P - N) + (N - 1))) -> j e. (ZZ>=`
(1 + (N - 1))))
273 eluzelz 7592 . . . . . . . . . . . . . . 15 |- (j e. (ZZ>=`
(1 + (N - 1))) -> j e. ZZ)
274 zcn 7349 . . . . . . . . . . . . . . 15 |- (j e. ZZ -> j e. CC)
275272, 273, 2743syl 24 . . . . . . . . . . . . . 14 |- (j e. ((1 + (N - 1))...((P - N) + (N - 1))) -> j e. CC)
276271, 10, 8, 275syl3an 1139 . . . . . . . . . . . . 13 |- ((N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((f` j)M(f` (j + 1))))
2772763expa 1067 . . . . . . . . . . . 12 |- (((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((f shift -u(N - 1))` (j - (N - 1)))M((f shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((f` j)M(f` (j + 1))))
278249, 277vtoclg 2346 . . . . . . . . . . 11 |- (F e. _V -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1)))))
27933, 278syl 12 . . . . . . . . . 10 |- (F:S-->X -> (((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1)))))
280279imp 377 . . . . . . . . 9 |- ((F:S-->X /\ ((N e. ZZ /\ P e. (ZZ>=` (N + 1))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1))))) -> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1))))
281280anassrs 489 . . . . . . . 8 |- (((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) = ((F` j)M(F` (j + 1))))
282 oprex 4907 . . . . . . . . 9 |- (j - (N - 1)) e. _V
283 ax-17 1317 . . . . . . . . 9 |- (z e. (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))) -> A.k z e. (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))))
284 fveq2 4681 . . . . . . . . . 10 |- (k = (j - (N - 1)) -> ((F shift -u(N - 1))` k) = ((F shift -u(N - 1))` (j - (N - 1))))
285 opreq1 4889 . . . . . . . . . . 11 |- (k = (j - (N - 1)) -> (k + 1) = ((j - (N - 1)) + 1))
286285fveq2d 4685 . . . . . . . . . 10 |- (k = (j - (N - 1)) -> ((F shift -u(N - 1))` (k + 1)) = ((F shift -u(N - 1))` ((j - (N - 1)) + 1)))
287284, 286opreq12d 4900 . . . . . . . . 9 |- (k = (j - (N - 1)) -> (((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1))))
288282, 283, 287csbief 2576 . . . . . . . 8 |- [_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = (((F shift -u(N - 1))` (j - (N - 1)))M((F shift -u(N - 1))` ((j - (N - 1)) + 1)))
289281, 288syl5eq 1940 . . . . . . 7 |- (((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)))) /\ j e. ((1 + (N - 1))...((P - N) + (N - 1)))) -> [_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = ((F` j)M(F` (j + 1))))
290241, 289sumeq12dv 8255 . . . . . 6 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)))) -> sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_j e. (N...(P - 1))((F` j)M(F` (j + 1))))
2912903adantr3 1037 . . . . 5 |- ((F:S-->X /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_j e. (N...(P - 1))((F` j)M(F` (j + 1))))
292291adantll 428 . . . 4 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_j e. (N...(P - 1))((F` j)M(F` (j + 1))))
293 ax-17 1317 . . . . 5 |- (z e. ((F` j)M(F` (j + 1))) -> A.k z e. ((F` j)M(F` (j + 1))))
294 ax-17 1317 . . . . 5 |- (z e. ((F` k)M(F` (k + 1))) -> A.j z e. ((F` k)M(F` (k + 1))))
295 fveq2 4681 . . . . . 6 |- (j = k -> (F` j) = (F` k))
296110fveq2d 4685 . . . . . 6 |- (j = k -> (F` (j + 1)) = (F` (k + 1)))
297295, 296opreq12d 4900 . . . . 5 |- (j = k -> ((F` j)M(F` (j + 1))) = ((F` k)M(F` (k + 1))))
298293, 294, 297cbvsumi 8246 . . . 4 |- sum_j e. (N...(P - 1))((F` j)M(F` (j + 1))) = sum_k e. (N...(P - 1))((F` k)M(F` (k + 1)))
299292, 298syl6eq 1944 . . 3 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_j e. ((1 + (N - 1))...((P - N) + (N - 1)))[_(j - (N - 1)) / k]_(((F shift -u(N - 1))` k)M((F shift -u(N - 1))` (k + 1))) = sum_k e. (N...(P - 1))((F` k)M(F` (k + 1))))
300152, 233, 2993eqtrd 1929 . 2 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> sum_k e. (1...(P - N))({<.j, z>. | (j e. (1...(P - N)) /\ z = (((F shift -u(N - 1))` j)M((F shift -u(N - 1))` (j + 1))))}` k) = sum_k e. (N...(P - 1))((F` k)M(F` (k + 1))))
301120, 150, 3003brtr3d 3366 1 |- (((M e. Met /\ F:S-->X) /\ (N e. ZZ /\ P e. (ZZ>=` (N + 1)) /\ (N...P) C_ S)) -> ((F` N)M(F` P)) <_ sum_k e. (N...(P - 1))((F` k)M(F` (k + 1))))
Colors of variables: wff set class
Syntax hints:   -> wi 3   <-> wb 163   /\ wa 240   /\ w3a 858   = wceq 1298   e. wcel 1300  A.wral 2105  _Vcvv 2292  [_csb 2540   C_ wss 2593   class class class wbr 3338  {copab 3395  dom cdm 3986  -->wf 3994  ` cfv 3998  (class class class)co 4884  CCcc 6384  RRcr 6385  1c1 6387   + caddc 6389   - cmin 6445  -ucneg 6446   <_ cle 6448  NNcn 6449  ZZcz 6451  ZZ>=cuz 7586  ...cfz 7637   shift cshi 7753  sum_csu 8239  Metcme 9066
This theorem is referenced by:  geomcau 15849
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-5 1302  ax-7 1304  ax-gen 1305  ax-8 1306  ax-9 1307  ax-10 1308  ax-11 1309  ax-12 1310  ax-13 1311  ax-14 1312  ax-17 1317  ax-4 1319  ax-5o 1321  ax-6o 1324  ax-9o 1481  ax-10o 1500  ax-16 1580  ax-11o 1588  ax-ext 1865  ax-rep 3428  ax-sep 3438  ax-nul 3445  ax-pow 3481  ax-pr 3524  ax-un 3790  ax-inf2 5731
This theorem depends on definitions:  df-bi 164  df-or 241  df-an 242  df-3or 859  df-3an 860  df-ex 1327  df-sb 1536  df-eu 1775  df-mo 1776  df-clab 1872  df-cleq 1877  df-clel 1880  df-ne 2019  df-nel 2020  df-ral 2109  df-rex 2110  df-reu 2111  df-rab 2112  df-v 2294  df-sbc 2454  df-csb 2541  df-dif 2597  df-un 2600  df-in 2603  df-ss 2605  df-pss 2607  df-nul 2876  df-if 2983  df-pw 3035  df-sn 3049  df-pr 3050  df-tp 3052  df-op 3053  df-uni 3178  df-int 3215  df-iun 3257  df-br 3339  df-opab 3396  df-tr 3412  df-eprel 3583  df-id 3586  df-po 3591  df-so 3604  df-fr 3625  df-we 3644  df-ord 3660  df-on 3661  df-lim 3662  df-suc 3663  df-om 3950  df-xp 4000  df-rel 4001  df-cnv 4002  df-co 4003  df-dm 4004  df-rn 4005  df-res 4006  df-ima 4007  df-fun 4008  df-fn 4009  df-f 4010  df-f1 4011  df-fo 4012  df-f1o 4013  df-fv 4014  df-opr 4886  df-oprab 4887  df-mpt 5006  df-1st 5020  df-2nd 5021  df-iota 5089  df-rdg 5140  df-1o 5177  df-oadd 5179  df-omul 5180  df-er 5318  df-ec 5320  df-qs 5323  df-en 5427  df-dom 5428  df-sdom 5429  df-undef 5556  df-riota 5560  df-ni 6152  df-pli 6153  df-mi 6154  df-lti 6155  df-plpq 6187  df-mpq 6188  df-enq 6189  df-nq 6190  df-plq 6191  df-mq 6192  df-rq 6193  df-ltq 6194  df-1q 6195  df-np 6238  df-1p 6239  df-plp 6240  df-mp 6241  df-ltp 6242  df-plpr 6316  df-mpr 6317  df-enr 6318  df-nr 6319  df-plr 6320  df-mr 6321  df-ltr 6322  df-0r 6323  df-1r 6324  df-m1r 6325  df-c 6392  df-0 6393  df-1 6394  df-i 6395  df-r 6396  df-plus 6397  df-mul 6398  df-lt 6399  df-sub 6511  df-neg 6513  df-pnf 6654  df-mnf 6655  df-xr 6656  df-ltxr 6657  df-le 6658  df-n 7108  df-2 7154  df-n0 7309  df-z 7345  df-uz 7587  df-fz 7638  df-seq1 7721  df-shft 7754  df-seqz 7776  df-sum 8240  df-met 9070
Copyright terms: Public domain