function y=etwop  (step)
   t = 0:step:2;
   h = 1e-5;
   y = 2 .^ t;
   yp= ( 2 .^ (t+h) - y) ./ h ;
   hold on;
   plot(t,y,t,yp);
   plot(t,yp/y);
end
