Trying project euler only using erlang