Sponsored links: Algebra eBooks
 

Help Index

A

B

C

D

E

F

G

H

I

J

K

L

M

N

O

P

Q

R

S

T

U

V

W

X

Y

Z

The Maxima on-line user's manual

Algebra Calculator

Search:

Rectform

Function: rectform (<expr>) Returns an expression a + b %i equivalent to <expr>, such that <a> and <b> are purely real.

R1:4990;
R2:680;
R3:200;
R4:2000;
C3:3.3e-9;
C4:22e-9;
C5:220e-12;
ESR:0.0009;
Rout:5/3;
Cout:22e-6;
L:18e-6;
fz1: 1/(2*%pi*C3*(R1+R3));
fz2: 1/(2*%pi*R4*C4);
fp0: 0;
fp1: 1/(2*%pi*R3*C3);
fp2: 1/(2*%pi*R4*C4*C5/(C4+C5));
Q : sqrt(Rout*L*Cout*(Rout+ESR))/(L+Cout*Rout*ESR);
fLC : 1/(2*%pi*sqrt(L*Cout)*sqrt(1+ESR/Rout));
glc(s):= (1+s/(2*%pi/(2*%pi*ESR*Cout)))/(1+s/(2*%pi*Q*fLC)+(s/(2*%pi*fLC))^2);
float(Q);
float(sqrt(1));
float(glc(5));
gtypeIII(s) := 10^(150/20)*(s-fz1*2*%pi)*(s-fz2*2*%pi)/( (s-fp0*2*%pi) * (s-fp1*2*%pi) * (s-fp2*2*%pi) );
gloop(s):= 18 * glc(s) * gtypeIII(s);
float(rectform(gloop(%i*2*%pi*10^3.8)));
float(polarform(gloop(%i*2*%pi*10^3.8)));
float(carg(gloop(%i*2*%pi*10^3.8)));
atan(float(imagpart(gloop(%i*2*%pi*10^3.8)))/float(realpart(gloop(%i*2*%pi*10^3.8))))/%pi*180;
myCArg(z) := float(atan(float(imagpart(z))/float(realpart(z))));
myCArg(gloop(%i*2*%pi*10^3.8));
plot2d(20*log(cabs(gloop(%i*2*%pi*10^f)))/log(10), [f,-1,6]);
plot2d(myCArg(gloop(%i*2*%pi*10^f))/%pi*180, [f,-1,6]);

(%o1)                                true
(%i2) 

Related Examples

rectform

z:a-3+12*%i;

w:6+3*b*%i;

rectform(2*w+6*%i);

Calculate

rectform-solve

eq1: x^5-10=0;

solve(eq1);

a0 : 7^(1/3);

Calculate

rectform

rectform(1/(1+2*%i)^2);

Calculate

rectform

h: 10000*s/(s^2+11000...

ft:h, s=2*%pi*f*%i;

rectform(ft);

Calculate

rectform

result:-2+2*%i;

rectform(result^2+2*r...

Calculate

rectform-solve

solns: solve(z^3+z+1=0);

rectform(solns);

Calculate

rectform

z1: 1+5*%i;

z2: 2+7*%i;

rectforn(z1*z2);

Calculate

rectform

z1: 1+5*%i;

z2: 2+7*%i;

z1*z2;

Calculate

rectform

z:1-1/(s+%i*t);

rectform(z);

Calculate

rectform

a:(2*(i-(i+i^(1/5))^(...

rectform(a);

Calculate