Metamath Proof Explorer


Theorem rlimclim1

Description: Forward direction of rlimclim . (Contributed by Mario Carneiro, 16-Sep-2014)

Ref Expression
Hypotheses rlimclim1.1 Z = M
rlimclim1.2 φ M
rlimclim1.3 φ F A
rlimclim1.4 φ Z dom F
Assertion rlimclim1 φ F A

Proof

Step Hyp Ref Expression
1 rlimclim1.1 Z = M
2 rlimclim1.2 φ M
3 rlimclim1.3 φ F A
4 rlimclim1.4 φ Z dom F
5 fvex F w V
6 5 rgenw w dom F F w V
7 6 a1i φ y + w dom F F w V
8 simpr φ y + y +
9 rlimf F A F : dom F
10 3 9 syl φ F : dom F
11 10 adantr φ y + F : dom F
12 11 feqmptd φ y + F = w dom F F w
13 3 adantr φ y + F A
14 12 13 eqbrtrrd φ y + w dom F F w A
15 7 8 14 rlimi φ y + z w dom F z w F w A < y
16 2 ad2antrr φ y + z w dom F z w F w A < y M
17 flcl z z
18 17 peano2zd z z + 1
19 18 ad2antrl φ y + z w dom F z w F w A < y z + 1
20 19 16 ifcld φ y + z w dom F z w F w A < y if M z + 1 z + 1 M
21 16 zred φ y + z w dom F z w F w A < y M
22 19 zred φ y + z w dom F z w F w A < y z + 1
23 max1 M z + 1 M if M z + 1 z + 1 M
24 21 22 23 syl2anc φ y + z w dom F z w F w A < y M if M z + 1 z + 1 M
25 eluz2 if M z + 1 z + 1 M M M if M z + 1 z + 1 M M if M z + 1 z + 1 M
26 16 20 24 25 syl3anbrc φ y + z w dom F z w F w A < y if M z + 1 z + 1 M M
27 26 1 eleqtrrdi φ y + z w dom F z w F w A < y if M z + 1 z + 1 M Z
28 simplrl φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z
29 18 zred z z + 1
30 28 29 syl φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z + 1
31 21 adantr φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M M
32 30 31 ifcld φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M if M z + 1 z + 1 M
33 eluzelre k if M z + 1 z + 1 M k
34 33 adantl φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M k
35 fllep1 z z z + 1
36 28 35 syl φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z z + 1
37 max2 M z + 1 z + 1 if M z + 1 z + 1 M
38 31 30 37 syl2anc φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z + 1 if M z + 1 z + 1 M
39 28 30 32 36 38 letrd φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z if M z + 1 z + 1 M
40 eluzle k if M z + 1 z + 1 M if M z + 1 z + 1 M k
41 40 adantl φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M if M z + 1 z + 1 M k
42 28 32 34 39 41 letrd φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z k
43 breq2 w = k z w z k
44 43 imbrov2fvoveq w = k z w F w A < y z k F k A < y
45 simplrr φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M w dom F z w F w A < y
46 4 ad3antrrr φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M Z dom F
47 1 uztrn2 if M z + 1 z + 1 M Z k if M z + 1 z + 1 M k Z
48 27 47 sylan φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M k Z
49 46 48 sseldd φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M k dom F
50 44 45 49 rspcdva φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M z k F k A < y
51 42 50 mpd φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M F k A < y
52 51 ralrimiva φ y + z w dom F z w F w A < y k if M z + 1 z + 1 M F k A < y
53 fveq2 j = if M z + 1 z + 1 M j = if M z + 1 z + 1 M
54 53 raleqdv j = if M z + 1 z + 1 M k j F k A < y k if M z + 1 z + 1 M F k A < y
55 54 rspcev if M z + 1 z + 1 M Z k if M z + 1 z + 1 M F k A < y j Z k j F k A < y
56 27 52 55 syl2anc φ y + z w dom F z w F w A < y j Z k j F k A < y
57 15 56 rexlimddv φ y + j Z k j F k A < y
58 57 ralrimiva φ y + j Z k j F k A < y
59 rlimpm F A F 𝑝𝑚
60 3 59 syl φ F 𝑝𝑚
61 eqidd φ k Z F k = F k
62 rlimcl F A A
63 3 62 syl φ A
64 4 sselda φ k Z k dom F
65 10 ffvelrnda φ k dom F F k
66 64 65 syldan φ k Z F k
67 1 2 60 61 63 66 clim2c φ F A y + j Z k j F k A < y
68 58 67 mpbird φ F A