標高+1m

Don't be rational

Nadeko teaser

もうちょっとしたら Nadeko のこと書きます。

(Y (-> (fib) (cons 1 (fib -zipWith + (cdr fib)) -cons 1)) 
  -take 10 -reverse -fold (compose (compose ++ (++ ",")) show) "")

これはLisp方言と言っていいのか否か。