中央値とパーセント相対許容誤差から区間を計算するmake-center-percentと、区間からパーセント相対許容誤差を計算するpercent書いた。 (define (make-center-percent c p) (make-interval (* c (- 1 p)) (* c (+ 1 p)))) (define (percent i) (let ((interv…

ぼくはメッセというのがかなり苦手です。 なにが苦手かって言うとアレじゃないですか、こっちのことなんて関係なしにしゃべりかけられるじゃないですか。ぼくがPCでDVDに熱中しているときに「ねぇ」とかいわれると、あああああああああああああああああああ…

なんで M{1,2} で来てないやつがいるんだろう。チねばいいのに。 A610 でよかったー 早くないけどおはよー。寝坊して今から後悔ばっかしします！

Benがすごくウザい件について。 ついでにBenはなぞめいたことをいった：「区間の端点の符号を調べると、mul-intervalを九つの場合に分けることが出来（略 あと訳としてこれはない。 only one of which requires more than two multiplications. http://mitpr…

macほしい！macほしい！macほしい！ Leopardほしい！Leopardほしい！Leopardほしい！ ぼくは私物のノートパソコンとか持ってなくて、研究室から支給されてるやつを使っているのだけども、もちろんこれは譲渡ではなくて貸与であって、ぼくはこれを返した後ど…

こんなかんじ？ (define (div-interval x y) (let ((l-div (/ 1.0 (upper-bound y))) (r-div (/ 1.0 (lower-bound y)))) (if (and (<= l-div 0) (=> r-div 0)) (error "invalid interval") (mul-interval x (make-interval l-div r-div))))) 今日朝いそいで…

朝ごはん食べた後、出かける前に一杯のコーヒーを飲むのが超オシャレな気がしたので今日から実行させていただきます。皆さんがパンをくわえて遅刻遅刻とか走りながら学校にいく途中に女の子と衝突するみたいな空想している間に、ぼくは一歩先に行くから！！…

区間を[a,b]で記述することにしたのでした。 加算 [x,y]+[z,w]=[x+z,y+w] このときの区間の幅は、(y+w)-(x+z)=(y-x)+(w-z)ですから、加算結果の幅というのは引数の区間幅の関数になっているということですね。 減算 [x,y]-[z,w]=[x-w,y-z] この結果の区間幅…

朝というのはすばらしいものです 朝というのはわりかしすばらしくて、まだ周りの人はだれもお日様の光を浴びていない。これはちょっと考えるとおそろしくて、まだドラキュラとかは動けるかもしれないし、活動時間帯終わってないかも分からないですけども、朝…

範囲を表現するデータ型の引き算を定義しろとかぬかしやがるので、がんばりました。 (define (sub-interval x y) (let ((lower (- (lower-bound x) (upper-bound y))) (upper (- (upper-bound x) (lower-bound y)))) (make-interval lower upper))) 引き算実…

**googleはとてもこわい メールはgmail、カレンダーはGoogle Calendar、Google Alertで情報を収集し、電車の旅はGoogle Transit、論文探しはもちろんGoogle Scholarみたく、ぼくたちの生活はどんどんgoogleという企業に依存していっている。将来は空気を吸う…

区間をデータで表現するというお話が今日から始まりましたが、今までと特にかわらない。 (define (make-interval a b) (cons a b)) たしたり掛けたり割ったりします。引き算がないですが、明日の課題らしい。 (define (add-interval x y) (make-interval (+ …

手帳買う！とかそういう話が周りでまことしやかにささやかれていて、ぼくもそろそろ来年の買わないとなーと思い至ったしだいです。手帳に対するこだわりとしては、外見とかはあんまし気にしないのですけども、 見開きで1週間の予定が見れる 時間の流れは上か…

自然数だったら数なんて使わずに表せるぜ！！！！って言ってる。 (define zero (lambda (f) (lambda (x) x))) (define (add-1 n) (lambda (f) (lambda (x) (f ((n f) x))))) 正気の沙汰とはおもえません＞＜。(Church numerals)--。 いちお、(add-1 zero)を…

ぼくは今日こんなことを言っていたのでした。http://twitter.com/kiririmode/statuses/386738212 本ばっか読んで生活したいのですよ！ 現在、読みたい本が平積みになってる惨状です！先々週に4冊くらい買って、読み終わってないのにまた買ってしまった。それ…

データ抽象化するけど、pairを構成する方法としてで記憶する方法とかあるからやってみな、この低脳！みたいなことがかかれてたのでがんばってみます。 (define (cons x y) (* (expt 2 x) (expt 3 y))) 構成子は問題のままです。(expt x y)はを返してくれるイ…

近くにはスタバもシアトルズもないさびしいとこに住んでるのだけど、やさしい珈琲館はずっとぼくの傍に寄り添ってくれていて、それでいて朝11時までコーヒー一杯頼めばパンと卵食べ放題だって！ 朝のエネルギーをしっかりとった人には、きっと充実した一日が…

ハロウィンパーティいってきたけどハロウィン過ぎてるけどハロウィンパーティは世界で一番遅いことを売りにしているハロウィンパーティーだったしすげーハロウィンぽいのでよかったのだけども果たしてホントに世界で一番遅いのかは誰にも分からないしツッコ…

(define (cons x y) (lambda (m) (m x y))) (define (car z) (z (lambda (p q) p))) 以上の定義によって(car (cons x y))がxを生じることの証明、なんていわれてもアレですね。証明恐怖症++。 consは「2変数引数の関数」を引数として、それに対してx、yを渡…

1年前くらいに一度読んでたのだけども、図書館で見つけたからまた借りてみたとかそういう出会い。 学部3年でPerl習うんですけども、これといって体系立てた講義があるわけではなくて、「スクリプト言語使ってみましょうか」の姿勢です（その時点で学部で学ぶ…

そもそもこれ女の子用なのにダボダボなんだけど！ きぐるみってそういうもんなんなの？ あと、やっぱしラッキーよりもトラッキーのほうがよかった。狙った感がぬぐえない。 ラッキーは5着くらいあったのにトラッキー一枚もないとかどうよ。 ドンキには猛省を…

長方形の周囲の長さと面積を求めろっつーんですけれども、長方形をどう表現するかが問われてるっぽいので、まずは2つの点で定義する方法をつかってみます。 (define (make-point x y) (cons x y)) (define (x-point point) (car point)) (define (y-point po…

先日からgmailがIMAPに対応したよ！一部ユーザから導入されていくよ！ とかいうニュースがいろいろあって、ぼくはまだかなまだかなと寝る間を惜しんでワクワクしたりDドライブのデータを消したりして待ってたのですけども、今日昼ぐらいにチェックしてたらIM…