¿ÍÀ¸¥²¡¼¥àÌÌÇò¤¤

Àè½µ¤ÎÅÚÍËÆü¤Ë¿ÍÀ¸¥²¡¼¥à¤òÇã¤Ã¤Æ¤­¤¿¡£
»Ò¶¡¤Î¤³¤í¤Ëͧã¤Î²È¤Ç¤ä¤Ã¤¿¤³¤È¤¬¤¢¤ë¤¬¡¢¤­¤Á¤ó¤È¤·¤¿¥ë¡¼¥ë¤Ç¤ä¤ë¤Î¤Ï½é¤á¤Æ¡£
ºÊ¤ÈÆó¿Í¤Ç¤ä¤Ã¤¿¤Î¤À¤¬¡¢ÌÌÇò¤¯¤ÆÆó²ó¤ä¤Ã¤¿¡£
TV¥²¡¼¥à¤È¤Ï¤Þ¤¿°ã¤Ã¤¿ÌÌÇò¤ß¤¬¤¢¤Ã¤Æ¤è¤¤¡£
1½µÌܤϳô¤ò°ìÅ٤˰ìË礷¤«¹ØÆþ¤Ç¤­¤Ê¤¤¤³¤È¤òÃΤ餺¤ËÂçÎ̹ØÆþ¤·¡¢³ô²Á˽Íî¤ÇÂ绳²¤ò¤³¤¦¤à¤ê¡¢³«ÂóÃϤǼڶâ¤òÊú¤¨¤¿¤Þ¤Þ½ª¤ï¤Ã¤¿¡£
2½µÌܤÏÃÏÌ£¤Ç̵Æñ¤Ê¿ÍÀ¸¤À¤Ã¤¿¡£
¥Þ¥¤¥ë¡¼¥ëºî¤Ã¤Æ¥×¥ì¥¤¤¹¤ë¤È¤â¤Ã¤ÈÌÌÇò¤½¤¦¡£
ºÊ¤¬¤ª¤¤¤·¤¤¤«¤éÍȤ²¤ò¤Ä¤¯¤Ã¤Æ¤¯¤ì¤Þ¤·¤¿¡£
·ëº§¼°¤Î°ú¤­½Ðʪ¤Ç¤â¤é¤Ã¤¿¥ï¥¤¥ó¥°¥é¥¹¤Ë¥ß¥Ä¥ä¥µ¥¤¥À¡¼¤òÆþ¤ì¤Æ°û¤ß¤Þ¤·¤¿¡£
¤è¤¤ÅÚÍËÆü¤Ç¤·¤¿¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | ¤½¤Î¾ | 21:05 | comments(0) | trackbacks(0) |

SICP¥á¥â(10)¡¡2.3.2µ­¹æÈùʬ

2.3.2¤Îµ­¹æÈùʬ¤¬ÌÌÇò¤½¤¦¤Ê¤Î¤Ç¤Á¤ç¤Ã¤ÈÆɤó¤Ç¤ß¤ë¡£¼¡¤Î¥³¡¼¥É¤òÆɤ߲ò¤¯¡£

(define (deriv exp var)
  (cond ((number? exp) 0)
        ((variable? exp)
         (if (same-variable? exp var) 1 0))
        ((sum? exp)
         (make-sum (deriv (addend exp) var)
                   (deriv (augend exp) var)))
        ((product? exp)
         (make-sum
           (make-product (multiplier exp)
                         (deriv (multiplicand exp) var))
           (make-product (deriv (multiplier exp) var)
                         (multiplicand exp))))
        (else
         (error "unknown expression type -- DERIV" exp))))


((number? exp) 0)→¼°¤¬Äê¿ô¤Ê¤é¤Ð·ë²Ì¤Ï0¡£(d/dx)const=0¤À¤«¤é¤Í¡£
((variable? exp)
 (if (same-variable? exp var) 1 0))
→¼°¤¬ÈùʬÊÑ¿ô¤Ë°ìÃפ·¤Æ¤¤¤ë¤È¤­¤Ï1¡¢¤½¤¦¤Ç¤Ê¤¤¤È¤­0¡£(d/dx)x=1,(d/dx)y=0¤Ã¤Æ¤³¤È¤À¤Í¡£
((sum? exp)
 (make-sum (deriv (addend exp) var)
 (deriv (augend exp) var)))
