{"type":"rich","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Finamori.hateblo.jp%2Fentry%2F20100425%2Fp1\" title=\"Project Euler 16 - inamori\u2019s diary\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","url":"https://inamori.hateblo.jp/entry/20100425/p1","categories":["F#"],"provider_name":"Hatena Blog","height":"190","width":"100%","image_url":null,"blog_title":"inamori\u2019s diary","blog_url":"https://inamori.hateblo.jp/","title":"Project Euler 16","published":"2010-04-25 00:00:01","author_name":"inamori","description":"http://projecteuler.net/index.php?section=problems&id=16 \u30d3\u30c3\u30c8\u6f14\u7b97\u5b50\u306f\u540c\u3058\u8a18\u53f7\u30923\u3064\u91cd\u306d\u307e\u3059\u3002&&&, |||, ^^^, ~~~, >> \u304c\u3042\u308a\u307e\u3059\u3002 \u591a\u500d\u9577\u6574\u6570\u3082\u30d3\u30c3\u30c8\u6f14\u7b97\u3067\u304d\u307e\u3059\u3002 let rec digits n = if n = 0I then [] else (digits (n / 10I)) @ [int (n % 10I)] printfn \"%d\" (List.sum (digits (1I <<< 1000)))","provider_url":"https://hatena.blog","author_url":"https://blog.hatena.ne.jp/inamori/","version":"1.0"}