{"provider_name":"Hatena Blog","blog_title":"a_kawashiro\u306e\u30d6\u30ed\u30b0","published":"2011-08-15 12:00:27","categories":[],"height":"190","author_name":"a_kawashiro","width":"100%","version":"1.0","title":"Haskell\u3067\u6570\u5f0f\u3092\u30d1\u30fc\u30b9\u3059\u308b","type":"rich","provider_url":"https://hatena.blog","image_url":null,"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fa-kawashiro.hatenablog.com%2Fentry%2F20110815%2F1313377227\" title=\"Haskell\u3067\u6570\u5f0f\u3092\u30d1\u30fc\u30b9\u3059\u308b - a_kawashiro\u306e\u30d6\u30ed\u30b0\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","blog_url":"https://a-kawashiro.hatenablog.com/","description":"\u4f7f\u3044\u65b9 :load \u3067\u8aad\u307f\u8fbc\u3093\u3060\u5f8c myEquation \"1+2*3\" import Text.ParserCombinators.Parsec myDigit :: Parser Char myDigit = oneOf ['0'..'9'] myNumberString :: Parser String myNumberString = do c<-myDigit do cs <- myNumberString return (c:cs) <|> return [c] myNumber :: Parser Integer myNumber = do s<-myNumberString r\u2026","url":"https://a-kawashiro.hatenablog.com/entry/20110815/1313377227","author_url":"https://blog.hatena.ne.jp/a_kawashiro/"}