<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<oembed>
  <author_name>quinoh</author_name>
  <author_url>https://blog.hatena.ne.jp/quinoh/</author_url>
  <blog_title>跳慮跋考</blog_title>
  <blog_url>https://kino.hateblo.jp/</blog_url>
  <categories>
    <anon>プログラミング</anon>
    <anon>Haskell</anon>
  </categories>
  <description>「8 8 9 9」のmake10を四則演算でやれと言う話なので。分かんないので。 アルゴリズムとしては「切符の番号で10を作る」のと同じです。カッコよく言うと分割統治法。コードはあんま美しくないけど。 import Data.List data Expr = C Int | Add Expr Expr | Sub Expr Expr | Mul Expr Expr | Div Expr Expr instance Show Expr where show (C x) = show x show (Add x y) = &quot;(&quot; ++ (show x) ++ &quot;+&quot; ++ (show y) ++ …</description>
  <height>190</height>
  <html>&lt;iframe src=&quot;https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkino.hateblo.jp%2Fentry%2F2013%2F02%2F24%2F012031&quot; title=&quot;make10 - 跳慮跋考&quot; class=&quot;embed-card embed-blogcard&quot; scrolling=&quot;no&quot; frameborder=&quot;0&quot; style=&quot;display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;&quot;&gt;&lt;/iframe&gt;</html>
  <image_url></image_url>
  <provider_name>Hatena Blog</provider_name>
  <provider_url>https://hatena.blog</provider_url>
  <published>2013-02-24 01:20:31</published>
  <title>make10</title>
  <type>rich</type>
  <url>https://kino.hateblo.jp/entry/2013/02/24/012031</url>
  <version>1.0</version>
  <width>100%</width>
</oembed>
