2007-08-22から1日間の記事一覧
なんのひねりもない。 $cat diff.hs diff (x:[]) = [] diff (x:y:ys) = (:) (y-x) $ diff $ y:ys $ ghci diff.hs ___ ___ _ / _ \ /\ /\/ __(_) / /_\// /_/ / / | | GHC Interactive, version 6.6, for Haskell 98. / /_\\/ __ / /___| | http://www.haskel…