Sponsored links: Algebra eBooks
 

Related

imagpart-linsolve

eq1:1/(1-y**-s)=1/(1-...

linsolve([eq1],[x]);

Calculate

imagpart-kill-plot2d
plot2d (imagpart(Z_back) , [w, 6000, 80000]);

kill(all);

C1: 1400*10^-6;

C2: 1000*10^-6;

Calculate

imagpart-kill-plot2d
plot2d ([imagpart(Z_front), imagpart(Z_back) ], [w, 10000, 50000]);

kill(all);

C1: 1400*10^-6;

C2: 100*10^-6;

Calculate

imagpart-kill-plot2d
plot2d (imagpart(Z_back) , [w, 6000, 80000], [y, -1,1] );

kill(all);

C1: 1400*10^-6;

C2: 20*10^-6;

Calculate

imagpart-realpart

e:(-3/(-3-3*%i)-2/(3+...

imagpart(e);

realpart(e);

Calculate

imagpart-realpart

z: 2 + 4*%i;

z^2;

realpart(z);

Calculate

imagpart-realpart

a:-1-2*%i;

realpart(a^2+2*a+5);

imagpart(a^2+2*a+5);

Calculate

imagpart-realpart-sqrt

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

a:realpart(z);

b:imagpart(z);

Calculate

imagpart-realpart

f(x):=((x-3)*(x^2+6*x...

f(3);

realpart(f(-%i-3));

Calculate

imagpart-realpart

a:%i^(3+1);

realpart(a);

imagpart(a);

Calculate

imagpart

Run Example
(%i1)declare(S,real,Q,real, f,real,f0,real);
(%o1)                                done
(%i2) abs((S/(1 + %i*2*Q(f-f0)/f0))^2);
                                       2
                                      S
(%o2)                          ----------------
                                  2
                               4 Q (f - f0)
                               ------------ + 1
                                     2
                                   f0
(%i3) imagpart((S/(1 + %i*2*Q(f-f0)/f0)));
                                  2 Q(f - f0) S
(%o3)                       - ---------------------
                                  2
                               4 Q (f - f0)
                              (------------ + 1) f0
                                     2
                                   f0
(%i4) 
Run Example
i: %i;
(%o1)                                 %i
(%i2) z1: A+B*i;
(%o2)                              %i B + A
(%i3) z2: C+D*i;
(%o3)                              %i D + C
(%i4) z3: E+F*i;
(%o4)                              %i F + E
(%i5) Icp: i*(z1-z2);
(%o5)                     %i (- %i D - C + %i B + A)
(%i6) Icn: -i*z3;
(%o6)                           - %i (%i F + E)
(%i7) Ucp: z2-i*Icp*x;
(%o7)                x (- %i D - C + %i B + A) + %i D + C
(%i8) Ucn: z3-i*Icn*x;
(%o8)                      - x (%i F + E) + %i F + E
(%i9) realpart(Ucn);
(%o9)                               E - x E
(%i10) imagpart (Ucn);
(%o10)                              F - x F
(%i11) Ucpc: conjugate(Ucp);
(%o11)                x (%i D - C - %i B + A) - %i D + C
(%i12) Icpc: conjugate(Icp);
(%o12)                    - %i (%i D - C - %i B + A)
(%i13) P: Ucpc*Icn+Ucn*Icpc;
(%o13) - %i (%i D - C - %i B + A) (- x (%i F + E) + %i F + E)
                           - %i (x (%i D - C - %i B + A) - %i D + C) (%i F + E)
(%i14) C: simplify(P);
(%o14) simplify(- %i (%i D - C - %i B + A) (- x (%i F + E) + %i F + E)
                          - %i (x (%i D - C - %i B + A) - %i D + C) (%i F + E))
(%i15) 
Run Example
x,y:real;
(%o1)                                  x
(%i2) z:x+%i*y;
(%o2)                              %i y + x
(%i3) w:(z-%i)/(z+%i);
                                 %i y + x - %i
(%o3)                            -------------
                                 %i y + x + %i
(%i4) x1:realpart(w);
                             2
                            x  - (- y - 1) (y - 1)
(%o4)                       ----------------------
                                       2    2
                                (y + 1)  + x
(%i5) y1:imagpart(w);
                            x (y - 1) + x (- y - 1)
(%o5)                       -----------------------
                                        2    2
                                 (y + 1)  + x
(%i6) 
[abs,carg,conjugate,declare,imagpart,polarform,realpart] [abs,carg,expand,float,imagpart,realpart] [abs,declare,imagpart,realpart] [abs,define,exp,imagpart,plot2d,quad_qags,realpart] [abs,display2d,factorsum,false,float,imagpart,ratsimp] [abs,exp,float,imagpart,plot2d,realpart] [abs,expand,float,imagpart,realpart] [abs,float,imagpart,plot2d,realpart,sin,solve] [abs,imagpart,realpart] [assoc_legendre_q,diff,imagpart,legendre_q,numer,realpart,sqrt] [atan,cabs,carg,expand,float,imagpart,log,plot2d,polarform,realpart,rectform,signum,sqrt] [atan,define,imagpart,plot2d,radcan,realpart,sqrt] [atan2,cos,imagpart,plot2d,realpart,sin,sqrt] [cabs,carg,exp,imagpart,polarform,realpart,sqrt] [cabs,carg,exp,imagpart,realpart] [cabs,carg,imagpart,realpart,sqrt] [cabs,float,imagpart,plot2d,realpart,sin] [cabs,imagpart,plot2d,realpart,sin] [complex,domain,imagpart,makelist,plot2d,realpart] [conjugate,imagpart,plot2d,realpart] [conjugate,imagpart,realpart] [create_list,imagpart,realpart] [debugmode,exp,imagpart,realpart,true] [define,exp,float,imagpart,integrate,plot2d,ratsimp,subst] [define,exp,imagpart,integrate,plot2d,subst] [define,exp,imagpart,integrate,plot2d] [define,exp,imagpart,pi,plot2d,quad_qag,realpart] [define,exp,imagpart,pi,plot2d,quad_qags,realpart] [define,exp,imagpart,plot2d,quad_qag,realpart] [define,exp,imagpart,plot2d,quad_qags,realpart] [define,exp,imagpart,plot2d] [define,exp,imagpart,quad_qag] [define,imagpart,plot2d,radcan,realpart,sqrt] [diff,expand,imagpart,legendre_q,realpart] [exp,expand,float,imagpart,invert,matrix,realpart] [exp,imagpart,realpart] [expand,float,imagpart,realpart] [float,imagpart,plot2d,realpart,rectform,sum] [float,imagpart,plot2d,realpart,rectform] [imagpart,kill,plot2d] [imagpart,linsolve] [imagpart,log,plot2d,realpart,sqrt] [imagpart,numer,realpart] [imagpart,plot2d,realpart,sqrt] [imagpart,plot2d,realpart] [imagpart,plot3d,realpart,sin] [imagpart,rat,realpart] [imagpart,realpart,sqrt] [imagpart,realpart] [imagpart]

Related Help

Help for Imagpart