{"version":"1.0","title":" SICP\u3092\u8aad\u3080(36) 2.1.3 \u30c7\u30fc\u30bf\u3068\u306f\u4f55\u304b\u3002","url":"https://boxnos.hatenablog.com/entry/20070717/1184683701","width":"100%","image_url":null,"height":"190","categories":["Scheme"],"provider_name":"Hatena Blog","blog_url":"https://boxnos.hatenablog.com/","author_name":"tanakaBox","type":"rich","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20070717%2F1184683701\" title=\" SICP\u3092\u8aad\u3080(36) 2.1.3 \u30c7\u30fc\u30bf\u3068\u306f\u4f55\u304b\u3002 - \u30dc\u30af\u30ce\u30b9\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","blog_title":"\u30dc\u30af\u30ce\u30b9","description":"\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u898b\u3066\u300c\u5370\u5237\u30df\u30b9\u300d\u306a\u3093\u3058\u3083\u306a\u3044\u304b\u3068\u601d\u3063\u305f\u3002 (define (cons x y) (define (dispatch m) (cond ((= m 0) x) ((= m 1) y) (else (error \"Argument not 0 or 1 -- CONS\" m)))) dispatch) (define (car z) (z 0)) (define (cdr z) (z 1)) \u3053\u3093\u306a\u306e\u3067\u3001cons\u304c\u5b9a\u7fa9\u51fa\u6765\u308b\u306f\u305a\u304c\u7121\u3044!!\u3046\u305d\u3060\u3041\u3041\u3041\u301c\u301c\u301c!!\u3068\u3001\u3057\u3070\u3089\u304f\u8003\u3048\u3066\u3057\u307e\u3063\u305f\u3002 \u675f\u7e1b \u30ad\u30fc\u30ef\u30fc\u30c9\u306f\u300c\u675f\u7e1b\u300d\u306b\u3042\u3063\u305f\u3002(cons 1 2)\u3067\u3001#\u3092\u8fd4\u3059\u3002\u4f5c\u7528\u3057\u3066\u3044\u306a\u3044\u3002\u306a\u3093\u3068\u3001x\u3068\u2026","published":"2007-07-17 23:48:21","author_url":"https://blog.hatena.ne.jp/tanakaBox/","provider_url":"https://hatena.blog"}