Online Algebra Calculator
Many of users do not use powerful Maxima computer algebra system for systematic work, but for ad hoc algebraic calculations – equations, functions, matrixes, etc. only. To do this job, it is not useful to download the whole application from a web site.
(%i1)p:x^2-x+2; 2 (%o1) x - x + 2 (%i2) eval(p, 2); 2 (%o2) eval(x - x + 2, 2) (%i3)
log10(x):=log(x)/log(10); log(x) (%o1) log10(x) := ------- log(10) (%i2) H(f,r,m):=log10(abs(ev((sin(%pi*f)/sin(%pi*f/r))^m, numer, eval)))*20; ! sin(%pi f) m ! (%o2) H(f, r, m) := log10(!ev((----------) , numer, eval)!) 20 ! %pi f ! ! sin(-----) ! ! r ! (%i3) plot2d(H(f,25,3), [f, 0, 1], [y, -100, 100]); plotev(H(0.01,25,3),numer); (%o4) 83.87212092267326 (%i5) ev(H(0.03,25,3),numer); (%o5) 83.83787398212554 (%i6) ev(H(0.04,25,3),numer); (%o6) 83.80789307854482 (%i7) ev(H(0.035,25,3),numer); (%o7) 83.82395599951573 (%i8) ev(H(0.0375,25,3),numer); (%o8) 83.81619275089616 (%i9) ev(H(0.03625,25,3),numer); (%o9) 83.82014141582842 (%i10) ev(H(0.001,25,3),numer); (%o10) 83.87635772574187 (%i11) ev(H(0.003,25,3),numer); (%o11) 83.87601536808367 (%i12)
display2d:false; (%o1) false (%i2) h:0.9; (%o2) 0.9 (%i3) a:1.2; (%o3) 1.2 (%i4) b:1.1; (%o4) 1.1 (%i5) k:0.8; (%o5) 0.8 (%i6) dw:0.09; (%o6) 0.09 (%i7) Xw:-a; (%o7) -1.2 (%i8) Yw:k/2+dw; (%o8) 0.49 (%i9) Zw:-sqrt(3)*k/2+h-sqrt(3)*dw+b; (%o9) 2.0-0.49*sqrt(3) (%i10) P: Xw^2+Yw^2+(Zw-h)^2-(a^2+b^2+k^2); (%o10) (1.1-0.49*sqrt(3))^2-1.609900000000001 (%i11) A:ratsimp(4*(a^2-b^2)*k^2); rat: replaced 0.5888 by 368/625 = 0.5888 (%o11) 368/625 (%i12) B:ratsimp(-4*b*k*(2*a^2+P)); rat: replaced -3.52 by -88/25 = -3.52 rat: replaced 1.270099999999999 by 9273/7301 = 1.270099986303246 rat: replaced 1.1 by 11/10 = 1.1 rat: replaced -0.49 by -49/100 = -0.49 (%o12) (865752580*sqrt(3)-2570273233)/228156250 (%i13) C:ratsimp(-(P^2+4*a^2*(Zw-h)^2)); rat: replaced -1.6099 by -6277/3899 = -1.6098999743524 rat: replaced 1.1 by 11/10 = 1.1 rat: replaced -0.49 by -49/100 = -0.49 rat: replaced -5.76 by -144/25 = -5.76 rat: replaced 1.1 by 11/10 = 1.1 rat: replaced -0.49 by -49/100 = -0.49 (%o13) (10489613635796680*sqrt(3)-22358540094883609)/1520220100000000 (%i14) s3:ratsimp((-B+sqrt(B^2-4*A*C))/(2*A)); (%o14) (-482224187060*sqrt(3)+2*sqrt(826660579576468179140676 -410800161103587325359520*sqrt(3)) +1431642190781) /149652977600 (%i15) eval((-482224187060*sqrt(3)+2*sqrt(826660579576468179140676 -410800161103587325359520*sqrt(3)) +1431642190781) /149652977600); (%o15) eval((-482224187060*sqrt(3)+2*sqrt( 826660579576468179140676 -410800161103587325359520*sqrt(3)) +1431642190781) /149652977600) (%i16)