function a=bisez(a,b,e)

% Calcolo degli zeri della funzione
%   f(x)=exp(x)-log(x)-3
% usando il metodo di bisezione.

% Per calcolare le due radici di f(x):
%   >> bisez(.01,1,1e-4)
%   >> bisez(1,10,1e-4)

fa = exp(a)-log(a)-3;
fb = exp(b)-log(b)-3;

% Controllo dei dati iniziali.
if fa*fb>0 | b<a
    disp 'Dati non accettabili';
    return
end

while b-a>=e
    c = (a+b)/2;
    fc = exp(c)-log(c)-3;
    if fa*fc <= 0
        b = c;
        fb = fc;
    else
        a = c;
        fa = fc;
    end
end