project euler with f#