{"type":"rich","image_url":null,"provider_name":"Hatena Blog","blog_url":"https://cortyuming.hateblo.jp/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fcortyuming.hateblo.jp%2Fentry%2F20130327%2Fp1\" title=\" SICP 1.2  Procedures and the Processes They Generate - \u724c\u8a9e\u5099\u5fd8\u9332 -pygo\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_url":"https://hatena.blog","version":"1.0","author_url":"https://blog.hatena.ne.jp/CortYuming/","blog_title":"\u724c\u8a9e\u5099\u5fd8\u9332 -pygo","author_name":"CortYuming","published":"2013-03-27 00:00:00","url":"https://cortyuming.hateblo.jp/entry/20130327/p1","height":"190","width":"100%","categories":["SICP"],"title":" SICP 1.2  Procedures and the Processes They Generate","description":"SICP 1.2 Procedures and the Processes They Generate - Exercise 1.10 (define (A x y) (cond ((= y 0) 0) ((= x 0) (* 2 y)) ((= y 1) 2) (else (A (- x 1) (A x (- y 1)))))) (A 1 10) (A (- 1 1) (A 1 (- 10 1))) (A 0 (A 1 9)) (A 0 (A (- 1 1) (A 1 (- 9 1)))) (A 0 (A 0 (A 1 8))) (A 0 (A 0 (A (- 1 1) (A 1 (- 8 \u2026"}