Added March 9, 2019.
Problem Chapter 4.6.1.1, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.
Solve for \(w(x,y)\)
Mathematica ✓
ClearAll["Global`*"]; pde = a*D[w[x, y], x] + b*D[w[x, y], y] == c*Sin[lambda*x + mu*y]*w[x, y]; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde := a*diff(w(x,y),x)+ b*diff(w(x,y),y) = c*sin(lambda*x+mu*y)*w(x,y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y))),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added March 9, 2019.
Problem Chapter 4.6.1.2, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.
Solve for \(w(x,y)\)
Mathematica ✓
ClearAll["Global`*"]; pde = a*D[w[x, y], x] + b*D[w[x, y], y] == (c*Sin[lambda*x] + k*Sin[mu*y])*w[x, y]; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde := a*diff(w(x,y),x)+ b*diff(w(x,y),y) = (c*sin(lambda*x)+k*sin(mu*y))*w(x,y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y))),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added March 9, 2019.
Problem Chapter 4.6.1.3, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.
Solve for \(w(x,y)\)
Mathematica ✓
ClearAll["Global`*"]; pde = x*D[w[x, y], x] + y*D[w[x, y], y] == a*x*Sin[lambda*x + mu*y]*w[x, y]; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde := x*diff(w(x,y),x)+ y*diff(w(x,y),y) = a*x*sin(lambda*x+mu*y)*w(x,y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y))),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added March 9, 2019.
Problem Chapter 4.6.1.4, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.
Solve for \(w(x,y)\)
Mathematica ✓
ClearAll["Global`*"]; pde = a*D[w[x, y], x] + b*Sin[lambda*x]^n*D[w[x, y], y] == (c*Sin[mu*x]^m + s*Sin[beta*y]^k)*w[x, y]; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde := a*diff(w(x,y),x)+ b*sin(lambda*x)^n*diff(w(x,y),y) = (c*sin(mu*x)^m+s*sin(beta*y)^k)*w(x,y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y))),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added March 9, 2019.
Problem Chapter 4.6.1.5, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.
Solve for \(w(x,y)\)
Mathematica ✓
ClearAll["Global`*"]; pde = a*D[w[x, y], x] + b*Sin[lambda*y]^n*D[w[x, y], y] == (c*Sin[mu*x]^m + s*Sin[beta*y]^k)*w[x, y]; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde := a*diff(w(x,y),x)+ b*sin(lambda*y)^n*diff(w(x,y),y) = (c*sin(mu*x)^m+s*sin(beta*y)^k)*w(x,y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y))),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________