{"blog_title":"\u30a8\u30f3\u30b8\u30cb\u30a2\u306e\u30bd\u30d5\u30c8\u30a6\u30a7\u30a2\u7684\u611b\u60c5","version":"1.0","author_url":"https://blog.hatena.ne.jp/E_Mattsan/","height":"190","image_url":null,"categories":["\u3081\u3082","Prolog","Ruby","Haskell"],"provider_url":"https://hatena.blog","url":"https://blog.emattsan.org/entry/20160129/1454071258","description":"\u5099\u5fd8\u9332\u3002 Haskell operate :: [Integer] -> String -> [Integer] operate (r:l:st) \"+\" = (l + r):st operate (r:l:st) \"-\" = (l - r):st operate (r:l:st) \"*\" = (l * r):st operate (r:l:st) \"/\" = (l `div` r):st operate stack t = (read t::Integer):stack rpn :: String -> Integer rpn s = case foldl operate [] (words\u2026","published":"2016-01-29 21:40:58","provider_name":"Hatena Blog","type":"rich","author_name":"E_Mattsan","title":"\u9006\u6ce2\u862d\u8a18\u6cd5\u8a08\u7b97\u6a5f","width":"100%","blog_url":"https://blog.emattsan.org/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fblog.emattsan.org%2Fentry%2F20160129%2F1454071258\" title=\"\u9006\u6ce2\u862d\u8a18\u6cd5\u8a08\u7b97\u6a5f - \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>"}