I need taylor expasion of

A(w):=M/sqrt(M^2+2*w)-mup*sqrt(((mu*M^2+3*sigmap-2*w)-sqrt((mu*M^2+3*sigmap-2*w)^2-12*mu*sigmap*M^2))/(6*sigmap))

I used taylor(A,w,4), but I had a problem!

If I know that A(w) is a real function, how can I remove ‘csgn’ from the  ‘taylor(A,w,4)’ command:

Thanks.

12.mws

Hellow everyone,

Consider the following diffrential equation:

(dA(x)/dx )^2+V(A)=0,
1- How to plot dA/dx vs A?

2- How to find the coordinate of intersection point of f(x)=e-b*exp(x)-c*(1-2*x/c)^(1/2) with df/dx? e,b,c are constants.

I want to solve the following system of PDEs with Maple: 

In fact, I want to determine q1,n1,p1,nn1,qn1,pn1 as a functions of pphi1 (assume  ne1(X,T)=(alpha/(2))*pphi1(X,T))

(mu, nu, beta, lambda, TE , alpha and TT are constant, but q1,n1,p1,nn1,qn1,pn1 depend on (X,T))

How do I do that?             

                   
> diff(q1(X, T), X)-lambda*(diff(n1(X, T), X)) = 0;

diff(pphi1(X, T), X)+TE*(diff(p1(X, T), X))-lambda*(diff(q1(X, T), X)) = 0;

-lambda*(diff(p1(X, T), X))+3*(diff(q1(X, T), X)) = 0;

-lambda*(diff(nn1(X, T), X))+diff(qn1(X, T), X) = 0;

-lambda*(diff(qn1(X, T), X))+beta*TT*(diff(pn1(X, T), X))-beta*(diff(pphi1(X, T), X)) = 0;

-lambda*(diff(pn1(X, T), X))+3*(diff(qn1(X, T), X)) = 0;

-mu*ne1(X, T)-nu*nn1(X, T)+n1(X, T) = 0;

Suppose two following Eqs.:

(1) du/dt+d(u*w)/dx=0

(2) dw/dt+wdw/dx=0

I want to expand u(x,t) and w(x,t) in the power series of epsilon

u=u0+epsilon*u1+epsilon^2*u2+…

w=w0+epsilon*w1+epsilon^2*w2+…

and change the variables x,t to X,T as follows

 X=(x-alpha*t) and T=beta*t,

and solving Eqs. (1) and (2) for different order of epsilon (epsilon, epsilon^2, epsilon^3,…) to finding u0,w0,u1,w1,…

How do I do that?

Thanks.