{"categories":["\u30d7\u30ed\u30b0\u30e9\u30df\u30f3\u30b0"],"provider_name":"Hatena Blog","type":"rich","height":"190","width":"100%","description":"\u7a4d\u307f\u6b8b\u3057\u306e\u554f\u984c\u304c\u3044\u304f\u3064\u304b\u3042\u308b\u306e\u3067\u3001\u9806\u756a\u306b\u7247\u4ed8\u3051\u3066\u3044\u304d\u307e\u3059\u3002 Ex1.38 \u30aa\u30a4\u30e9\u30fc\u5c55\u958b\u3067\u81ea\u7136\u5bfe\u6570\u306e\u5e95 e \u3092\u6c42\u3081\u308b\u554f\u984c\u3002 cont_frac n d j = cont_frac n d 0 where cont_frac n d k | k == j = 0.0 = (n k) / ((d k) + (cont_frac n d (k+1))) Start = 2.0 + cont_frac n d 10000 where n k = 1.0 d k | k rem 3 == 1 = a_n!!(k/3) = 1.0 a_n = [2.0,4.0..]\u3068\u3053\u308d\u3067\u30aa\u30a4\u30e9\u30fc\u5c55\u958b\u3063\u3066\u306a\u3093\u3060\uff1f http\u2026","image_url":null,"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Flethevert.hatenadiary.org%2Fentry%2F20060124%2Fp6\" title=\"SICP : Ex1.38 : Concurrent Clean - lethevert is a programmer\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","version":"1.0","author_url":"https://blog.hatena.ne.jp/lethevert/","blog_title":"lethevert is a programmer","title":"SICP : Ex1.38 : Concurrent Clean","published":"2006-01-24 00:00:01","provider_url":"https://hatena.blog","url":"https://lethevert.hatenadiary.org/entry/20060124/p6","blog_url":"https://lethevert.hatenadiary.org/","author_name":"lethevert"}