{"description":"\u30de\u30af\u30ed\u304a\u3082\u3057\u308d\u3044\u306a\u3042\u3002 #!/usr/bin/env gosh (define-macro (ca..r n) (string->symbol (make-string n #\\a)) `(define ( ,(string->symbol (string-append \"c\" (make-string n #\\a) \"r\")) lis) (define (/lis lis i) (if (> i 0) (/lis (car lis) (- i 1)) lis)) (/lis lis ,n))) (ca..r 3) (ca..r 10) (print (caar '((1 . 2) . 3))\u2026","type":"rich","categories":["gauche"],"author_url":"https://blog.hatena.ne.jp/javascripter/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fjavascripter.hatenablog.com%2Fentry%2F20081008%2F1223458498\" title=\"\u95a2\u6570\u3092\u5b9a\u7fa9\u3059\u308b\u30de\u30af\u30ed - \u7d20\u4eba\u304c\u30d7\u30ed\u30b0\u30e9\u30df\u30f3\u30b0\u3092\u52c9\u5f37\u3057\u3066\u3044\u305f\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>","provider_url":"https://hatena.blog","height":"190","blog_title":"\u7d20\u4eba\u304c\u30d7\u30ed\u30b0\u30e9\u30df\u30f3\u30b0\u3092\u52c9\u5f37\u3057\u3066\u3044\u305f\u30d6\u30ed\u30b0","blog_url":"https://javascripter.hatenablog.com/","url":"https://javascripter.hatenablog.com/entry/20081008/1223458498","provider_name":"Hatena Blog","width":"100%","title":"\u95a2\u6570\u3092\u5b9a\u7fa9\u3059\u308b\u30de\u30af\u30ed","published":"2008-10-08 18:34:58","image_url":null,"version":"1.0","author_name":"javascripter"}