//algumas funcoes para teste. deff("[y]=vareps(x)","a=1; while x+a>x, a=a/2; end; y=2*a;"); // Algoritmo de horner para polinomios. deff("[y]=poli_normal(x)", "y=3*x**7 + 2*x**6 -5*x**5 -6*x**4 + 2*x**3 -x**2 -x+ 1"); deff("[y]=poli_horner(x)", "y=1+x*(-1 +x*(-1 + x*(2+x*(-6+x*(-5+x*(2+3*x))))))");