{"categories":["Haskell"],"width":"100%","version":"1.0","author_url":"https://blog.hatena.ne.jp/E_Mattsan/","title":"Prelude\u63a2\u8a2a","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fblog.emattsan.org%2Fentry%2F20070819%2F1187500522\" title=\"Prelude\u63a2\u8a2a - \u30a8\u30f3\u30b8\u30cb\u30a2\u306e\u30bd\u30d5\u30c8\u30a6\u30a7\u30a2\u7684\u611b\u60c5\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","image_url":null,"height":"190","blog_url":"https://blog.emattsan.org/","author_name":"E_Mattsan","url":"https://blog.emattsan.org/entry/20070819/1187500522","published":"2007-08-19 14:15:22","provider_name":"Hatena Blog","type":"rich","description":"scanl\u3092\u4f7f\u3063\u305f\u30d5\u30a3\u30dc\u30ca\u30c3\u30c1\u6570\u5217 fib = scanl (+) 1 (0:fib) all\u3092\u4f7f\u3063\u305f\u6700\u5927\u5024\u3092\u6c42\u3081\u308b\u95a2\u6570 \u4ee5\u524d\u306e\u4f8b\u3002 max_value ns = head [x | x <- ns, and $ map (\\ n -> x >= n) ns] all\u95a2\u6570\u3092\u4f7f\u3063\u3066\u3002 max_value ns = head [x | x <- ns, all (\\ n -> x >= n) ns] \u65e5\u672c\u8a9e\u3067\u66f8\u304f\u3068\u300cns\u306e\u8981\u7d20\u306e\u3046\u3061\u3001ns\u306e\u8981\u7d20n\u306e\u3059\u3079\u3066\u306b\u5bfe\u3057\u3066x>=n\u3068\u306a\u308b\u8981\u7d20x\u3001\u306e\u30ea\u30b9\u30c8\u3001\u306e\u6700\u521d\u306e\u5024\u300d\u3068\u3044\u3063\u305f\u3068\u3053\u308d\u3067\u3057\u3087\u3046\u304b\u3002","blog_title":"\u30a8\u30f3\u30b8\u30cb\u30a2\u306e\u30bd\u30d5\u30c8\u30a6\u30a7\u30a2\u7684\u611b\u60c5"}