Created

Embed URL

HTTPS clone URL

SSH clone URL

You can clone with HTTPS or SSH.

Download Gist

Project Euler - Problem 9

View euler-009.hs
1 2 3 4 5 6 7 8
result = truncate
$ product
$ head
$ filter (\ns -> sum ns == 1000)
$ map (\[x,y,xy'] -> [x,y,sqrt(xy')])
[[x, y, x^2 + y^2] |
x <- [1..995],
y <- [(x + 1)..996]]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.