関数型プログラミング言語Haskell Part31©2ch.net

[278 デフォルトの名無しさん 2017/11/19(日) 20:38:10.15 ID:21tWIVgE]

>>277
かっこいいコードだけど
省ける計算が多い分まだ試し割の方が速いんだな
primes = 2 : filter isPrime [3..]
isPrime x = all ((/=0) . (x`mod`)) $ takeWhile ((<=x) . (^2)) primes
数が大きくなればmodのコストが問題になるのかもしれないけど