2007-10-18 キモ可愛い Haskell divisors :: Int -> [Int] divisors n = [d | d <- [1 .. n], n `mod` d == 0] isPrime n = divisors n == [1, n]たまらん。実用的な物作ろうと思ったら絶対こんな書き方しないけどね。