{"height":"190","blog_url":"https://nishiohirokazu.hatenadiary.org/","author_url":"https://blog.hatena.ne.jp/nishiohirokazu/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fnishiohirokazu.hatenadiary.org%2Fentry%2F20081024%2F1224861700\" title=\"Haskell\u306e\u30ac\u30fc\u30c9\u52c9\u5f37\u4e2d - \u897f\u5c3e\u6cf0\u548c\u306e\u306f\u3066\u306a\u30c0\u30a4\u30a2\u30ea\u30fc\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","blog_title":"\u897f\u5c3e\u6cf0\u548c\u306e\u306f\u3066\u306a\u30c0\u30a4\u30a2\u30ea\u30fc","provider_name":"Hatena Blog","author_name":"nishiohirokazu","url":"https://nishiohirokazu.hatenadiary.org/entry/20081024/1224861700","image_url":null,"provider_url":"https://hatena.blog","version":"1.0","published":"2008-10-24 00:21:40","description":"before between :: Int -> Int -> Int -> Bool between x y z = if ((y < x && x < z) || (z < x && x < y)) then True else False after between :: Int -> Int -> Int -> Bool between x y z | y < x && x < z = True | z < x && x < y = True | otherwise = False before progress_turn :: Int -> Int -> Int -> [Int] p\u2026","title":"Haskell\u306e\u30ac\u30fc\u30c9\u52c9\u5f37\u4e2d","width":"100%","type":"rich","categories":[]}