→(addend exp)¤Ïexp¤ÎÆóÈÖÌܤÎÍ×ÁǤò¡¢(augend exp)¤Ï»°ÈÖÌܤÎÍ×ÁǤòÈ´¤­½Ð¤¹¡£exp¤¬sum¤Î·Á¡¢¤¹¤Ê¤ï¤Á(+ u v)¤Î·Á¤Î¤È¤­¡¢u¤ÎÈùʬ¤Èv¤ÎÈùʬ¤ò­¤¹¤Ã¤Æ¤³¤È¤À¤Í¡£(d/dx)(u+v)=(d/dx)u+(d/dx)v¤Ã¤Æ¤³¤È¤À¤Í¡£
((product? exp)
 (make-sum
  (make-product (multiplier exp)
   (deriv (multiplicand exp) var))
  (make-product (deriv (multiplier exp) var)
   (multiplicand exp))))
(multiplicand exp)¤Ïexp¤ÎÂè»°Í×ÁǤò¡¢(multiplier exp)¤ÏÂèÆóÍ×ÁǤòÈ´¤­½Ð¤¹¡£exp¤¬ÀѤηÁ(* u v)¤Î¤È¤­(d/dx)(uv)=u(d/dx)v+v(d/dx)u¤Ë¤Ê¤ë¤Ã¤Æ¤³¤È¤Í¡£

¤Õ¤à¤Õ¤à¡£·ë¹½¤­¤ì¤¤¤Ë½ñ¤±¤ë¤â¤Î¤À¡£
¤¢¤È¤Ï¤³¤Î¼ê³¤­¤Ç»È¤ï¤ì¤Æ¤¤¤ëvariable?¤ä¤é¤òÄêµÁ¤¹¤ëɬÍפ¬¤¢¤ë¤¬¤½¤ì¤Ï¤½¤ó¤Ê¤ËÆñ¤·¤¯¤Ê¤¤¡£¤Î¤Ç¾Êά¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 20:29 | comments(0) | trackbacks(0) |

SICP¥á¥â(9) ÌäÂê2.17 & ÌäÂê2.18

2.2Àá¤Çlist¤È¤¤¤¦¤â¤Î¤¬½Ð¤Æ¤­¤¿¡£
cons¤Ç¥Ú¥¢¤ò½ç¤Ë·Ò¤¤¤À¤â¤Î¤é¤·¤¤¡£

(list 1 2 3 4)
(1 2 3 4)

C¸À¸ì¤ÎÇÛÎó¤Î¤è¤¦¤Ë»È¤¦¤Ë¤Ï¼è¤ê°·¤¦¤¿¤á¤Î¼ê³¤­¤¬É¬ÍפÀ¡£
¥ê¥¹¥È¤ÎºÇ¸å¤ÎÍ×ÁǤòÊÖ¤¹¼ê³¤­¤òÄêµÁ¤»¤è¡¢¤È¤¤¤¦¤Î¤¬ÌäÂê2.17¡£
Í×ÁǤò¼è¤ê½Ð¤¹¤Ë¤Ïcdr¤ò²¿ÅÙ¤«ºîÍѤµ¤»¤Æcar¤òºîÍѤµ¤»¤ë¤Î¤¬´ðËÜ¡£
Î㤨¤Ð(1 2 3 4)¤Ç3¤ò¼è¤ê½Ð¤·¤¿¤±¤ì¤Ðcdr¤ò2²óºîÍѤµ¤»¤Æcar¤Ç¼è¤ê½Ð¤»¤ë¡£
¥ê¥¹¥È¤¬¶õ¤«¤É¤¦¤«¤Ïnull?¤ÇÄ´¤Ù¤é¤ì¤ë¡£

¼¡¤Î¤è¤¦¤Ë¤·¤Æ¤ß¤¿¡£

(define (last-pair items)
  (define (last-pair-iter item0 item1)
  (cond
    ((null? item1) item0)
    (else (last-pair-iter item1 (cdr item1)))
    )
  )
  (last-pair-iter items (cdr items))
 
  )

(last-pair (list 1 2 3 4 5 6))
(6)

