Metamath Proof Explorer


Theorem eulerpartlems

Description: Lemma for eulerpart . (Contributed by Thierry Arnoux, 6-Aug-2018) (Revised by Thierry Arnoux, 1-Sep-2019)

Ref Expression
Hypotheses eulerpartlems.r ⊢ R = f | f -1 ℕ ∈ Fin
eulerpartlems.s ⊢ S = f ∈ ℕ 0 ℕ ∩ R ⟼ ∑ k ∈ ℕ f ⁡ k ⁢ k
Assertion eulerpartlems ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℤ ≥ S ⁡ A + 1 → A ⁡ t = 0

Proof

Step Hyp Ref Expression
1 eulerpartlems.r ⊢ R = f | f -1 ℕ ∈ Fin
2 eulerpartlems.s ⊢ S = f ∈ ℕ 0 ℕ ∩ R ⟼ ∑ k ∈ ℕ f ⁡ k ⁢ k
3 1 2 eulerpartlemsf ⊢ S : ℕ 0 ℕ ∩ R ⟶ ℕ 0
4 3 ffvelcdmi ⊢ A ∈ ℕ 0 ℕ ∩ R → S ⁡ A ∈ ℕ 0
5 nndiffz1 ⊢ S ⁡ A ∈ ℕ 0 → ℕ ∖ 1 … S ⁡ A = ℤ ≥ S ⁡ A + 1
6 5 eleq2d ⊢ S ⁡ A ∈ ℕ 0 → t ∈ ℕ ∖ 1 … S ⁡ A ↔ t ∈ ℤ ≥ S ⁡ A + 1
7 4 6 syl ⊢ A ∈ ℕ 0 ℕ ∩ R → t ∈ ℕ ∖ 1 … S ⁡ A ↔ t ∈ ℤ ≥ S ⁡ A + 1
8 7 pm5.32i ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A ↔ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℤ ≥ S ⁡ A + 1
9 eldif ⊢ t ∈ ℕ ∖ 1 … S ⁡ A ↔ t ∈ ℕ ∧ ¬ t ∈ 1 … S ⁡ A
10 9 bilani ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → t ∈ ℕ ∧ ¬ t ∈ 1 … S ⁡ A
11 10 simpld ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → t ∈ ℕ
12 1 2 eulerpartlemelr ⊢ A ∈ ℕ 0 ℕ ∩ R → A : ℕ ⟶ ℕ 0 ∧ A -1 ℕ ∈ Fin
13 12 simpld ⊢ A ∈ ℕ 0 ℕ ∩ R → A : ℕ ⟶ ℕ 0
14 13 ffvelcdmda ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ → A ⁡ t ∈ ℕ 0
15 11 14 syldan ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → A ⁡ t ∈ ℕ 0
16 simpl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → A ∈ ℕ 0 ℕ ∩ R
17 4 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → S ⁡ A ∈ ℕ 0
18 10 simprd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → ¬ t ∈ 1 … S ⁡ A
19 simpl ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → t ∈ ℕ
20 nnuz ⊢ ℕ = ℤ ≥ 1
21 19 20 eleqtrdi ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → t ∈ ℤ ≥ 1
22 simpr ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → S ⁡ A ∈ ℕ 0
23 22 nn0zd ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → S ⁡ A ∈ ℤ
24 elfz5 ⊢ t ∈ ℤ ≥ 1 ∧ S ⁡ A ∈ ℤ → t ∈ 1 … S ⁡ A ↔ t ≤ S ⁡ A
25 21 23 24 syl2anc ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → t ∈ 1 … S ⁡ A ↔ t ≤ S ⁡ A
26 25 notbid ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → ¬ t ∈ 1 … S ⁡ A ↔ ¬ t ≤ S ⁡ A
27 22 nn0red ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → S ⁡ A ∈ ℝ
28 19 nnred ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → t ∈ ℝ
29 27 28 ltnled ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → S ⁡ A < t ↔ ¬ t ≤ S ⁡ A
30 26 29 bitr4d ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 → ¬ t ∈ 1 … S ⁡ A ↔ S ⁡ A < t
31 30 biimpa ⊢ t ∈ ℕ ∧ S ⁡ A ∈ ℕ 0 ∧ ¬ t ∈ 1 … S ⁡ A → S ⁡ A < t
32 11 17 18 31 syl21anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → S ⁡ A < t
33 1 2 eulerpartlemsv1 ⊢ A ∈ ℕ 0 ℕ ∩ R → S ⁡ A = ∑ k ∈ ℕ A ⁡ k ⁢ k
34 fveq2 ⊢ k = t → A ⁡ k = A ⁡ t
35 id ⊢ k = t → k = t
36 34 35 oveq12d ⊢ k = t → A ⁡ k ⁢ k = A ⁡ t ⁢ t
37 36 cbvsumv ⊢ ∑ k ∈ ℕ A ⁡ k ⁢ k = ∑ t ∈ ℕ A ⁡ t ⁢ t
38 33 37 eqtr2di ⊢ A ∈ ℕ 0 ℕ ∩ R → ∑ t ∈ ℕ A ⁡ t ⁢ t = S ⁡ A
39 breq2 ⊢ t = l → S ⁡ A < t ↔ S ⁡ A < l
40 fveq2 ⊢ t = l → A ⁡ t = A ⁡ l
41 40 breq2d ⊢ t = l → 0 < A ⁡ t ↔ 0 < A ⁡ l
42 39 41 anbi12d ⊢ t = l → S ⁡ A < t ∧ 0 < A ⁡ t ↔ S ⁡ A < l ∧ 0 < A ⁡ l
43 42 cbvrexvw ⊢ ∃ t ∈ ℕ S ⁡ A < t ∧ 0 < A ⁡ t ↔ ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l
44 4 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A ∈ ℕ 0
45 44 nn0red ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A ∈ ℝ
46 4 ad2antrr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A ∈ ℕ 0
47 46 nn0red ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A ∈ ℝ
48 simpr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → l ∈ ℕ
49 48 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → l ∈ ℕ
50 49 nnred ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → l ∈ ℝ
51 1zzd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → 1 ∈ ℤ
52 13 ad2antrr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → A : ℕ ⟶ ℕ 0
53 simpr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → t ∈ ℕ
54 eqidd ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m = m ∈ ℕ ⟼ A ⁡ m ⁢ m
55 simpr ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ m = t → m = t
56 55 fveq2d ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ m = t → A ⁡ m = A ⁡ t
57 56 55 oveq12d ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ m = t → A ⁡ m ⁢ m = A ⁡ t ⁢ t
58 simpr ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → t ∈ ℕ
59 ffvelcdm ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → A ⁡ t ∈ ℕ 0
60 58 nnnn0d ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → t ∈ ℕ 0
61 59 60 nn0mulcld ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → A ⁡ t ⁢ t ∈ ℕ 0
62 54 57 58 61 fvmptd ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m ⁡ t = A ⁡ t ⁢ t
63 52 53 62 syl2anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m ⁡ t = A ⁡ t ⁢ t
64 13 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A : ℕ ⟶ ℕ 0
65 64 ffvelcdmda ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → A ⁡ t ∈ ℕ 0
66 53 nnnn0d ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → t ∈ ℕ 0
67 65 66 nn0mulcld ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → A ⁡ t ⁢ t ∈ ℕ 0
68 67 nn0red ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → A ⁡ t ⁢ t ∈ ℝ
69 fveq2 ⊢ m = t → A ⁡ m = A ⁡ t
70 id ⊢ m = t → m = t
71 69 70 oveq12d ⊢ m = t → A ⁡ m ⁢ m = A ⁡ t ⁢ t
72 71 cbvmptv ⊢ m ∈ ℕ ⟼ A ⁡ m ⁢ m = t ∈ ℕ ⟼ A ⁡ t ⁢ t
73 67 72 fmptd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℕ 0
74 nn0sscn ⊢ ℕ 0 ⊆ ℂ
75 fss ⊢ m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℕ 0 ∧ ℕ 0 ⊆ ℂ → m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℂ
76 73 74 75 sylancl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℂ
77 nnex ⊢ ℕ ∈ V
78 0nn0 ⊢ 0 ∈ ℕ 0
79 eqid ⊢ ℂ ∖ 0 = ℂ ∖ 0
80 79 ffs2 ⊢ ℕ ∈ V ∧ 0 ∈ ℕ 0 ∧ m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℂ → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 = m ∈ ℕ ⟼ A ⁡ m ⁢ m -1 ℂ ∖ 0
81 77 78 80 mp3an12 ⊢ m ∈ ℕ ⟼ A ⁡ m ⁢ m : ℕ ⟶ ℂ → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 = m ∈ ℕ ⟼ A ⁡ m ⁢ m -1 ℂ ∖ 0
82 76 81 syl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 = m ∈ ℕ ⟼ A ⁡ m ⁢ m -1 ℂ ∖ 0
83 fcdmnn0supp ⊢ ℕ ∈ V ∧ A : ℕ ⟶ ℕ 0 → A supp 0 = A -1 ℕ
84 77 64 83 sylancr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A supp 0 = A -1 ℕ
85 12 simprd ⊢ A ∈ ℕ 0 ℕ ∩ R → A -1 ℕ ∈ Fin
86 85 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A -1 ℕ ∈ Fin
87 84 86 eqeltrd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A supp 0 ∈ Fin
88 77 a1i ⊢ A : ℕ ⟶ ℕ 0 → ℕ ∈ V
89 78 a1i ⊢ A : ℕ ⟶ ℕ 0 → 0 ∈ ℕ 0
90 ffn ⊢ A : ℕ ⟶ ℕ 0 → A Fn ℕ
91 simp3 ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → A ⁡ t = 0
92 91 oveq1d ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → A ⁡ t ⁢ t = 0 ⋅ t
93 simp2 ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → t ∈ ℕ
94 93 nncnd ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → t ∈ ℂ
95 94 mul02d ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → 0 ⋅ t = 0
96 92 95 eqtrd ⊢ A : ℕ ⟶ ℕ 0 ∧ t ∈ ℕ ∧ A ⁡ t = 0 → A ⁡ t ⁢ t = 0
97 72 88 89 90 96 suppss3 ⊢ A : ℕ ⟶ ℕ 0 → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 ⊆ A supp 0
98 64 97 syl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 ⊆ A supp 0
99 ssfi ⊢ A supp 0 ∈ Fin ∧ m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 ⊆ A supp 0 → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 ∈ Fin
100 87 98 99 syl2anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m supp 0 ∈ Fin
101 82 100 eqeltrrd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → m ∈ ℕ ⟼ A ⁡ m ⁢ m -1 ℂ ∖ 0 ∈ Fin
102 20 51 76 101 fsumcvg4 ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → seq 1 + m ∈ ℕ ⟼ A ⁡ m ⁢ m ∈ dom ⁡ ⇝
103 20 51 63 68 102 isumrecl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → ∑ t ∈ ℕ A ⁡ t ⁢ t ∈ ℝ
104 103 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → ∑ t ∈ ℕ A ⁡ t ⁢ t ∈ ℝ
105 simprl ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A < l
106 13 ffvelcdmda ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A ⁡ l ∈ ℕ 0
107 106 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → A ⁡ l ∈ ℕ 0
108 107 nn0red ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → A ⁡ l ∈ ℝ
109 108 50 remulcld ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → A ⁡ l ⁢ l ∈ ℝ
110 49 nnnn0d ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → l ∈ ℕ 0
111 110 nn0ge0d ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → 0 ≤ l
112 simprr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → 0 < A ⁡ l
113 elnnnn0b ⊢ A ⁡ l ∈ ℕ ↔ A ⁡ l ∈ ℕ 0 ∧ 0 < A ⁡ l
114 nnge1 ⊢ A ⁡ l ∈ ℕ → 1 ≤ A ⁡ l
115 113 114 sylbir ⊢ A ⁡ l ∈ ℕ 0 ∧ 0 < A ⁡ l → 1 ≤ A ⁡ l
116 107 112 115 syl2anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → 1 ≤ A ⁡ l
117 50 108 111 116 lemulge12d ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → l ≤ A ⁡ l ⁢ l
118 106 nn0cnd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A ⁡ l ∈ ℂ
119 48 nncnd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → l ∈ ℂ
120 118 119 mulcld ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A ⁡ l ⁢ l ∈ ℂ
121 id ⊢ t = l → t = l
122 40 121 oveq12d ⊢ t = l → A ⁡ t ⁢ t = A ⁡ l ⁢ l
123 122 sumsn ⊢ l ∈ ℕ ∧ A ⁡ l ⁢ l ∈ ℂ → ∑ t ∈ l A ⁡ t ⁢ t = A ⁡ l ⁢ l
124 48 120 123 syl2anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → ∑ t ∈ l A ⁡ t ⁢ t = A ⁡ l ⁢ l
125 snfi ⊢ l ∈ Fin
126 125 a1i ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → l ∈ Fin
127 48 snssd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → l ⊆ ℕ
128 67 nn0ge0d ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ t ∈ ℕ → 0 ≤ A ⁡ t ⁢ t
129 20 51 126 127 63 68 128 102 isumless ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → ∑ t ∈ l A ⁡ t ⁢ t ≤ ∑ t ∈ ℕ A ⁡ t ⁢ t
130 124 129 eqbrtrrd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ → A ⁡ l ⁢ l ≤ ∑ t ∈ ℕ A ⁡ t ⁢ t
131 130 adantr ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → A ⁡ l ⁢ l ≤ ∑ t ∈ ℕ A ⁡ t ⁢ t
132 50 109 104 117 131 letrd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → l ≤ ∑ t ∈ ℕ A ⁡ t ⁢ t
133 47 50 104 105 132 ltletrd ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ l ∈ ℕ ∧ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A < ∑ t ∈ ℕ A ⁡ t ⁢ t
134 133 r19.29an ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l → S ⁡ A < ∑ t ∈ ℕ A ⁡ t ⁢ t
135 45 134 gtned ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l → ∑ t ∈ ℕ A ⁡ t ⁢ t ≠ S ⁡ A
136 135 ex ⊢ A ∈ ℕ 0 ℕ ∩ R → ∃ l ∈ ℕ S ⁡ A < l ∧ 0 < A ⁡ l → ∑ t ∈ ℕ A ⁡ t ⁢ t ≠ S ⁡ A
137 43 136 biimtrid ⊢ A ∈ ℕ 0 ℕ ∩ R → ∃ t ∈ ℕ S ⁡ A < t ∧ 0 < A ⁡ t → ∑ t ∈ ℕ A ⁡ t ⁢ t ≠ S ⁡ A
138 137 necon2bd ⊢ A ∈ ℕ 0 ℕ ∩ R → ∑ t ∈ ℕ A ⁡ t ⁢ t = S ⁡ A → ¬ ∃ t ∈ ℕ S ⁡ A < t ∧ 0 < A ⁡ t
139 38 138 mpd ⊢ A ∈ ℕ 0 ℕ ∩ R → ¬ ∃ t ∈ ℕ S ⁡ A < t ∧ 0 < A ⁡ t
140 ralnex ⊢ ∀ t ∈ ℕ ¬ S ⁡ A < t ∧ 0 < A ⁡ t ↔ ¬ ∃ t ∈ ℕ S ⁡ A < t ∧ 0 < A ⁡ t
141 139 140 sylibr ⊢ A ∈ ℕ 0 ℕ ∩ R → ∀ t ∈ ℕ ¬ S ⁡ A < t ∧ 0 < A ⁡ t
142 imnan ⊢ S ⁡ A < t → ¬ 0 < A ⁡ t ↔ ¬ S ⁡ A < t ∧ 0 < A ⁡ t
143 142 ralbii ⊢ ∀ t ∈ ℕ S ⁡ A < t → ¬ 0 < A ⁡ t ↔ ∀ t ∈ ℕ ¬ S ⁡ A < t ∧ 0 < A ⁡ t
144 141 143 sylibr ⊢ A ∈ ℕ 0 ℕ ∩ R → ∀ t ∈ ℕ S ⁡ A < t → ¬ 0 < A ⁡ t
145 144 r19.21bi ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ → S ⁡ A < t → ¬ 0 < A ⁡ t
146 145 imp ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∧ S ⁡ A < t → ¬ 0 < A ⁡ t
147 16 11 32 146 syl21anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → ¬ 0 < A ⁡ t
148 nn0re ⊢ A ⁡ t ∈ ℕ 0 → A ⁡ t ∈ ℝ
149 0red ⊢ A ⁡ t ∈ ℕ 0 → 0 ∈ ℝ
150 148 149 lenltd ⊢ A ⁡ t ∈ ℕ 0 → A ⁡ t ≤ 0 ↔ ¬ 0 < A ⁡ t
151 nn0le0eq0 ⊢ A ⁡ t ∈ ℕ 0 → A ⁡ t ≤ 0 ↔ A ⁡ t = 0
152 150 151 bitr3d ⊢ A ⁡ t ∈ ℕ 0 → ¬ 0 < A ⁡ t ↔ A ⁡ t = 0
153 152 biimpa ⊢ A ⁡ t ∈ ℕ 0 ∧ ¬ 0 < A ⁡ t → A ⁡ t = 0
154 15 147 153 syl2anc ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℕ ∖ 1 … S ⁡ A → A ⁡ t = 0
155 8 154 sylbir ⊢ A ∈ ℕ 0 ℕ ∩ R ∧ t ∈ ℤ ≥ S ⁡ A + 1 → A ⁡ t = 0