2010-04-23から1日間の記事一覧

SICP問題4.26

unless の実装。unlessをifに変換するように実装する 追加する手続き (define (unless? exp) (tagged-list? exp 'unless)) (define (unless-predicate exp) (cadr exp)) (define (unless-consequent exp) (caddr exp)) (define (unless-alternative exp) (if…

SICP問題4.25

手続きunlessの定義 (define (unless condition usual-value exceptional-value) (if condition exceptional-value usual-value)) 上記のunlessを使用して以下のようなfactorialを定義する (define (factorial n) (unless (= n 1) (* n (factorial (- n 1)))…

SICP問題4.24

始めの超循環評価器とこの節での版の速度を比較する 以下の要領で time マクロを組み込みeval実行時間を計測する (define (driver-loop) (prompt-for-input input-prompt) (let ((input (read))) ;; time マクロを組み込む (let ((output (time (eval input …

SICP問題4.23

一ヶ月ぶり。 二つの版の違いは既に本文および問題中に書かれている。 本文版の方は これらの実行手続きを組み合わせ、環境を引数としてとり、個々の実行手続きを環境を引数として順に呼び出す一個の実行手続きを作る という動作なのに対し、Alyssa版の方は …

今日の夕飯

高野豆腐 キュウリ スペアリブ焼きとジャガイモ 高野豆腐は妻作。 スペアリブ焼きとジャガイモの作り方 おろしニンニク,おろし生姜,砂糖,オイスターソース,醤油,塩,カレー粉,サラダ油をスペアリブに揉みこんで一晩置いておく 1をフライパンに並べて蓋をし、…