¥ê¥¹¥È¤¬¶õ¤Ë¤Ê¤ë¤Þ¤Çcdr¤òºîÍѤµ¤»¤Æ¤¤¤¯¡£¾ï¤ËºîÍѤµ¤»¤ëÁ°¤Î¥ê¥¹¥È¤òÊÝ»ý¤·¤Æ¤ª¤­¡¢¶õ¤Ë¤Ê¤Ã¤¿¤È¤­Ä¾Á°¤Î¥ê¥¹¥È¤òÊÖ¤»¤Ð¤½¤ì¤¬ºÇ¸å¤ÎÍ×ÁǤÀ¡£
¾¤Î¿Í¤Î²òÅú¤ò¸«¤Æ¤ß¤ë¤È¤â¤Ã¤È¸úΨ¤Î¤¤¤¤ÊýË¡¤¬¤¢¤ë¤Ê¡£ÌÌÇò¤¤¡£

ÌäÂê2.18¤Ï¥ê¥¹¥È¤ÎÍ×ÁǤòµÕ½ç¤Î¥ê¥¹¥È¤ËÊÑ´¹¤·¤Æ½ÐÎϤ»¤è¡¢¤È¤¤¤¦¤â¤Î¡£

(define (myreverse items)
  (define (myreverse-iter items r-items)
    (cond
      ((null? items) r-items)
      (else (myreverse-iter (cdr items) (cons (car items) r-items)))
      )
  )
  (myreverse-iter items (list))
  )

(myreverse (list 1 2 3 4))
(4 3 2 1)

SICP¤À¤È¶õ¤ÎÍ×ÁǤònil¤Ç¤¢¤é¤ï¤·¤Æ¤¿¤±¤ÉDrRacket¤À¤Ènil¤¬¤Ê¤¤¤è¤¦¤Ê¤Î¤Ç(list)¤ÇÂåÍÑ¡£

¤¹¤°¤ËË°¤­¤ë¤È»×¤Ã¤¿¤±¤É°Ê³°¤ËĹ³¤­¤·¤Æ¤¤¤ëSICP¡£ÌäÂ꤬¥Ñ¥º¥ë¤ß¤¿¤¤¤Ç¤ª¤â¤·¤í¤¤¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 21:19 | comments(0) | trackbacks(0) |

¡Ö¥¨¥¹¡×ÆÉλ

ÆÉλ¤·¤¿¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | ¤½¤Î¾ | 00:03 | comments(0) | trackbacks(0) |

SICP¥á¥â(8) ÌäÂê2.4

°ì¾Ï¸åȾ¤ÇÂÔ˾¤Î뤬½Ð¤Æ¤­¤¿¤ï¤±¤À¤¬¡¢¤è¤¯¤ï¤«¤é¤ó¤Î¤Ç·Ú¤¯Æɤó¤Ç¥¹¥ë¡¼¤·¤Æ¤¤¤¿¡£
¾¯¤·¤º¤Ä뤬Áý¤¨¤Æ¤­¤Æ¤è¤¯¤ï¤«¤é¤Ê¤¯¤Ê¤Ã¤Æ¤­¤¿¤Î¤Ç¤Á¤ç¤Ã¤Èλ¤ÇÍ·¤ó¤Ç¤ß¤ë¤³¤È¤Ë¤·¤¿¡£

Scheme¤Ç¤¤¤¦lambda¤Ã¤Æ²¿¤«¤È¤¤¤¦¤È̵̾¤Î´Ø¿ô¤òÄêµÁ¤¹¤ë¤â¤Î¤é¤·¤¤¡£
¼Â¤Ï¤³¤ì¤Þ¤Çdefine¤Ç´Ø¿ô¤òÄêµÁ¤·¤Æ¤­¤¿¤Î¤Ï°Å¤Ëlambda¤ò¸Æ¤ó¤Ç¤¤¤¿¤é¤·¤¤¡£

(define (f x) (* x x))
¤Ï
(define f (lambda (x) (* x x)))
¤Î¾Êά·Á¤é¤·¤¤¡£ÌµÌ¾´Ø¿ô¤Ëdifine¤Ç̾Á°¤ò¤Ä¤±¤Æ¤¤¤ë¤ï¤±¤À¡£
¼¡¤Î¤è¤¦¤Ë¤·¤ÆÃͤòÆÀ¤ë¤³¤È¤¬¤Ç¤­¤ë¡£

((lambda (x) (* x x)) 2)
4

