{"width":"100%","author_name":"tanakaBox","author_url":"https://blog.hatena.ne.jp/tanakaBox/","url":"https://boxnos.hatenablog.com/entry/20080426/1209157468","provider_url":"https://hatena.blog","description":"\u30ac\u30f3\u30ac\u30f3\u3044\u304f\u305e\u30fc\u3002 \u554f\u984c 3.16 Ben\u306e\u624b\u7d9a\u304d\u304c\u3046\u307e\u304f\u3044\u304b\u3044\u7406\u7531\u3002 (define a (cons 0 1)) (define b (cons 2 3)) (count-pairs (cons a b)) ; 3 (set-car! b a) (count-pairs (cons a b)) ; 4 (set-car! b a) (set-cdr! b a) (count-pairs (cons b b)) ; 7 \u7121\u9650\u30eb\u30fc\u30d7\u306f\u30d1\u30b9\u30fb\u30fb\u30fb\u3002 \u554f\u984c 3.17 Ben\u306e\u3092\u4fee\u6b63\u3059\u308b\u3002 (define (count-pairs x) (letrec ((cache '()) (iter (lamb\u2026","categories":["Scheme"],"blog_title":"\u30dc\u30af\u30ce\u30b9","image_url":null,"published":"2008-04-26 06:04:28","version":"1.0","type":"rich","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080426%2F1209157468\" title=\" SICP\u3092\u8aad\u3080(102) \u554f\u984c 3.16 - 3.20 \u5bfe\u306e\u6570 - \u30dc\u30af\u30ce\u30b9\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_name":"Hatena Blog","title":" SICP\u3092\u8aad\u3080(102) \u554f\u984c 3.16 - 3.20 \u5bfe\u306e\u6570","height":"190","blog_url":"https://boxnos.hatenablog.com/"}