My erlang program to solve project euler challenges