2¾ÏÁ°È¾¤Ç¸ÍÏǤ俤Τϼ¡¤Î¤è¤¦¤Ê´¶¤¸¤Îµ­½Ò¡£
(define (f x)
  (lambda (m) (m x x))
  )

((f 3) *)
9

¤ó¡©´Ø¿ôf¤Î°ú¿ô¤Ïx¤À¤±¤Ê¤Î¤Ëlambda¤Ï°ú¿ô¤Ëm¤Ã¤Æ¤¤¤¦Ææ¤ÎÊÑ¿ô¤¬¤¢¤ë¡ª
¤³¤ì¤Ï¤É¤¦¤ä¤é
(f x)¤¬(lambda (m) (m x x))¤ËÃÖ¤­´¹¤¨¤é¤ì¤ë¤Ã¤Ý¤¤¡£¤¿¤Ö¤ó¡£
¤Ê¤Î¤Ç
(f 3)¤Ï(lambda (m) (m 3 3))¤ËÃÖ¤­´¹¤¨¤é¤ì¤Æ¡¢*¤òÂåÆþ¤¹¤ì¤Ð3*3¤¬ÆÀ¤é¤ì¤ë¤È¤¤¤¦¤³¤È¤«¤Ê¡£
¤ä¤ä¤³¤·¤¤¡£
»È¤Ã¤Æ¤¤¤ë¤¦¤Á¤Ë´·¤ì¤ë¤ó¤À¤í¤¦¤±¤É¡£
ËèÆü¾¯¤·¤Ç¤â¥³¡¼¥É¤ò½ñ¤«¤Ê¤¤¤È˺¤ì¤Æ¤·¤Þ¤¤¤½¤¦¡£

¤È¤Ë¤«¤¯¡¢¤³¤ì¤¬¤ï¤«¤ì¤ÐÌäÂê2.4¤¬²ò¤±¤ë¡£cons¡¢car¤ÈƱ¤¸Æ°ºî¤ò¤¹¤ë´Ø¿ô¤òÄêµÁ¤·¤Æ¤¤¤Æ¡¢cdr¤âƱ¤¸¤è¤¦¤ËÄêµÁ¤·¤í¤È¤¤¤¦ÌäÂê¡£ÌäÂ꼫ÂΤϴÊñ¤À¤¬¡¢Æ°ºî¤¬¤ä¤ä¤³¤·¤¤¡£
(define (mycons x y)
  (lambda (m) (m x y))
  )

(define (mycar z)
  (z (lambda (p q) p))
  )

(define (mycdr z)
  (z (lambda (p q) q))
  )

(mycdr (mycons 2 3))
3

(mycons 2 3)¤Ï(lambda (m) (m 2 3))¤ËÃÖ¤­´¹¤¨¤é¤ì¤ë¡£
(mycdr (mycons 2 3))¤Ï((mycons 2 3) (lambda (p q) q))¤ËÃÖ¤­´¹¤¨¤é¤ì¡¢¤³¤ì¤Ï((lambda (m) (m 2 3)) (lambda (p q) q))¤È¤Ê¤ë¡£m¤Ë(lambda (p q) q)¤òÂåÆþ¤¹¤ë¤ï¤±¤À¡£
¤¹¤ë¤Èp=2¡¢q=3¤¬ÂåÆþ¤µ¤ì¡¢q¤¬¼è¤ê½Ð¤µ¤ì¤ë¡£¤¦¡¼¤ó¡¢¤ä¤ä¤³¤·¤¤¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 21:03 | comments(0) | trackbacks(0) |

¡Ö¥Ð¡¼¥¹¥Ç¥¤¡×ÆÉλ

¡Ö¥ê¥ó¥°¡×¡Ö¤é¤»¤ó¡×¡Ö¥ë¡¼¥×¡×¤Ë³¤­¡Ö¥Ð¡¼¥¹¥Ç¥¤¡×ÆÉλ¡£
ûÊÔ½¸¡£
¤³¤ì¤Þ¤Ç¤ÎÊä­Ū¤ÊÆâÍÆ¡£

ÌÌÇò¤«¤Ã¤¿¤¬Ê̤ˤʤ¯¤Æ¤â¤¤¤¤¤«¤Ê¡¢¤È¤¤¤¦´¶¤¸¡£

