なんか、現実逃避のためにSICPをやってる気がしてきた。これが終わったら、仕事に復帰します。 ; Constructor (define (cons-exp a b) (* (expt 2 a) (expt 3 b))) ; Selector (car) (define (car-exp z) (if (not (= (remainder z 2) 0)) 0 (+ 1 (car-exp (…

て言うことで行ってきたよ。 ただ、寝坊+自宅の無線LANがつながらない、と言うトラブルに見舞われた上、高田馬場で反射的にバスに乗ったら、理工学部には行かず、本部の方に行ってしまった、と言うダメダメぶりを発揮してしまい、1時間ほど遅刻してしまった…