{"image_url":null,"url":"https://sirocco.hatenadiary.org/entry/20100503/1272836272","width":"100%","author_name":"sirocco","categories":["Haskell"],"published":"2010-05-03 06:37:52","author_url":"https://blog.hatena.ne.jp/sirocco/","version":"1.0","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fsirocco.hatenadiary.org%2Fentry%2F20100503%2F1272836272\" title=\"\u300c\u30a8\u30e9\u30c8\u30b9\u30c6\u30cd\u30b9\u306e\u7be9\u300d\u306a\u3069\u3002 - sirocco \u306e\u66f8\u3044\u3066\u3082\u3059\u3050\u306b\u5fd8\u308c\u308b\u30e1\u30e2\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","height":"190","blog_url":"https://sirocco.hatenadiary.org/","provider_name":"Hatena Blog","blog_title":"sirocco \u306e\u66f8\u3044\u3066\u3082\u3059\u3050\u306b\u5fd8\u308c\u308b\u30e1\u30e2","description":"\u30d5\u30a3\u30dc\u30ca\u30c3\u30c1\u6570\u5217\uff1a\u6b21\u306e\u6570\u5b57\u306f\u524d\u306e\u6570\u5b57\u3068\u305d\u306e\u524d\u306e\uff12\u3064\u3092\u8db3\u3057\u305f\u6570\u5b57\u3002 ghci> let fib=0:1:[a+b|(a,b)<-zip fib (tail fib)] ghci> take 20 $ fib [0,1,1,2,3,5,8,13,21,34,55,89,144,233,377,610,987,1597,2584,4181] \u7d20\u6570\uff1a1\u3068\u81ea\u5206\u81ea\u8eab\u4ee5\u5916\u306e\u3069\u3093\u306a\u81ea\u7136\u6570\u306b\u3088\u3063\u3066\u3082\u5272\u308a\u5207\u308c\u306a\u3044\u6570\u3002 ghci> take 20 $ map (\\[a,b]->b) $filter (\\a->length a==2) [(filter (\\a->x `rem` a == 0) [1..x])|x<-\u2026","provider_url":"https://hatena.blog","title":"\u300c\u30a8\u30e9\u30c8\u30b9\u30c6\u30cd\u30b9\u306e\u7be9\u300d\u306a\u3069\u3002","type":"rich"}