function [s,y]=hur(f,a,b,tol,kmax)
% A függvény leírását lásd a zh feladatlapján.
% f egy inline függvény, a,b, tol valós számok, 
% kmax pozitív egész
close all
ya=f(a); yb=f(b);
plot([a,b],[0,0],'b-',[a,b],[ya,yb],'bo-')
xx=linspace(a,b,50);
ff=f(xx);
axis([a,b,min(ff)-0.1*abs(min(ff)),max(ff)+0.1*abs(max(ff))])
...
pause
if ... 
    error('A végpontokban a függvényértékeknek ellenkezõ elõjelûnek kell lenni!')
end
disp('    lépés        a             b             s            y   ')
for k=1:kmax
    s=b-yb*(b-a)/(yb-ya);
    y=f(s);
    fprintf('%8.4f      %8.4f      %8.4f      %8.4f     %8.4f\n',k,a,b,s,y)    
    if abs(y)<...
        disp('A húrmódszer konvergált.'); break;
    end
    if y*ya<0
        b=s;
        yb=y;
    else
        ...
        ...
    end
    plot([s],[0],'bo',[a,b],[ya,yb],'bo-')
    pause
end
    
    
    