x, y 座標をスロットに持つ vec クラスを考える。Common Lisp では次のような定義になる。 (defclass vec () ((x :initarg :x :initform 0d0 :accessor vec-x) (y :initarg :y :initform 0d0 :accessor vec-y)))ついでに factory も定義しておく。 (defun ma…

アップルストア仙台に iWork '06 を買いに行ったら、incase 12" Slim Sleeve (Black) という iBook/PowerBook 12" 用のバッグが6280円のところを3400円で売っていたので一緒に購入。サンワのインナーケースは持っていたけど、手提げ付きのバッグは持っていな…