%  M-file that finds the root of sin(t)=0
%  between 3 and 4
%Usage: root1
t=3:.25:4;
c=polyfit(t,sin(t),3);
r=roots(c);
for i=1:3
   if imag(r(i))==0
      if((r(i)>3)&(r(i)<4))
          disp(r(i))
       end
   end
end
