SICP問題3.78
同次二階線形微分方程式
良く分からないけど、とりあえず図のとおりに手続きを定義する
(define (solve-2nd a b dt y0 dy0) (define y (integral (delay dy) y0 dt)) (define dy (integral (delay ddy) dy0 dt)) (define ddy (add-streams (scale-stream dy a) (scale-stream y b))) y)
同次二階線形微分方程式
良く分からないけど、とりあえず図のとおりに手続きを定義する
(define (solve-2nd a b dt y0 dy0) (define y (integral (delay dy) y0 dt)) (define dy (integral (delay ddy) dy0 dt)) (define ddy (add-streams (scale-stream dy a) (scale-stream y b))) y)