{"url":"https://gemma.hatenadiary.org/entry/20090420/1240260345","type":"rich","height":"190","image_url":null,"provider_name":"Hatena Blog","description":"\u4e8c\u9032\u6570\u8868\u8a18\u306b\u5909\u63db\u3057\u3066\u307f\u308b - \u307f\u305a\u3074\u30fc\u65e5\u8a18 \u7d4c\u7531 \u7d20\u6570\u306e\u4e8c\u9032\u6cd5\u8868\u8a18 - \u897f\u5c3e\u6cf0\u548c\u306e\u306f\u3066\u306a\u30c0\u30a4\u30a2\u30ea\u30fc format \"~8@a\" \u3067\u53f3\u8a70\u3081\u306b\u3057\u3066\u3001tr\u3067\"01\"\u3092\":#\"\u306b\u5909\u63db\u3059\u308b\u3002 tr\u306e\u547c\u3073\u51fa\u3057\u30921\u56de\u306b\u3057\u3066\u3044\u308b\u306e\u304c\u30df\u30bd\u3002 (use srfi-1) (use srfi-42) (use text.tr) (define (primes n) (cond ((<= n 1) (list)) ((= n 2) (list 2)) (else (let loop ((l (list-ec (:range x 3 n 2) x)) (prime-list (list 2))) (let1 m (car\u2026","published":"2009-04-20 05:45:45","width":"100%","blog_title":"Gemma\u306e\u65e5\u8a18","blog_url":"https://gemma.hatenadiary.org/","author_name":"Gemma","author_url":"https://blog.hatena.ne.jp/Gemma/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fgemma.hatenadiary.org%2Fentry%2F20090420%2F1240260345\" title=\" Gauche\u3067\u7d20\u6570\u306e\u4e8c\u9032\u6cd5\u8868\u8a18 - Gemma\u306e\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","categories":[],"version":"1.0","title":" Gauche\u3067\u7d20\u6570\u306e\u4e8c\u9032\u6cd5\u8868\u8a18","provider_url":"https://hatena.blog"}