問題3.77 – SICP（計算機プログラムの構造と解釈）その167
問題3.77 被積分値を先に評価する force の部分はすぐにわかったのだけれど、 integral の再帰部分の第1引数を delay しなければいけないところがわからなかった。 solve 手続きは、本文に記載され [...]…続きを読む
問題3.76 – SICP（計算機プログラムの構造と解釈）その166
問題3.76 (define (smooth st) (define (iter st lv) (let ((average (/ (+ (stream-car st) lv) 2.0))) (cons-stream a [...]…続きを読む
問題3.75 – SICP（計算機プログラムの構造と解釈）その165
問題3.75 Louis の変更した手続きでは平滑化された値（avpt）を次の last-value として渡している。 さらに境界のチェックは平均値同士から算出しないとだめらしい。 したがって修正した make-zer [...]…続きを読む
問題3.74 – SICP（計算機プログラムの構造と解釈）その164
問題3.74 ストリーム sense-data を三角関数を使って仮に表現する。 (define sense-data (stream-map (lambda (x) (sin x)) integers)) (strea [...]…続きを読む
MacVim KaoriYa 20090425 でのキーマップ設定
MacVim KaoriYa 20090425 （splhack: MacVim KaoriYa 20090425）がリリースされたので MacPorts からインストールしてみた。 CursorIM が使えるようになっ [...]…続きを読む
問題3.73 – SICP（計算機プログラムの構造と解釈）その163
問題3.73 図3.33の通りに手続き RC を定義したが、出力される結果がこれで正しいのかわからない… (define (integral integrand initial-value dt) (defi [...]…続きを読む
問題3.72 – SICP（計算機プログラムの構造と解釈）その162
問題3.72 weighted-pairs 等の必要な手続きは問題3.70のものを使う。 (define (add-square-pairs-weight pair) (let ((i (car pair)) (j (c [...]…続きを読む
問題3.71 – SICP（計算機プログラムの構造と解釈）その161
問題3.71 weighted-pairs 等の必要な手続きは問題3.70のものを使う。 ;;;; Ramanujan 数を求める (define (add-cube-pairs-weight pair) (let (( [...]…続きを読む
問題3.70 – SICP（計算機プログラムの構造と解釈）その160
問題3.70 (define (merge-weighted pairs1 pairs2 weight) (cond ((stream-null? (stream-car pairs1)) pairs2) ((strea [...]…続きを読む
問題3.69 – SICP（計算機プログラムの構造と解釈）その159
問題3.69 pairs を参考にして考える。 (define (triples s t u) (cons-stream (list (stream-car s) (stream-car t) (stream-car u [...]…続きを読む
