三通りの異なる方法で二つの平方数の和としてかける全ての数のストリームを生成する手続き(問題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に玉葱を加えて炒め、しんなりしたらホウレンソウを加えて炒める 塩,胡椒で味付…