2007-04-20から1日間の記事一覧

SICP 読み (92) 2.5.3 例: 記号代数

全係数を最大公約数で割る (その 2) あ、pseudoremainder-terms 呼び出しを wrap すりゃ良いの?? (define (gcd-terms L1 L2) (if (empty-termlist? L2) L1 (gcd-terms L2 (div-by-gcd (pseudoremainder-terms L1 L2)))))ってカンジ?? 多分置き換えなソレを見…