function n = just_enough(x,N)
n = 0;
y = exp(x);
while n*y < N^x
   n = n + 1;
end 