Brilliant numbers: Difference between revisions
Content added Content deleted
Line 458: | Line 458: | ||
let brilliants = filter isBrilliant [1 ..] |
let brilliants = filter isBrilliant [1 ..] |
||
indexedBrilliants = zip [1 ..] brilliants |
indexedBrilliants = zip [1 ..] brilliants |
||
putStrLn $ |
putStrLn $ |
||
table " " $ |
table " " $ |
||
chunksOf 10 $ |
chunksOf 10 $ show <$> take 100 brilliants |
||
show |
|||
<$> take 100 brilliants |
|||
putStrLn "(index, brilliant)" |
putStrLn "(index, brilliant)" |
||
Line 472: | Line 471: | ||
$ zip indexedBrilliants (tail indexedBrilliants) |
$ zip indexedBrilliants (tail indexedBrilliants) |
||
⚫ | |||
⚫ | |||
table :: String -> [[String]] -> String |
table :: String -> [[String]] -> String |