2009-04-01から1ヶ月間の記事一覧
ハッシュドポテト ベビーリーフ 鶏と茄子炒め(花山椒炒風味) 自家製ベーコンとポテトのオムレツ 今日の失敗。ハッシュドポテトの賞味期限を見ないでオムレツ作ったこと。
感覚的にはさもありなん、ということで実験 二つの区間 X, Y を、それぞれ (x±a), (y±b) とすると、X, Y の加算の上限、下限は (x + a) + (y + b) = (x + y) + (a + b) (x - a) + (y - b) = (x + y) - (a + b)となる。よって加算の結果の幅は以下のようにな…
減算の定義 (define (sub-interval x y) (make-interval (- (lower-bound x) (upper-bound y)) (- (upper-bound x) (lower-bound y))))
選択子 upper-bound と lower-bound の定義 (define (upper-bound x) (max (car x) (cdr x))) (define (lower-bound x) (min (car x) (cdr x))) と思ったら a が下限、 b が上限で決まってるっぽいので (define (upper-bound x) (cdr x)) (define (lower-bou…
今日は外飯。錦映@下落合。 お通しの枝豆 刺し盛 〆鯖 紫ブロッコリー エビカツ ゼンマイ,ウド,あすなろの天麩羅 その他にもたのんだけど、こんなトコロで。
期せずしてサイン会を開催。orz お布施は6000円也。
豚焼肉(弁当の残り) 豚肉とゴボウのキンピラ カボチャのオーブン焼き(とろけるチーズのせ) レバーとネギ炒め レバーとネギ炒めがうまく出来たのでメモ。 レバーは血抜きして一晩タレに漬ける。タレはニンニク,生姜,砂糖,醤油。 タレはちゃんと切っておく。(…
問題2.6では加算までだったが、 Web で他の人のを見たら加減乗除全て実装していたので確認してみる。まずは、乗算。 (define (church* m n) (lambda (f) (lambda (x) ((m (n f)) x)))) と思ったけど、引き算の想像がつかない Web の他人のを見ると-1する関数…
Church数(Church numerals)の問題。 0と1を足す演算の定義 (define zero (lambda (f) (lambda (x) x))) (define (add-1 n) (lambda (f) (lambda (x) (f ((n f) x))))) ためしに実行してみる。 (add-1 zero) ; #<closure (add-1 add-1)> (zero add-1) ; #<closure (zero zero)> ん? 良く分からんので、ため</closure></closure>…
問題の意味が良く理解できなかったが、 2 と 3 は互いに素であるので、(2^a)*(3^b) である整数を2で割り切れる回数がa, 3で割り切れる回数がbとなる。 ということで実装。 (define (cons x y) (* (expt 2 x) (expt 3 y))) (define (car z) (define (iter div…
ヌカ漬け キュウリと茗荷の塩もみ カジキマグロのムニエル エリンギのロースハム巻きのオーブン焼き 玉葱の天麩羅の卵とじ 赤飯(いなげやのお惣菜)
一個人 (いっこじん) 2009年 06月号 [雑誌]出版社/メーカー: ベストセラーズ発売日: 2009/04/25メディア: 雑誌購入: 1人 クリック: 9回この商品を含むブログ (15件) を見る昨日、散歩中にコンビニ寄ったら目に入ってしまい、つい買ってしまいました。 まだ読…
(define (cons x y) (lambda (m) (m x y))) (define (car z) (z (lambda (p q) p))) これに対する cdr の定義は何か?car は以下のように展開される (car (cons x y)) => (cons x y) -> (lambda (m) (m x y)), (car z) -> (lambda (p q) p) なので ((lambda (…
周囲の長さを求める手続き [premieter] (define (premieter rect) (+ (* (width rect) 2) (* (height rect) 2))) 面積を求める手続き [area] (define (area rect) (* (width rect) (height rect))) [rectangle] その1 width, height (define (make-rectangle…
玉葱の天麩羅 ちくわの磯辺揚げ 豚の生姜焼きと青梗菜炒め 盛りそば おまけ。焼きモンブラン。(岡山 IWAHANA)
今年はミニトマトとゴーヤーを直植えにして、 キュウリは鉢植えにしました。 バジルとローズマリーは毎年ベニフキノメイガにやられるので、防虫ネットをつけてみた。 ついでにタカノツメとタイムも寄せ植えに。 しかし、ゴーヤーの苗が200円超えるのは納得い…
久々に善福寺川沿いをチャリで散歩。 ヤエザクラも結構散ってます。 というか、今日は夏の空ですねぇ。 かと思うと、そろそろGWだったり。 まあ、気持ち良い日でしたね。
斜めから取りすぎで後ろの方は写ってないなぁ。一応こんな感じ。 タコワサ シーフードマリネ ホタルイカ 棒餃子(随園別館) 地鶏おにぎり(福岡 仁志甲) うなぎおこわ(三重 おわせ久喜(喜は七三つ)) セロリのサラダ 刺身の盛り合わせ(マグロ中トロ,シマアジ,タ…
雨降ってるし、Deep Sea〜深海の不思議な生きものたち〜を見に池袋サンシャイン国際水族館へ。 ということで主目的のダイオウグソクムシの生体展示。チラシのお姉さんのように手で持ち上げて裏側を見てみたいが、それはさすがにダメ。 ただの貝と見せかけて…
サンドウィッチ(具はトマト,キュウリ,卵,ハム) トマトと玉葱のサラダ 水菜,椎茸,豆腐,豚肉の鍋 花山葵の醤油漬け
線分の構成子と選択子 (define (make-segment start-point end-point) (cons start-point end-point)) (define (start-segment segment) (car segment)) (define (end-segment segment) (cdr segment)) 点の構成子と選択子 (define (make-point x y) (cons x…
まずは英語の復習。 cons … Construct car … Contents of Address part of Register cdr … Contents of Decrement part of Register 有理数 … rational number 無理数 … irrational number 加える … add 減ずる … subtract 乗ずる … multiply 除する … divid…
闇の鶯 (KCデラックス)作者: 諸星大二郎出版社/メーカー: 講談社発売日: 2009/04/23メディア: コミック購入: 3人 クリック: 20回この商品を含むブログ (29件) を見る昼休みにゲットして読了。収録作品は以下の五編。 それは時には少女となりて 人魚の記憶 書…
アメリカンソーセージ(皮なしソーセージ) 焼き鳥(皮,砂肝,ネギマ,モモ肉,つくね) キュウリ コーンスープ 豚焼肉(弁当の残り) イカマリネ 今日は全部お惣菜。
こんな感じ? (define (iterative-improve f) (define (enough? a b) (< (abs (- a b)) 0.001)) (define (iter guess x) (if (enough? guess x) guess (iter (f guess x) x))) (lambda (y) (iter 1.0 y))) (define (sqrt z) ((iterative-improve (lambda (x y…
手羽元のカレー(カレーは牛筋のトマト煮にカレー粉加えて味を調整したもの) 花山葵の醤油漬け(花山葵を塩もみしてお湯をかけて、醤油とみりんで漬け込んだもの) つくね焼き 豆腐のダシのせ 水菜と油揚げのサラダ(+ネギ,玉葱,トマト,鰹節と醤油)
書いたの間違って消しちゃったので、答えだけ。 n 乗根の不動点を収束させるのに必要な平均緩和の回数は 2^a 整数の割り算のでっちあげ (define (int-div x y) (if (= (remainder x y) 0) (/ x y) (/ (- x (remainder x y)) y))) n剰根を求める関数 (define …
平滑化関数 (define (smooth f) (let ((dx 0.00001)) (lambda (x) (/ (+ (f (- x dx)) (f x) (f (+ x dx))) 3)))) n重平滑化関数 (define (n-fold-smooth f n) (repeated (smooth f) n)) smooth は良いけど、n重平滑化関数は明らかに違う。 ということで、ち…
ステーキ トマト,キュウリ,玉葱のサラダ トースト 昨日の残りの焼きそば
repeatedの定義 (define (repaeted f n) (define (iter g m) (if (> m 1) (iter (compose f g) (- m 1)) g)) (iter f n)) テスト ((repaeted square 2) 5) ; 625 お約束で線形再帰バージョン (define (repaeted f n) (if (= n 1) f (compose f (repaeted f (…