Sponsored links: Algebra eBooks
 

Related

carg-plot3d
plot3d(carg(x+%i*y), [x,-2,2],[y,-2,2]);

plot3d(carg(x+%i*y), ...

Calculate

carg-polarform

x:2+3*%i;

y:3+4*%i;

polarform(x*y);

Calculate

carg-polarform

x:2+3*%i;

y:3+4*%i;

polarform(x*y);

Calculate

carg-float-invert-matrix-polarform-ratsimp-rectform

a:matrix([9-%i*10,-5,...

b:matrix([0],[-10*%e^...

c:polarform(float(rec...

Calculate

carg-pi

carg(3+%pi);

Calculate

carg-declare-float-solve-sqrt

a:solve(T1^2*a^2-a-10...

declare([T1,a], real);

w:float(sqrt(a));

Calculate

carg-declare-float-solve-sqrt

a:solve(T1^2*a^2-a-10...

declare([T1,a], real);

w:float(sqrt(a));

Calculate

carg-polarform

x:2+3*%i;

y:3+4*%i;

polarform(x*y);

Calculate

carg-polarform-rectform

e:100/(10+10*%i);

rectform(e);

carg(e);

Calculate

carg-linsolve-plot2d-rhs
plot2d(eq7,[f,1,100000],[logx]);

eq1: Vint=-Iint/(s*C);

eq2: Iint=k*Iin;

eq3: Iin=Vin/30000 + ...

Calculate

carg

Run Example
(%i1)T1:1;
(%o1)                                  1
(%i2) declare([T1,w], real);
(%o2)                                done
(%i3) assume(T1>
0,w>
0);
(%o3)                         [redundant, w > 0]
(%i4) w:solve(T1^2*w^4-w^2-100=0,w);
             sqrt(sqrt(401) + 1)      sqrt(sqrt(401) + 1)
(%o4) [w = - -------------------, w = -------------------, 
                   sqrt(2)                  sqrt(2)
                            sqrt(sqrt(401) - 1) %i      sqrt(sqrt(401) - 1) %i
                      w = - ----------------------, w = ----------------------]
                                   sqrt(2)                     sqrt(2)
(%i5) w:w[2];
                                sqrt(sqrt(401) + 1)
(%o5)                       w = -------------------
                                      sqrt(2)
(%i6) carg(10/(%i*w*(1+%i*w*T1)));
                          %pi          sqrt(sqrt(401) + 1)    %pi
(%o6)         - atan(w) - --- = - atan(-------------------) - ---
                           2                 sqrt(2)           2
(%i7) 
Run Example
eq1: Vint=-Iint/(s*C);
                                          Iint
(%o1)                            Vint = - ----
                                          s C
(%i2) eq2: Iint=k*Iin;
(%o2)                            Iint = Iin k
(%i3) eq3: Iin=Vin/30000 + Vint/30000;
                                    Vint     Vin
(%o3)                         Iin = ----- + -----
                                    30000   30000
(%i4) eq4: Iout=Vint/15000+Vin/30000;
                                    Vint     Vin
(%o4)                        Iout = ----- + -----
                                    15000   30000
(%i5) eq5: linsolve([eq1,eq2,eq3,eq4],[Iin,Iout,Vint,Iint]);
                s Vin C             30000 s Vin C - k Vin
(%o5) [Iin = -------------, Iout = -----------------------, 
             30000 s C + k         900000000 s C + 30000 k
                                               k Vin               k s Vin C
                                  Vint = - -------------, Iint = -------------]
                                           30000 s C + k         30000 s C + k
(%i6) eq6: rhs(eq5[2]);
                             30000 s Vin C - k Vin
(%o6)                       -----------------------
                            900000000 s C + 30000 k
(%i7) eq7: 2*%pi*carg(eq6),C=220e-12,k=0.1,s=%i*2*%pi*f,Vin=1;
(%o7) 2 %pi (atan2(1.3199999999999999E-5 %pi f, - 0.1)
                                           - atan(1.3199999999999998E-4 %pi f))
(%i8) plot2d(eq7,[f,1,100000],[logx]);
plotplot2d(eq7,[f,1,100000],[logx]);
Run Example
V_in:24;
(%o1)                                 24
(%i2) V_out:150;
(%o2)                                 150
(%i3) I_load: 0.1;
(%o3)                                 0.1
(%i4) f_schalt: 100000;
(%o4)                               100000
(%i5) L_out:680*10^-6;
                                      17
(%o5)                                -----
                                     25000
(%i6) C_out: 94*10^-6;
                                      47
(%o6)                               ------
                                    500000
(%i7) ESR: 0.05;
(%o7)                                0.05
(%i8) D:(V_out-V_in)/V_out;
                                      21
(%o8)                                 --
                                      25
(%i9) R_load:(V_out/I_load);
(%o9)                               1500.0
(%i10) D_: 1-D ;
                                      4
(%o10)                                --
                                      25
(%i11) A_cm:(D_*R_load)/(2*0.01);
(%o11)                              12000.0
(%i12) w_z1: 1/(C_out*ESR);
(%o12)                         212765.9574468085
(%i13) w_z2: (R_load*(V_in/V_out)^2)/L_out;
(%o13)                         56470.58823529411
(%i14) w_p1: 1/(C_out*R_load);
(%o14)                         7.092198581560284
(%i15) Q: 1/(%pi*(D_*(3.320/1.515)+0.5-D));
                               94.09937888198716
(%o15)                         -----------------
                                      %pi
(%i16) A_EA:38;
(%o16)                                38
(%i17) A_FB:1.26/V_out;
(%o17)                              0.0084
(%i18) A_DC_1: A_cm*A_EA*A_FB;
(%o18)                              3830.4
(%i19) A_DC_2: log(A_DC_1) / log(10);
                               8.250724515363654
(%o19)                         -----------------
                                    log(10)
(%i20) A_DC_3: 20*A_DC_2;
                               165.0144903072731
(%o20)                         -----------------
                                    log(10)
(%i21) ev(A_DC_3, numer);
(%o21)                         71.66488257452633
(%i22) w_z3: 1/(0.5*10^-6*1000);
(%o22)                              2000.0
(%i23) w_p2: 1/(0.5*10^-6*50000);
(%o23)                               40.0
(%i24) w_s: f_schalt*2*%pi;
(%o24)                            200000 %pi
(%i25) T(s):= (A_DC_1*((1+(s/w_z1))*(1-(s/w_z2))*(1+(s/w_z3)))/((1+(s/w_p1))*(1+(s/w_p2))*(1+(s/(Q*(w_s/2)))+(s^2/(w_s/2)^2))));
                                    s          s          s
                      A_DC_1 ((1 + ----) (1 - ----) (1 + ----))
                                   w_z1       w_z2       w_z3
(%o25)       T(s) := --------------------------------------------
                                                             2
                           s          s            s        s
                     (1 + ----) (1 + ----) (1 + ------- + ------)
                          w_p1       w_p2          w_s     w_s 2
                                                Q (---)   (---)
                                                    2       2
(%i26) T(1);
                              3276.770780998678
(%o26)               ------------------------------------
                            1
                     ---------------- + 1.000000106270627
                                    2
                     10000000000 %pi
(%i27) plot2d(20 * log(cabs(T( %i * 2 * %pi * 10^x))) / log(10), [x,1,6]);
plotplot2d(20 * log(cabs(T( %i * 2 * %pi * 10^x))) / log(10), [x,1,6]);plot2d(carg(T( %i * 2 * %pi * 10^x)) / %pi * 180 + 360 - 180 , [x,1,6]);
plotplot2d(carg(T( %i * 2 * %pi * 10^x)) / %pi * 180 + 360 - 180 , [x,1,6]);
[abs,atan,carg,realpart] [abs,carg,ev,solve] [abs,carg,expand,float,imagpart,realpart] [abs,carg,float,invert,matrix,pi,polarform,ratsimp,rectform] [abs,carg,float,invert,matrix,polarform,ratsimp,rectform] [abs,carg,fullratsimp,rectform,sqrt] [abs,carg,linsolve,log,plot2d,rhs] [abs,carg,rectform,sqrt] [abs,carg,sqrt] [algebraic,carg,ev,expand,float,linsolve,numer,pi,polarform,rat,rhs,simp,true] [algebraic,carg,ev,expand,float,linsolve,numer,pi,rat,rhs,simp,true] [algebraic,carg,float,linsolve,pi,rat,rhs,simp,true] [algebraic,carg,float,linsolve,pi,rat,rhs,true] [algebraic,carg,linsolve,rat,rhs,true] [assume,carg,declare,float,solve] [assume,carg,declare,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] [atan,carg,diff,ev,plot2d] [atan,carg,diff,ev] [block,cabs,carg,endcons,exp,return,sqrt] [cabs,carg,conjugate,do,print] [cabs,carg,conjugate] [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,exp,kill,plot2d] [cabs,carg,float,log,plot2d,rectform,sqrt] [cabs,carg,float,log,plot2d,sqrt] [cabs,carg,float,subst] [cabs,carg,fpprintprec,load,makelist,plot2d,sin] [cabs,carg,imagpart,numer,pi,ratsimp] [cabs,carg,imagpart,polarform,realpart,sqrt] [cabs,carg,imagpart,realpart,sqrt] [cabs,carg,imagpart,realpart] [cabs,carg,load,log,plot2d] [cabs,carg,numer,pi,ratsimp] [cabs,carg] [carg,float,invert,matrix,polarform,ratsimp,rectform] [carg,float] [carg,imagpart,radcan,realpart,sqrt] [carg,imagpart,realpart,sqrt] [carg,linsolve,plot2d,rhs] [carg,linsolve,plot3d,rhs] [carg,pi,plot2d] [carg,plot3d] [carg,sqrt] [carg]

Related Help

Help for Carg