{"height":"190","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Frskmt.hateblo.jp%2Fentry%2F20090813%2F1250147670\" title=\"\u540c\u3058\u6587\u5b57\u3092\u307e\u3068\u3081\u308b - \u3055\u304b\u3082\u3068\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>","version":"1.0","description":"http://www.shido.info/gb/guestbook.php?id=1413 common lisp\u3067\u306e\u5b9f\u88c5\u3092\u901a\u3057\u3066\uff0cscheme\u3068\u306e\u9055\u3044\u304c\u66f8\u304b\u308c\u3066\u3044\u308b\uff0e \u3053\u306e\u30da\u30fc\u30b8\u306b (pack '(a a a a b c c a a d e e e e)) ((A A A A) (B) (C C) (A A) (D) (E E E E))\u3068\u7d50\u679c\u304c\u8fd4\u3063\u3066\u304f\u308b\u3088\u3046\u306a\u95a2\u6570pack\u304c\u8f09\u3063\u3066\u3044\u305f\u306e\u3067\uff0cscheme\u3067\u3084\u3063\u3066\u307f\u305f\uff0e (define (pack lis) (pack-first lis)) (define (pack-first lis) (if (null? lis) '() (let \u2026","categories":["scheme"],"blog_title":"\u3055\u304b\u3082\u3068\u306e\u30d6\u30ed\u30b0","published":"2009-08-13 16:14:30","width":"100%","url":"https://rskmt.hateblo.jp/entry/20090813/1250147670","author_url":"https://blog.hatena.ne.jp/rsakamot/","author_name":"rsakamot","type":"rich","blog_url":"https://rskmt.hateblo.jp/","image_url":null,"provider_name":"Hatena Blog","title":"\u540c\u3058\u6587\u5b57\u3092\u307e\u3068\u3081\u308b"}