(apply-generic op . args)

教育者, 将軍, 栄養士, 心理学者, 親はプログラムする. 軍隊, 学生, 一部の社会はプログラムされる. - 計算機プログラムの構造と解釈 序文

フィボナッチをrubyとpythonとschemeとCommonLispで書いて遊んでた

2週間くらい前に現実逃避に書いたもの

rubyで1行フィボナッチ

def fib n; n <= 1 ? n : fib(n-2) + fib(n-1); end

pythonでフィボナッチ

import sys

def fib(n):
    if n <= 1:
        return n
    else:
        return (fib(n-2) + fib(n-1))

if len(sys.argv) > 1:
    print fib(int(sys.argv[1]))
else:
    print "please num"

schemeでフィボナッチ

(define (fib n)
  (if (<= n 1)
    n
    (+ (fib (- n 2)) (fib (- n 1)))))

CommonLispでフィボナッチ

(defun fib (x)
  (if (<= x 1)
    x
    (+ (fib (- x 2)) (fib (- x 1)))))