Example 1: 
 
   > dirtyfindzeros(sin(x),[-5;5]);
 
   [|-3.14159265358979323846264338327950288419716939937508, 0, 3.14159265358979323846264338327950288419716939937508|]
 
 
 
Example 2: 
 
   > L1=dirtyfindzeros(x^2*sin(1/x),[0;1]);
 
   > points=1000!;
 
   > L2=dirtyfindzeros(x^2*sin(1/x),[0;1]);
 
   > length(L1); length(L2);
 
   18
 
   25