Project Euler Problem 11 in F#