2008-04-10から1日間の記事一覧
任意の次元のテーブルに一般化する!! (define (make-table) (let ((local-table (list '*table*))) (define (lookup keys pointer) (let ((record (assoc (car keys) (cdr pointer)))) (if record (if (null? (cdr keys)) (cdr record) (lookup (cdr keys) r…
マナーとかいうのは社会のルールで,知っておかなきゃ土俵にすら上がれないよって話をききました. 逆に言うと女性にも土俵に上がる道が開かれるということですからみんな安心,某前知事とかも安心ですね! http://1nm.jp/q/diary/ohta.html ところで,ぼくと…