Project Euler Problem 12 in F#