(define (make-account balance) (define (withdraw amount) (if (>= balance amount) (begin (set! balance (- balance amount)) balance) "Insufficient funds")) (define (deposit amount) (set! balance (+ balance amount)) balance) (let ((protected …

鍋 刺身(サーモン,茹でエビ,イカ) 焼肉(弁当の残り) 鍋の作り方 昆布で出汁をとり、醤油,味醂,塩で味をつける 豚挽き肉に生姜,塩,醤油を入れ練って団子にする 1に2を入れて茹でる 3に焼き豆腐を入れる 4にキャベツ,椎茸,シメジを入れて火を通す 5に春菊を入…

ちょっと前の記事だけど。 つくば市、ロボット特区に 「セグウェイ」も公道ＯＫ ロボット特区かぁ。セグウェイ乗りて〜。

(define x 10) (parallel-execute (lambda () (set! x (* x x))) (lambda () (set! x (* x x x)))) の実行結果となりうるxの可能性は、以下のようになる P1,P2をそれぞれプロセスに分割すると P1 は X1-1: (* x x)の最初のxへのアクセス X1-2: (* x x)の二番…

(define x 10) (define s (make-serializer)) (parallel-execute (lambda () (set! x ((s (lambda () (* x x)))))) (s (lambda () (set! x (+ x 1))))) とした時は、 (* x x) 中での値の変化と、 (set! x (+ x 1)) の間での値の変化が起こらなくなるので、 1…