{"type":"rich","image_url":null,"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080425%2F1209056851\" title=\" SICP\u3092\u8aad\u3080(94) \u554f\u984c 3.6 - \u4e71\u6570\u767a\u751f\u5668\u6539 - \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>","width":"100%","description":"\u55da\u547c\u3001Scheme\u3059\u308b\u3053\u3068\u306f\u96e3\u3057\u3044\u4e8b\u3058\u3083\u306a\u3044\u3002\u305f\u3060\u8133\u306b\u8eab\u3092\u4efb\u305b\u30fb\u30fb\u30fb\uff08\u8b0e \u554f\u984c 3.6 \u4e71\u6570\u767a\u751f\u5668\u3092\u6539\u9020\u3057\u3066\u3001reset\u3092\u4ed8\u3051\u308b\u554f\u984c\u3002generate\u306f\u8981\u3089\u306a\u3044\u3068\u601d\u3046\u306e\u3067\u3001\u7121\u304f\u3057\u305f\u3002 (define random-init 12345) (define (rand-update x) (modulo (+ (* 214013 x) 253011) 32767)) (define rand (let ((x random-init)) (lambda m (set! x (if (and (not (null? m)) (eq? (car m) 'reset)) (if (null? (cdr \u2026","provider_name":"Hatena Blog","blog_title":"\u30dc\u30af\u30ce\u30b9","provider_url":"https://hatena.blog","author_url":"https://blog.hatena.ne.jp/tanakaBox/","url":"https://boxnos.hatenablog.com/entry/20080425/1209056851","blog_url":"https://boxnos.hatenablog.com/","categories":["Scheme"],"height":"190","title":" SICP\u3092\u8aad\u3080(94) \u554f\u984c 3.6 - \u4e71\u6570\u767a\u751f\u5668\u6539","version":"1.0","author_name":"tanakaBox","published":"2008-04-25 02:07:31"}