Implement sqrt_newton/erlang