[[ProjectEular]]

 -- Problem 7
 
 module Main (main) where
 
 import qualified Common as C (factorize, is_prime)
 
 main :: IO ()
 main = print $ problem7
 
 problem7 :: (Integral a) => a
 problem7 = [ x | x <- (2:[3,5..]), C.is_prime x ] !! 10000


トップ   差分 バックアップ リロード   一覧 単語検索 最終更新   ヘルプ   最終更新のRSS