Added Feb. 9, 2019.
Problem Chapter 3.4.3.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*Tanh[lambda*x] + k*Tanh[mu*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*tanh(lambda*x)+ k *tanh(mu*y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y)) ),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added Feb. 9, 2019.
Problem Chapter 3.4.3.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*Tanh[lambda*x + mu*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*tanh(lambda*x+mu*y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y)) ),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added Feb. 11, 2019.
Problem Chapter 3.4.3.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*Tanh[lambda*x + mu*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*tanh(lambda*x+mu*y); cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y)) ),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added Feb. 11, 2019.
Problem Chapter 3.4.3.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*Tanh[lambda*x]^n*D[w[x, y], y] == c*Tanh[mu*x]^m + s*Tanh[beta*y]^k; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde :=a*diff(w(x,y),x) + b*tanh(lambda*x)^n*diff(w(x,y),y) = c*tanh(mu*x)^m+s*tanh(beta*y)^k; cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y)) ),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
Added Feb. 11, 2019.
Problem Chapter 3.4.3.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*Tanh[lambda*y]^n*D[w[x, y], y] == c*Tanh[mu*x]^m + s*Tanh[beta*y]^k; sol = AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y], {x, y}], 60*10]];
Maple ✓
restart; pde :=a*diff(w(x,y),x) + b*tanh(lambda*y)^n*diff(w(x,y),y) = c*tanh(mu*x)^m+s*tanh(beta*y)^k; cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y)) ),output='realtime'));
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________