Bonjour,

Je cherche une méthode éfficace pour résoudre le système d'équations polynomiales suivant :

with(SolveTools):
> PolynomialSystem({f0,f1,f2,f3,f4,f5,f6},{alpha,lambda,mu,nu}); 

# avec les fi ci-dessous :

f0:= (1+mu+nu+lambda)*alpha^3*(1+mu+nu)*(mu^2-2*mu*alpha+2*nu*alpha*mu+2*mu-2*nu*alpha+2*nu*alpha^2+alpha^2-2*alpha+1+alpha^2*nu^2)*(-lambda*alpha^3+3*mu*nu+alpha^2*lambda-lambda+3*nu*mu^2+3*nu*mu^2*lambda+l...

I want to use Maple (dsolve command) to solve this problem, how do I input the command? Part (a) is enought.

I have tried the command, but Maple says "Warning, for {u(t)} arbitrary the system is inconsistent".

Thank you very much for your help.

Hello everyone!  

I am very new to the maplesoft community but am very impressed with everything I have learned in the last few days.  I'm having an issue using force probes on a double wishbone suspension that I'm hoping someone can help me with.  I am trying to measure the forces in each link to gather quantitative solutions for the forces at the chassis connection points.  However, I keep getting one of the links measuring no value at all.  The...

Hello All 

I looking to write Maple code procedure to solve this equation 

restart;
with(PDEtools):
with(plots):
with(LinearAlgebra):
pde := diff(psi(t,x),t,t) - diff(psi(t,x),x,x) + V(x)*psi(t,x);

where V(x)->x^2;

I have to use this stencil 

u[i+1,j]=-u[i-1,j1]+(1-1/8*h^2*v[i-1])*u[i,j-1]+(1-1/8*h^2*v[i+1])*u[i,j+1]; where i is spatial step and j is time step

Thanks 

int(y^2/2 - lambda*(u*diff(y,t)-diff(u,t)-a), t);

with(Physics):

diff(y(t)^2/2 - lambda(t)*(u(t)*diff(y(t),t)-diff(u(t),t)-a), u(t)); # u -> something

diff(lambda(t),t) disappear

should be

diff(lambda(t),t)+Physics[`*`](lambda(t), diff(y(t), t))

diff(y(t)^2/2 - lambda(t)*(u(t)*diff(y(t),t)-diff(u(t),t)-a), y(t)); # y -> something

u*diff(lambda(t...

Hi, I want to know how to change the rectangular form to polar form, and how to manipulate the operation of them, for example the picture below. The angle of polar form contain radian and degree, how to represent them in Maple?Thank you.

Hi,

I have been solving a system of non-linear ODE's for their steady states. This involves solving the rhs of the ODE's =0.

Hence I have been using "solve" in maple to solve a non-linear system.

Recently I have added more detail to the problem and now I am solving eight equations for eight variables and i've left overnight and maple still didnt find a solution. When sigma1=sigma2=0 below the problem is effectively 5-d and maple breezes through the calculation.

hello,i have a problem i have to program analytic solution of heat equation of a rod with two heat sources if you can help me by anything please d'ont hesitate, thank you.

Solve Differential Equation :(3x-y)*dy/dx=2x

Hi guys,

I would like to solve a system of equations and inequalities with symbolic parameters (D, E, M, N, O, P, Q, R, S, T, U, V, W, X, Y, Z) for several variables (a, b, c, d, e, f, i, j, l, m, n, p, q, r, s, t, u, v).

Unfortunately the command below does not work. I get the message "Warning, solutions may have been lost".

"Solve({ l-u=0, m-v=0, n-u=0, p-v=0, Y+q-u=0, Y+r-v=0, Z+s-u=0, Z+t-v=0, (a-P*M)*l=0, (b-Q*M...

Hello, everyone. I have been messed up by a system of 50 nonlinear parametric equations with 50 unknowns(see the code in the file named nonlinear ). Since I am new to Maple, I don't know whether it is possible to make such a system work out by software. I've tried the SOLVE and FSOLVE command but get no result. Are there any other ways or toolbox for such kind of systems? Is there any typing wrongs in my code? I am sincerely looking forward to  receive any ideas...

A sequence of real numbers satisfies and

# why matrix is not in numeric but in terms of variables

restart;

with(LinearAlgebra):

with(inttrans):

with(SumTools):

egf := exp(2*x*z-z^2);

test1r := subs(z=x,subs(x=dummy,egf));

test1r2 := solve(test1r=f,x);

b := Matrix([[a1,a2],[a3,a4]]);

invb := MatrixInverse(b);

testing1 := MatrixMatrixMultiply(MatrixMatrixMultiply(MatrixMatrixMultiply(Matrix([[f,f^2]]),invb),Matrix([[x,1],[1,x^2]])),b);

restart;

with(LinearAlgebra):

with(inttrans):

with(SumTools):

egf := exp(2*x*z-z^2);

test1r := subs(z=x,subs(x=dummy,egf));

test1r2 := solve(test1r=f,x);

# Assume b as following

b := Matrix([[a1,a2,a3],[a4,a5,a6],[a7,a8,a9]]);

invb := MatrixInverse(b);

testing1 := MatrixMatrixMultiply(MatrixMatrixMultiply(MatrixMatrixMultiply(Matrix([[f,f^2,1]]),invb),Matrix([[x,1,1],[1,x^2,1],[1,1,x^3]])),b);