¡Ö¥¨¥¹¡×¤âÃíʸºÑ¤ß¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | ¤½¤Î¾ | 19:45 | comments(0) | trackbacks(0) |

¡Ö¥ë¡¼¥×¡×ÆÉλ

¡Ö¥ê¥ó¥°¡×¡Ö¤é¤»¤ó¡×¤Ë³¤­¡¢¡Ö¥ë¡¼¥×¡×¤âÆÉλ¤·¤¿¡£
¥Û¥é¡¼Í×ÁǤʤ·¡¢SF¤À¤Ê¡£

Á°2ºî¤ÎÆ椬Á´¤Æ²ò¤«¤ì¤Æ¤¤¤ë¡£ÌÌÇò¤¤¡£
Ÿ³«¤È¤·¤Æ¤Ï¤½¤ó¤Ê¤Ë´ñÈ´¤Ê¤â¤Î¤Ç¤Ï¤Ê¤¤¤¬¡¢Ê¸¾Ï¤¦¤Þ¤¤¤Ê¤¢¡£¤Ò¤­¤Ä¤±¤é¤ì¤ë¡£

¼¡¤Ï¡Ö¥Ð¡¼¥¹¥Ç¥¤¡×¤À¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | ¤½¤Î¾ | 15:43 | comments(0) | trackbacks(0) |

SICP¥á¥â(7) ÌäÂê2.1

SCIP¤Ç¤ÏÍ­Íý¿ô¤ò°·¤¦¤¿¤á¡¢¼¡¤Î¤è¤¦¤Ê¼ê³¤­¤òÄêµÁ¤·¤Æ¤¤¤ë¡£

(define (make-rat n d) (cons n d))
(define (numer x) (car x))
(define (denom x) (cdr x))
(define (print-rat x) (display (numer x)) (display "/")(display (denom x)))

¾¤Ë¤â­¤·»»¤È¤«°ú¤­»»¤È¤«¤â¤¢¤ë¡£Í­Íý¿ô¤òºî¤Ã¤Æ¼Â¹Ô¤·¤Æ¤ß¤ë¤È¡¢
(print-rat (make-rat 2 3))
2/3
¤¿¤À¡¢¾¯¤·ÌäÂ꤬¤¢¤Ã¤Æ¡¢Î㤨¤Ð
(print-rat (make-rat -2 -3))
-2/-3
¤È¤Ê¤Ã¤Æ¤·¤Þ¤¦¡£Ê̤ˤ¤¤¤¤Ã¤Á¤ã¤¤¤¤¤è¤¦¤Êµ¤¤â¤¹¤ë¤¬¤³¤ì¤òľ¤»¤È¤¤¤¦ÌäÂê¡£
ñ¤ËʬÊ줬Éé¤Ê¤éʬ»Ò¤ÈʬÊì¤Ë-1¤ò¤«¤±¤ì¤Ð¤¤¤¤¤À¤±¤À¡£¤³¤ì¤À¤È1 -3¤òÍ¿¤¨¤¿¤È¤­1/-3¤Èɽ¼¨¤µ¤ì¤Æ¤·¤Þ¤¦¤â¤Î¤â-1/3¤È¤Ê¤Ã¤Æ¤¤¤¤´¶¤¸¡£

(define (make-rat n d)
  (cond
  ((< d 0) (cons (* -1 n) (* -1 d)))
  (else (cons n d))
  )
)
(print-rat (make-rat -2 -3))
2/3

´Êñ¤À¤Í¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 07:24 | comments(0) | trackbacks(0) |

SICP¥á¥â(6) 2.1.1 cons,car,cdr

2¾Ï¤ØÆÍÆþ¡£
¤«¤Ê¤êÈô¤Ð¤·Æɤߤ·¤Æ¤¤¤ë¤¬¡¢¤¸¤Ã¤¯¤êÆɤ߹þ¤ó¤Ç¤¤¤¯¤Î¤Ï¸úΨ¤¬°­¤¤¤Î¤ÇÈô¤Ð¤·Æɤߤǥ¬¥ó¥¬¥óÀè¤Ø¿Ê¤ß¤Ä¤Ä¡¢µ¤¤¬¸þ¤¤¤¿¤éÁ°¤ËÌá¤Ã¤Æ¤¸¤Ã¤¯¤êÆɤà¹þ¤à¡¢¤È¤¤¤¦ÆɤßÊý¤ò¤¹¤ë¡£
¤³¤¦¤¤¤¦ÆɤßÊý¤ÎÊý¤¬Á´ÂÎÁü¤¬¤ï¤«¤Ã¤ÆÆɤ߰פ¤¡£Ëͤϡ£

