Metamath Proof Explorer


Theorem mptnn0fsuppr

Description: A finitely supported mapping from the nonnegative integers fulfills certain conditions. (Contributed by AV, 3-Nov-2019) (Revised by AV, 23-Dec-2019)

Ref Expression
Hypotheses mptnn0fsupp.0 φ0˙V
mptnn0fsupp.c φk0CB
mptnn0fsuppr.s φfinSupp0˙k0C
Assertion mptnn0fsuppr φs0x0s<xx/kC=0˙

Proof

Step Hyp Ref Expression
1 mptnn0fsupp.0 φ0˙V
2 mptnn0fsupp.c φk0CB
3 mptnn0fsuppr.s φfinSupp0˙k0C
4 fsuppimp finSupp0˙k0CFunk0Ck0Csupp0˙Fin
5 2 ralrimiva φk0CB
6 eqid k0C=k0C
7 6 fnmpt k0CBk0CFn0
8 5 7 syl φk0CFn0
9 nn0ex 0V
10 9 a1i φ0V
11 1 elexd φ0˙V
12 8 10 11 3jca φk0CFn00V0˙V
13 12 adantr φFunk0Ck0CFn00V0˙V
14 suppvalfn k0CFn00V0˙Vk0Csupp0˙=x0|k0Cx0˙
15 13 14 syl φFunk0Ck0Csupp0˙=x0|k0Cx0˙
16 simpr φFunk0Cx0x0
17 5 adantr φFunk0Ck0CB
18 17 adantr φFunk0Cx0k0CB
19 rspcsbela x0k0CBx/kCB
20 16 18 19 syl2anc φFunk0Cx0x/kCB
21 6 fvmpts x0x/kCBk0Cx=x/kC
22 16 20 21 syl2anc φFunk0Cx0k0Cx=x/kC
23 22 neeq1d φFunk0Cx0k0Cx0˙x/kC0˙
24 23 rabbidva φFunk0Cx0|k0Cx0˙=x0|x/kC0˙
25 15 24 eqtrd φFunk0Ck0Csupp0˙=x0|x/kC0˙
26 25 eleq1d φFunk0Ck0Csupp0˙Finx0|x/kC0˙Fin
27 26 biimpd φFunk0Ck0Csupp0˙Finx0|x/kC0˙Fin
28 27 expcom Funk0Cφk0Csupp0˙Finx0|x/kC0˙Fin
29 28 com23 Funk0Ck0Csupp0˙Finφx0|x/kC0˙Fin
30 29 imp Funk0Ck0Csupp0˙Finφx0|x/kC0˙Fin
31 4 30 syl finSupp0˙k0Cφx0|x/kC0˙Fin
32 3 31 mpcom φx0|x/kC0˙Fin
33 rabssnn0fi x0|x/kC0˙Fins0x0s<x¬x/kC0˙
34 nne ¬x/kC0˙x/kC=0˙
35 34 imbi2i s<x¬x/kC0˙s<xx/kC=0˙
36 35 ralbii x0s<x¬x/kC0˙x0s<xx/kC=0˙
37 36 rexbii s0x0s<x¬x/kC0˙s0x0s<xx/kC=0˙
38 33 37 bitri x0|x/kC0˙Fins0x0s<xx/kC=0˙
39 32 38 sylib φs0x0s<xx/kC=0˙