Sponsored links: Algebra eBooks
 

Related

cabs-carg-ev-load-log-numer-plot2d
plot2d(20 * log(cabs(T( %i * 2 * %pi * 10^x))) / log(10), [x,1,6]);

V_in:24;

R_c1:200;

C_c1:0.1*10^-6;

Calculate

cabs-carg-imagpart-polarform-realpart-sqrt

z:1+%i*sqrt(3);

polarform(z);

a:realpart(z);

Calculate

cabs

express(cabs(%i^(3+%i...

Calculate

cabs-exp-load-plot2d
plot2d([sdomain(H(f_to_w(%i*f))),sdomain(Hz(exp((%pi*%i*f)/48000)))], [f,10,24000], [logx, true]);

load("log10");

H(s):= 1/(s/f_to_w(10...

H(z):= 0.1*z^-1 + 0.5...

Calculate

cabs-solve

Fo: 10/(%i*w*(%i*w+2)...

eq1: cabs(Fo) = 1;

solve(eq1,w);

Calculate

cabs-carg-ev-load-log-numer-plot2d
plot2d(20 * log(cabs(T( %i * 2 * %pi * 10^x))) / log(10), [x,1,6]);

V_in:24;

R_c1:20;

C_c1:2*10^-6;

Calculate

cabs-carg-ev-load-log-numer-plot2d
plot2d(20 * log(cabs(T( %i * 2 * %pi * 10^x))) / log(10), [x,1,6]);

V_in:24;

V_out:140;

I_load: 0.1;

Calculate

cabs

f : 123.917;

R1 : 1.34e3;

R2 : 3.48e3;

Calculate

cabs-carg-numer-pi-ratsimp-realpart

pi:3.1415926535897932...

U1:35*%e^(%i*59.2*pi/...

U2:23*%e^(%i*61.3*pi/...

Calculate

cabs

Run Example
(%i1)kill(all);
(%o0)                                done
(%i1) load("log10");
(%o1)          /usr/share/maxima/5.21.1/share/contrib/log10.mac
(%i2) H1(s):= 1/((s/1000+1)^2);
                                           1
(%o2)                        H1(s) := -----------
                                        s       2
                                      (---- + 1)
                                       1000
(%i3) H2(s):= (s/1000)/((s/1000+1)^2);
                                          s
                                         ----
                                         1000
(%o3)                        H2(s) := -----------
                                        s       2
                                      (---- + 1)
                                       1000
(%i4) H3(s):= ((s/1000)^2)/((s/1000+1)^2);
                                          s   2
                                        (----)
                                         1000
(%o4)                        H3(s) := -----------
                                        s       2
                                      (---- + 1)
                                       1000
(%i5) H4(s):= H1(s)+H3(s);
(%o5)                       H4(s) := H1(s) + H3(s)
(%i6) plot2d([20*log10(cabs(H1(%i*f))),20*log10(cabs(H2(%i*f))),20*log10(cabs(H3(%i*f))),20*log10(cabs(H4(%i*f)))], [f, 10, 20000], [logx]);
plotplot2d([20*log10(cabs(H1(%i*f))),20*log10(cabs(H2(%i*f))),20*log10(cabs(H3(%i*f))),20*log10(cabs(H4(%i*f)))], [f, 10, 20000], [logx]);
Run Example
load("log10");
(%o1)          /usr/share/maxima/5.21.1/share/contrib/log10.mac
(%i2) dB(x):= 20*log10(x);
(%o2)                        dB(x) := 20 log10(x)
(%i3) f_to_w(x):= 2*%pi*x;
(%o3)                        f_to_w(x) := 2 %pi x
(%i4) allroots(x^2 -1.99004745483398*x + 0.99007225036621);
(%o4) [x = 1.79564500253386E-4 %i + 0.99502372741699, 
                                 x = 0.99502372741699 - 1.79564500253386E-4 %i]
(%i5) allroots(x^2 -1.69065929318241*x + 0.73248077421585);
(%o5) [x = 0.13378551046297 %i + 0.84532964659121, 
                                    x = 0.84532964659121 - 0.13378551046297 %i]
(%i6) float(solve(exp(-x/48000) = 0.99502372741699,x)/(2*%pi));

rat: replaced -0.995023727417 by -8598/8641 = -0.995023724106
(%o6)               [0.1591549430919 x = 38.11085142032302]
(%i7) float(solve(exp(-x/48000) = 0.84532964659121,x)/(2*%pi));

rat: replaced -0.8453296465912 by -9783/11573 = -0.8453296465912
(%o7)               [0.1591549430919 x = 1283.644051295943]
(%i8) float(solve(exp(-x/48000) = 0.13378551046297,x)/(2*%pi));

rat: replaced -0.133785510463 by -1361/10173 = -0.1337855106655
(%o8)               [0.1591549430919 x = 15366.86120660835]
(%i9) H(s):= ((s^2)/(f_to_w(38.11085142032302)^2))/((s^2)/(f_to_w(38.11085142032302)^2) + s/(0.5*f_to_w(38.11085142032302)) + 1);
                                             2
                                            s
                                --------------------------
                                      2
                                f_to_w (38.11085142032302)
(%o9) H(s) := --------------------------------------------------------------
                           2
                          s                              s
              -------------------------- + ----------------------------- + 1
                    2                      0.5 f_to_w(38.11085142032302)
              f_to_w (38.11085142032302)
(%i10) H2(s):= (1.52*(s^2)/(f_to_w(1283.644051295943)^2) + s/(0.13378551046297*f_to_w(1283.644051295943)) + 1)/((s^2)/(f_to_w(1283.644051295943)^2) + s/(0.5*f_to_w(1283.644051295943)) + 1);
(%o10) H2(s) := 
                   2
             1.52 s                                  s
    -------------------------- + ------------------------------------------ + 1
          2                      0.13378551046297 f_to_w(1283.644051295943)
    f_to_w (1283.644051295943)
    ---------------------------------------------------------------------------
                       2
                      s                              s
          -------------------------- + ----------------------------- + 1
                2                      0.5 f_to_w(1283.644051295943)
          f_to_w (1283.644051295943)
(%i11) plot2d([dB(cabs(H(%i*f_to_w(f)))),dB(cabs(H2(%i*f_to_w(f))))],[f,10,24000],[logx,true]);
plotplot2d([dB(cabs(H(%i*f_to_w(f)))),dB(cabs(H2(%i*f_to_w(f))))],[f,10,24000],[logx,true]);
Run Example
w: 3*%pi/25;
                                     3 %pi
(%o1)                                -----
                                      25
(%i2) z3: 2*w*%i;
                                   6 %i %pi
(%o2)                              --------
                                      25
(%i3) v3: 170;
(%o3)                                 170
(%i4) I3: v3/z3;
                                     2125 %i
(%o4)                              - -------
                                      3 %pi
(%i5) float(cabs(I3));
(%o5)                          225.4695027135184
(%i6) float(carg(I3));
(%o6)                         - 1.570796326794897
(%i7) 
[abs,cabs,exp] [abs,cabs,sqrt] [abs,cabs] [allroots,cabs,exp,float,load,plot2d,solve] [atan,cabs,carg,expand,float,imagpart,log,plot2d,polarform,realpart,rectform,signum,sqrt] [atan,cabs,carg,float,imagpart,log,plot2d,polarform,realpart,rectform,signum,sqrt] [atan,cabs,carg,float,imagpart,log,plot2d,polarform,realpart,rectform,sqrt] [block,cabs,carg,endcons,exp,return,sqrt] [cabs,carg,cos,fpprintprec,load,makelist,plot2d,sin] [cabs,carg,ev,load,log,numer,plot2d] [cabs,carg,exp,imagpart,polarform,realpart,sqrt] [cabs,carg,exp,imagpart,realpart] [cabs,carg,float,log,plot2d,sqrt] [cabs,carg,float] [cabs,carg,fpprintprec,load,makelist,plot2d,sin] [cabs,carg,imagpart,realpart,sqrt] [cabs,carg,invert,matrix,plot2d] [cabs,carg,invert,matrix] [cabs,carg,load,log,plot2d] [cabs,carg,numer,pi,ratsimp] [cabs,carg,rectform] [cabs,carg] [cabs,cos,ratsimp,sin,subst] [cabs,ev,exp,find_root,load,makelist,plot2d,quad_qags] [cabs,ev,log,plot2d] [cabs,exp,float,load,plot2d,solve] [cabs,exp,load,plot2d] [cabs,exp,plot2d,ratsimp] [cabs,exp,ratsimp] [cabs,false,first,keepfloat,kill,load,plot2d,ratprint,second,solve,true] [cabs,first,float,kill,load,plot2d,ratsimp,second,solve] [cabs,first,float,kill,load,plot2d,second,solve] [cabs,first,kill,load,plot2d,solve] [cabs,float,imagpart,plot2d,realpart,sin] [cabs,float] [cabs,fortran,fullratsimp,subst] [cabs,fullratsimp,subst] [cabs,imagpart,plot2d,realpart,sin] [cabs,kill,load,plot2d] [cabs,linsolve] [cabs,load,plot2d] [cabs,max,plot3d] [cabs,numer,pi,ratsimp,realpart] [cabs,numer,solve] [cabs,plot2d] [cabs,plot3d] [cabs,rectform] [cabs,solve] [cabs,sqrt] [cabs]

Related Help

Help for Cabs