Scheme 求函數(shù)積分的過程，怎樣提高精度

mci2004

最近學(xué)習(xí)FP，用Scheme寫了一個求函數(shù)積分的過程，想請問下怎樣才能提高這個過程返回結(jié)果的精度呢？

1. (define increment 0.00001)
   
2. 
   
3. (define (integral term a b)
   
4.   (define (sum term a increment b total)
   
5.     (if (> a b)
   
6.       total
   
7.       (+ (+ (* (term a) increment) total)
   
8.          (sum term (+ a increment) increment b total))))
   
9.     (sum term a increment b 0))

復(fù)制代碼

如果increment 設(shè)置0.00001就會超出最大的遞歸深度，那么在科學(xué)計算領(lǐng)域這樣的過程，怎樣提高精度呢？

數(shù)學(xué)方法修改這個過程嗎？

OwnWaterloo

跟著Lua控@starwing83哥哥混確寫出了棧溢出的代碼。。。  該不該打。。。

1. 
   
2. (define (integral-tailcall term a b)
   
3.   (define (sum term a increment b total)
   
4.     (if (> a b)
   
5.       total
   
6.       (sum term (+ a increment) increment b
   
7.            (+ (* (term a) increment) total))))
   
8.   (sum term a increment b 0))
   

復(fù)制代碼

無腦尾遞歸修改版本。。。

mci2004

回復(fù) 2# OwnWaterloo


    謝謝，我sb了

Tail Recursion

。


    唉... 我好菜