vin / challenge

Python challenge and project euler

This URL has Read+Write access

challenge / euler / euler012.hs
100644 7 lines (4 sloc) 0.119 kb
raw blame history 
1
2
3
4
5
6
7

import Data.List
import Primes (numfactors)
 
tris = scanl1 (+) [1..]
 
main = print $ find ((>= 500) . numfactors) tris