2009-10-06から1日間の記事一覧

計算機プログラムの構造と解釈 第二版 P72 問題2.40

実装 #!/usr/local/bin/gosh ;; -*- coding: utf-8 -*- (use ggc.debug.trace) (use math.mt-random) (define nil '()) (define (square n) (* n n)) ;;prime? の実装 (define (smallest-divisor n) (find-divisor n 2)) (define (divides? a b) (= (remaind…

計算機プログラムの構造と解釈 第二版 P72 問題2.41

このときの俺、実行結果にコメントを書くのが流行っていたようだ。 #!/usr/local/bin/gosh ;; -*- coding: utf-8 -*- (use ggc.debug.trace) (use math.mt-random) (define nil '()) (define (accumulate op initial sequence) (if (null? sequence) initial…

計算機プログラムの構造と解釈 第二版 P72 問題2.42

たしかポイントは、行と列をどうやって表すか?的なような事だったような気がする。 あとは、safeはけっこうごちゃごちゃやらないといけない。ので凄く難しい。 実装 #!/usr/local/bin/gosh ;; -*- coding: utf-8 -*- (use ggc.debug.trace) (use math.mt-ra…

試みの地平線

もう何週間も前にやったSICPの問題の自分の理解なんてわすれてしまった。。。 ということで、とりあえず、ソースコードぐらいは載せておくことにするとする。 まったく俺は残念な男であるが better than nothing!!! だと思うのでね。 ちなみにタイトルは北方…