{"image_url":null,"height":"190","published":"2007-12-12 15:31:00","provider_url":"https://hatena.blog","provider_name":"Hatena Blog","description":"\u5fae\u5206\u3092\u4e00\u6c17\u306b\u4e57\u308a\u5207\u308b\u305e\u3049\u301c\u3002 \u554f\u984c 2.57 \u3044\u3084\u3041\u3001\u5927\u5931\u6557\u3002\u5931\u6557\u4f8b\u3002 (define (make-sum-iter ex2) (fold-right (lambda (ex l) (cond ((=number? ex 0) l) ((and (number? ex) (pair? l) (number? (car l))) (cons (+ ex (car l)) (cdr l))) (else (cons ex l)))) '() ex2)) (define (make-sum ex1 ex2) (define l (make-sum-iter (cons ex1 ex2))) (con\u2026","author_url":"https://blog.hatena.ne.jp/tanakaBox/","type":"rich","version":"1.0","blog_url":"https://boxnos.hatenablog.com/","title":" SICP\u3092\u8aad\u3080(70) \u554f\u984c 2.57-2.58 \u8a18\u53f7\u5fae\u5206(2)","categories":["Scheme"],"width":"100%","blog_title":"\u30dc\u30af\u30ce\u30b9","author_name":"tanakaBox","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20071212%2F1197441060\" title=\" SICP\u3092\u8aad\u3080(70) \u554f\u984c 2.57-2.58 \u8a18\u53f7\u5fae\u5206(2) - \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>","url":"https://boxnos.hatenablog.com/entry/20071212/1197441060"}