Question: How do I solve my Eqs. in Maple?

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.

 

Please Wait...