諸星大二郎 ナンセンスギャグ漫画集・珍の巻作者: 諸星大二郎出版社/メーカー: ジャイブ発売日: 2010/03/06メディア: コミック購入: 1人 クリック: 23回この商品を含むブログ (17件) を見る諸星大二郎 ナンセンスギャグ漫画集・妙の巻作者: 諸星大二郎出版社…

新宿に用事があったので、雨は降ってたけどついでに新宿御苑に寄り道。 木蓮も咲き始めていますね。 梅もいろいろ種類がありますが、良い感じで咲いています。 河津桜はそろそろ終わりです。 カンザクラは満開のと盛りが過ぎたのがあります。 木瓜の花はまだ…

豚キムチ炒め ベーコンとアスパラガス炒め スペアリブのオーブン焼き 豚キムチ炒めの作り方 フライパンにゴマ油をしいて豚肉,白菜,キムチを炒め味醂,醤油で味を調える 上に目玉焼きを載せる(写真のは崩れてますが) ベーコンとアスパラガス炒めの作り方 アス…

直列RLC回路(series RLC circuit)の振る舞いをモデル化する一対のストリームを生成する手続き。これも全然分からないんだけど、図のままに実装。 (define (RLC R C L dt) (define (rlc vc0 il0) (define vc (integral (delay dvc) vc0 dt)) (define il (inte…

問題3.78のsolve-2ndを一般化し、一般的な二階微分方程式を解くのに使えるようにする元のsolve-2nd()を解く手続き (define (solve-2nd a b dt y0 dy0) (define y (integral (delay dy) y0 dt)) (define dy (integral (delay ddy) dy0 dt)) (define ddy (add-…

同次二階線形微分方程式 良く分からないけど、とりあえず図のとおりに手続きを定義する (define (solve-2nd a b dt y0 dy0) (define y (integral (delay dy) y0 dt)) (define dy (integral (delay ddy) dy0 dt)) (define ddy (add-streams (scale-stream dy …

元のintegral(教科書で定義) (define int (cons-stream initial-value (add-streams (scale-stream integrand dt) int))) 出力ストリームの第一要素より先を生成するよう要求された時だけ、被積分値を評価すべくforceするように再定義したintegral(教科書で…

チキンカレー ココナッツカレー 大根の皮とジャコ炒め ブリの塩焼き モヤシ炒め チキンカレーは息子の昼飯の残り。シディークで買って来たらしい。 ココナッツカレーは昨日の残り。大根の皮とジャコ炒めの作り方 凍らせておいた大根の皮を溶かして千切りにす…

各要素が入力ストリームの二つの連続する要素の平均であるストリームを生じる手続きsmoothの定義 (define (smooth input-stream) (define (iter s) (cons-stream (/ (+ (stream-car s) (stream-car (stream-cdr s))) 2) (iter (stream-cdr s)))) (cons-strea…

Louis Reasonerが定義したバグの入った平滑化make-zero-crossings(教科書で定義) (define (make-zero-crossings input-stream last-value) (let ((avpt (/ (+ (stream-car input-stream) last-value) 2))) (cons-straem (sign-change-detector avpt last-val…

符号の変化を検出器する手続き (define (sign-change-detector after before) (cond ((and (< before 0) (>= after 0)) 1) ((and (>= before 0) (< after 0)) -1) (else 0))) いんちきsense-dataの定義 (define test-list (list 1 2 1.5 1 0.5 -0.1 -2 -3 -2…

積分器の実装(教科書で定義) (define (integral integrand initial-value dt) (define int (cons-stream initial-value (add-streams (scale-stream integrand dt) int))) int) RC回路の実装。さっぱり分からないけど、 式のとおりに実装。 (define (RC R C …

フライドチキン ニンジンと鶏肉の味噌炒め ニシンの昆布巻き カペッリーニとココナッツカレー フライドチキンとニシンの昆布巻きは市販品。ニンジンと鶏肉の味噌炒めの作り方 フライパンにゴマ油をしいて、細切りにした鶏肉、ニンジンを炒める 1にブナシメジ…

三通りの異なる方法で二つの平方数の和としてかける全ての数のストリームを生成する手続き(問題3.71と似た方法で実装) (define (square-weight x) (let ((i (car x)) (j (cadr x))) (+ (square i) (square j)))) (define square-weighted-stream (weighted-p…

立方数の和で重み付けするための手続き (define (cube-weight x) (let ((i (car x)) (j (cadr x))) (+ (cube i) (cube j)))) 立方数の和で重み付けした順序のストリーム (define cube-weighted-stream (weighted-pairs integers integers cube-weight)) 二通…

merge手続きに似たmerge-weighted手続き (define (merge-weighted s1 s2 weight) (cond ((stream-null? s1) s2) ((stream-null? s2) s1) (else (let ((s1car (stream-car s1)) (s2car (stream-car s2))) (let ((s1weight (weight s1car)) (s2weight (weight …

ホウレンソウと玉葱炒め 豚ロースのムニエル カペッリーニのミートソース ホウレンソウと玉葱炒めの作り方 フライパンにオリーブオイルをしいて温めたところにバターを入れる 1に玉葱を加えて炒め、しんなりしたらホウレンソウを加えて炒める 塩,胡椒で味付…

pairsの定義(教科書で定義) (define (pairs s t) (cons-stream (list (stream-car s) (stream-car t)) (interleave (stream-map (lambda (x) (list (stream-car s) x)) (stream-cdr t)) (pairs (stream-cdr s) (stream-cdr t))))) 三つの無限ストリームS,Tお…

Louis Reasonerが定義したpair手続き (define (pairs s t) (interleave (stream-map (lambda (x) (list (stream-car s) x)) t) (pairs (stream-cdr s) (stream-cdr t)))) この定義は動くか?Louis の piars 手続きを使って(pairs integers integers)を評価す…

pairs手続きを修正して(pairs i j)が(i 元のpairs手続き (define (pairs s t) (cons-stream (list (stream-car s) (stream-car t)) (interleave (stream-map (lambda (x) (list (stream-car s) x)) (stream-cdr t)) (pairs (stream-cdr s) (stream-cdr t))))…

牛乳鍋 レタス ナスと牛肉炒め 牛乳鍋の作り方 白菜をざく切りにして鍋に入れて蓋をし、弱火で蒸す 牛乳,鶏ガラスープ,塩,胡椒,豚肉を入れて弱火で煮て火を通す ピーラーで薄く切ったニンジンを入れて火を通す 最後に粉チーズをかける ナスと牛肉炒めの作り…

append のストリーム版(教科書で定義) (define (stream-append s1 s2) (if (stream-null? s1) s2 (cons-stream (stream-car s1) (stream-append (stream-cdr s1) s2)))) 第二のストリームを取り込む前に第一のストリームから全ての要素を取るので無限ストリ…

アナゴと水菜の煮浸し カルボナーラ ミャンマー風エビのサラダ アナゴと水菜の煮浸しとミャンマー風エビのサラダは妻作。カルボナーラの作り方 鍋にたっぷりのお湯を沸かし、多目の塩を入れる 1にパスタを入れて茹でる フライパンにオリーブオイルを敷いて拍…

級数 を使い、πで実行したのと同様に2の自然対数の近時の三つの並びを計算して、これらの並びはどのくらい早く収束するのかを見る。 良く分からないので教科書の言うとおりに定義。 (define (ln-summands n) (cons-stream (/ 1.0 n) (stream-map - (ln-summa…