Example 1: 
 
   > dirtyfindzeros(sin(x),[-5;5]);
 
   [|-3.1415926535897932384626433832795028841971693993751, 0, 3.1415926535897932384626433832795028841971693993751|]
 
 
 
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