2.1.1¤Ç¤Ïcons¡¢car¡¢cdr¤È¤¤¤¦¤â¤Î¤ò»È¤Ã¤ÆÍ­Íý¿ô¤ò°·¤¦Î㤬¾Ò²ð¤µ¤ì¤Æ¤¤¤ë¡£
cons¤Ï¥Ú¥¢¤òºî¤ë¤È¤­¤Ë»È¤¦¤é¤·¤¤¡£

(cons 2 3)
(2 . 3)

¥Ú¥¢¤Î¥Ú¥¢¤âºî¤ì¤ë¡£

(cons (cons 2 3) (cons 4 5))
((2 . 3) 4 . 5)

car,cdr¤Ï¥Ú¥¢¤Î°ì¤ÄÌܤÎÍ×ÁÇ¡¢Æó¤ÄÌܤÎÍ×ÁǤÎÃͤòÊÖ¤¹¤é¤·¤¤¡£

(car (cons 2 3))
2
(cdr (cons 2 3))
3
(car (cons (cons 2 3) (cons 4 5)))
(2 . 3)
(car (car (cons (cons 2 3) (cons 4 5))))
2

¼¡¤Î¤è¤¦¤Ê¤³¤È¤â¤Ç¤­¤ë¤ß¤¿¤¤¡£
(define (f a b) (+ a b))
(define (g a b) (- a b))
((car (cons f g)) 1 2)
3

¤Õ¡¼¤ó¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 07:17 | comments(0) | trackbacks(0) |

SICP¥á¥â(5) ÌäÂê1.11

SICP¤Ë¤ÏÎý½¬ÌäÂ꤬¤Á¤ç¤³¤Á¤ç¤³½Ð¤Æ¤¯¤ë¤¬¡¢µ¤¤¬¸þ¤¤¤¿¤â¤Î¤Î¤ß²ò¤¤¤Æ¤¤¤¯¡£
ÌäÂê1.11¤Ï¤¢¤ëÎÙÀÜ»°¹à´ÖÁ²²½¼°¤¬Í¿¤¨¤é¤ì¤Æ¤¤¤Æ¡¢¤½¤ì¤òºÆµ¢¤ÈÈ¿Éü¤ÎξÊý¤Î¥¢¥ë¥´¥ê¥º¥à¤Ç½ñ¤±¤È¤¤¤¦¤â¤Î¡£

­¡ºÆµ¢ÈÇ
(define (f n)
  (cond
    ((< n 3) n)
    (else (+ (f (- n 1)) (* 2 (f (- n 2))) (* 3 (f (- n 3)))))
  )
)

(f 4)

­¢È¿ÉüÈÇ
(define (calc a b c) (+ (* 3 a) (* 2 b) c))

(define (f-iter count n a b c)
  (cond
    ((< n 3) n)
    ((= count n) (display "end"))
    (else (display a) (display "¥n") (f-iter (+ 1 count) n b c (calc a b c)))
    )
 
  )(define (f n) (f-iter 0 n 0 1 2))
   
 (f 5)
0
1
2
4
11
end


´Êñ¡£SICP¤Ë¤â½ñ¤¤¤Æ¤¢¤Ã¤¿¤È»×¤¦¤¬¡¢ºÆµ¢ÈǤϸúΨ¤³¤½°­¤¤¤â¤Î¤Î¡¢ÄêµÁ¼°¤½¤Î¤â¤Î¤Ç¸«±É¤¨¤¬¤¤¤¤¤Ê¡£
¥¸¥ã¥¸¥ã¥¬¥Ã¥Á | LISP | 16:10 | comments(0) | trackbacks(0) |
1/2PAGES | >> |

10
--
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
--
>>
<<
--
PR
RECOMMEND
RECENT COMMENT
MOBILE
qrcode
OTHERS
Since 2013/09/17
LATEST ENTRY
CATEGORY
ARCHIVE
LINKS
PROFILE
SEARCH