added prime generation
euler 37 in erlang
euler 38 in erlang