function y = fun(x)
    s=poly(0,"s")
    p= s - 1  //Polinomio (ej: x - 1)
    y = horner(p, x)
endfunction

function  x = biseccion(a,b,n,tol2,tol1)

u = fun(a)
v = fun(b)
paso = 1

if sign(u) == sign(v) then
   printf('Error la función debe cambiar de signo en (a,b)')
   x = 0
else
    c=0
    while ((b-a) * 0.5 > tol2 & paso < (n + 1))
        c = (b+a) / 2
        w = fun(c)
        printf("Paso: %i\n", paso)

        if sign(u) == sign(w) then
            a = c
            u = w
        else
            b = c
            v = w
        end
            paso = paso + 1
    end
 x = c
end

endfunction