Sponsored links: Algebra eBooks
 

Related

eliminate-sqrt

BC:(m-1)^2+n^2;

PQ:(m-1)^2+n^2-(m-1)+...

QR:(m-1)^2+n^2+(m-1)+...

Calculate

eliminate

eq1:x=z+y;

eq2:z^2=x+1;

eliminate([eq1,eq2],[...

Calculate

eliminate

eq1:R1s=(Ra*Rc-Xa*Xc)...

eq2:R2s=(Ra*Rb-Xa*Xb)...

eq3:R3s=(Rb*Rc-Xb*Xc)...

Calculate

eliminate

P:eliminate([ ...

Solve(P,P3);

Calculate

eliminate

expr1: x * (a + c) + ...

expr2: x * (a + c) + ...

eliminate ([expr2, ex...

Calculate

eliminate-length-makelist-solve-unique

eqlist: [wu-wt,4*wu-3...

eqlist: [wu-wt,2*wu-w...

neqlist: unique(eqlist);

Calculate

eliminate-kill

kill(all);

log_i1:-(103800* Vd -...

log_i2: -(103800 *Vd ...

Calculate

eliminate-solve

eq1:R1s=Ra*Rceq2:R2s=...

eq5:sLossesOpen=(P2^2...

eq6:sLossChange=sLoss...

Calculate

eliminate-first-solve

eq1:60*x=40*y;

eq2:(60*x+40*y)/(x + ...

solve(first(eliminate...

Calculate

eliminate

Run Example
(%i1)Puiab:[Pk=abs(ak)^2-abs(bk)^2,Uk=(ak+bk)*sqrt(Z0k), Ik=(ak-bk)/sqrt(Z0k)];
                  2     2                                  ak - bk
(%o1)     [Pk = ak  - bk , Uk = (bk + ak) sqrt(Z0k), Ik = ---------]
                                                          sqrt(Z0k)
(%i2) abUI:[ak=(Uk+Z0k*Ik)/(2*sqrt(Z0k)),bk=(Uk-Z0k*Ik)/(2*sqrt(Z0k))];
                           Ik Z0k + Uk       Uk - Ik Z0k
(%o2)                [ak = -----------, bk = -----------]
                           2 sqrt(Z0k)       2 sqrt(Z0k)
(%i3) spoj:[U1=(a1+b1)*sqrt(Z01),  U2=(a2+b2)*sqrt(Z02),I1=(a1-b1)/sqrt(Z01),  I2=(a2-b2)/sqrt(Z02),U1=U2, I1+I2=0];
                                                                 a1 - b1
(%o3) [U1 = (b1 + a1) sqrt(Z01), U2 = (b2 + a2) sqrt(Z02), I1 = ---------, 
                                                                sqrt(Z01)
                                                a2 - b2
                                          I2 = ---------, U1 = U2, I2 + I1 = 0]
                                               sqrt(Z02)
(%i4) spoj1:[eliminate(spoj,  [U1, U2, I1, I2])];
(%o4) [[- (- b2 - a2) sqrt(Z02) - (b1 + a1) sqrt(Z01), 
                            b1 sqrt(Z02) - a1 sqrt(Z02) + (b2 - a2) sqrt(Z01)]]
(%i5) 
Run Example
a1:%pi/2;
                                      %pi
(%o1)                                 ---
                                       2
(%i2) a2:%pi;
(%o2)                                 %pi
(%i3) a3:%pi*3/2;
                                     3 %pi
(%o3)                                -----
                                       2
(%i4) i0: a+b*cos(p)=I0;
(%o4)                          b cos(p) + a = I0
(%i5) i1: a+b*cos(p+a1)=I1;
(%o5)                          a - b sin(p) = I1
(%i6) i2: a+b*cos(p+a2)=I2;
(%o6)                          a - b cos(p) = I2
(%i7) i3: a+b*cos(p+a3)=I3;
(%o7)                          b sin(p) + a = I3
(%i8) solve([i2,i3],[a,b]);
                   cos(p) I3 + sin(p) I2            I2 - I3
(%o8)        [[a = ---------------------, b = - ---------------]]
                      sin(p) + cos(p)           sin(p) + cos(p)
(%i9) r1=eliminate ([i0,i1,i2],[a,b]);
(%o9) r1 = [- (sin(p) + cos(p)) I2 + 2 cos(p) I1 - (cos(p) - sin(p)) I0]
(%i10) 
Run Example
eq1:mka*o1/100+mko=o2;
                               mka o1
(%o1)                          ------ + mko = o2
                                100
(%i2) eq2:mka+mko=100;
(%o2)                           mko + mka = 100
(%i3) eliminate([eq1,eq2],[mka]);
(%o3)                 [100 o2 + (mko - 100) o1 - 100 mko]
(%i4) 
[abs,eliminate,linsolve,sqrt] [abs,eliminate,sqrt] [append,assume,declare,eliminate,ev,first,fpprintprec,lambda,map,plot2d,solve,sublist] [append,coeff,delete,do,eliminate,expand,length,matrix,rat,solve,transpose,unique] [append,coeff,delete,do,eliminate,expand,length,matrix,rat,transpose,unique] [append,delete,eliminate,length,makelist,solve,subst,unique] [append,delete,eliminate,length,makelist,solve,unique] [append,desolve,diff,eliminate,rhs,subst] [append,eliminate,length,makelist,unique] [assume,cons,eliminate,ev,fpprintprec,map,plot2d,solve] [assume,declare,eliminate,ev,first,fpprintprec,lambda,map,plot2d,solve,sublist] [augcoefmatrix,display,do,eliminate,linsolve,mat_unblocker,max,ptriangularize,rowswap] [augcoefmatrix,display,do,eliminate,mat_unblocker,max,ptriangularize,rowswap,solve] [batch,eliminate] [charpoly,coeff,eliminate,expand,matrix,plot2d,sublis] [charpoly,coeff,eliminate,expand,matrix,sublis] [coeff,cos,eliminate,makelist,rat,ratexpand,ratsubst,sin,trigexpand] [coeff,eliminate,ev,expand,linsolve,matrix,ratsimp,sqrt] [coeff,eliminate,ev,expand,linsolve,sqrt] [coeff,eliminate,expand] [coefmatrix,eliminate,length,makelist,rank,triangularize,unique] [coefmatrix,eliminate,length,makelist,rank,triangularize] [cons,eliminate,ev,fpprintprec,map,plot2d,solve] [cos,diff,eliminate,ratsimp,sin] [cos,display2d,eliminate,false,map,sin] [cos,eliminate,ev,linsolve,matrix,ratsimp,sin,sqrt] [cos,eliminate,expand,factorout,sin] [cos,eliminate,sin,sqrt] [cos,eliminate,sin] [cos,eliminate,solve,trigreduce] [cos,eliminate,solve] [diff,eliminate,expand,float,integrate,map,ratsimp,subst] [diff,eliminate,linsolve] [display2d,eliminate,false,solve] [display2d,eliminate,false] [echelon,eliminate,matrix,triangularize] [eliminate,ev,fpprintprec,map,plot2d,solve] [eliminate,expand,piece,sqrt,substpart] [eliminate,expand] [eliminate,facsum,ratsimp] [eliminate,false,logexpand,logsimp] [eliminate,fullratsimp] [eliminate,kill] [eliminate,length,makelist,solve,unique] [eliminate,length,makelist,unique] [eliminate,linsolve,sqrt] [eliminate,ratsimp] [eliminate,solve] [eliminate,sqrt] [eliminate]

Related Help

Help for Eliminate