Commit e6a3f286 authored by Raymond Toy's avatar Raymond Toy

sum-an was summing one too many terms.

parent 64c424b7
......@@ -350,7 +350,7 @@
(an n k v)))
(sum term (+ sum term)))
((or (<= (abs term) (* eps (abs sum)))
(> k big-n))
(>= k big-n))
;; SUM-AB computes the series
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment