6.6.25 8.3

6.6.25.1 [1567] Problem 1
6.6.25.2 [1568] Problem 2
6.6.25.3 [1569] Problem 3
6.6.25.4 [1570] Problem 4
6.6.25.5 [1571] Problem 5
6.6.25.6 [1572] Problem 6
6.6.25.7 [1573] Problem 7
6.6.25.8 [1574] Problem 8
6.6.25.9 [1575] Problem 9
6.6.25.10 [1576] Problem 10
6.6.25.11 [1577] Problem 11
6.6.25.12 [1578] Problem 12

6.6.25.1 [1567] Problem 1

problem number 1567

Added May 31, 2019.

Problem Chapter 6.8.3.1, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ a w_x + b w_y + f(x,y) w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  a*D[w[x, y,z], x] + b*D[w[x, y,z], y] +f[x,y]*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (y-\frac {b x}{a},z-\int _1^x\frac {f\left (K[1],y+\frac {b (K[1]-x)}{a}\right )}{a}dK[1]\right )\right \}\right \}\]

Maple

restart; 
pde :=  a*diff(w(x,y,z),x)+  b*diff(w(x,y,z),y)+f(x,y)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( {\frac {ay-xb}{a}},-\int ^{x}\!{\frac {1}{a}f \left ( {\it \_a},{\frac {ay-b \left ( x-{\it \_a} \right ) }{a}} \right ) }{d{\it \_a}}+z \right ) \]

____________________________________________________________________________________

6.6.25.2 [1568] Problem 2

problem number 1568

Added May 31, 2019.

Problem Chapter 6.8.3.2, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ a w_x + b w_y + f(x,y) g(z) w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  a*D[w[x, y,z], x] + b*D[w[x, y,z], y] +f[x,y]*g[z]*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (y-\frac {b x}{a},\int _1^z\frac {1}{g(K[1])}dK[1]-\int _1^x\frac {f\left (K[2],y+\frac {b (K[2]-x)}{a}\right )}{a}dK[2]\right )\right \}\right \}\]

Maple

restart; 
pde :=  a*diff(w(x,y,z),x)+  b*diff(w(x,y,z),y)+f(x,y)*g(z)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( {\frac {ay-xb}{a}},-\int ^{x}\!f \left ( {\it \_a},{\frac {ay-b \left ( x-{\it \_a} \right ) }{a}} \right ) {d{\it \_a}}+\int \!{\frac {a}{g \left ( z \right ) }}\,{\rm d}z \right ) \]

____________________________________________________________________________________

6.6.25.3 [1569] Problem 3

problem number 1569

Added May 31, 2019.

Problem Chapter 6.8.3.3, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ x w_x + y w_y + (z+f(x,y)) w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  x*D[w[x, y,z], x] + y*D[w[x, y,z], y] +(z+f[x,y])*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (\frac {y}{x},\frac {z}{x}-\int _1^x\frac {f\left (K[1],\frac {y K[1]}{x}\right )}{K[1]^2}dK[1]\right )\right \}\right \}\]

Maple

restart; 
pde :=  x*diff(w(x,y,z),x)+  y*diff(w(x,y,z),y)+(z+f(x,y))*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( {\frac {y}{x}},{\frac {1}{x} \left ( -\int ^{x}\!{\frac {1}{{{\it \_a}}^{2}}f \left ( {\it \_a},{\frac {{\it \_a}\,y}{x}} \right ) }{d{\it \_a}}x+z \right ) } \right ) \]

____________________________________________________________________________________

6.6.25.4 [1570] Problem 4

problem number 1570

Added May 31, 2019.

Problem Chapter 6.8.3.4, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ a x w_x + b y w_y + f(x,y) w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  a*x*D[w[x, y,z], x] + b*y*D[w[x, y,z], y] +f[x,y]*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (y x^{-\frac {b}{a}},z-\int _1^x\frac {f\left (K[1],x^{-\frac {b}{a}} y K[1]^{\frac {b}{a}}\right )}{a K[1]}dK[1]\right )\right \}\right \}\]

Maple

restart; 
pde :=  a*x*diff(w(x,y,z),x)+  b*y*diff(w(x,y,z),y)+f(x,y)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( y{x}^{-{\frac {b}{a}}},-\int ^{x}\!{\frac {1}{{\it \_a}\,a}f \left ( {\it \_a},y{x}^{-{\frac {b}{a}}}{{\it \_a}}^{{\frac {b}{a}}} \right ) }{d{\it \_a}}+z \right ) \]

____________________________________________________________________________________

6.6.25.5 [1571] Problem 5

problem number 1571

Added May 31, 2019.

Problem Chapter 6.8.3.5, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ a x w_x + b y w_y + f(x,y) g(z) w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  a*x*D[w[x, y,z], x] + b*y*D[w[x, y,z], y] +f[x,y]*g[x]*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (y x^{-\frac {b}{a}},z-\int _1^x\frac {f\left (K[1],x^{-\frac {b}{a}} y K[1]^{\frac {b}{a}}\right ) g(K[1])}{a K[1]}dK[1]\right )\right \}\right \}\]

Maple

restart; 
pde :=  a*x*diff(w(x,y,z),x)+  b*y*diff(w(x,y,z),y)+f(x,y)*g(z)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( y{x}^{-{\frac {b}{a}}},-\int ^{x}\!{\frac {1}{{\it \_a}}f \left ( {\it \_a},y{x}^{-{\frac {b}{a}}}{{\it \_a}}^{{\frac {b}{a}}} \right ) }{d{\it \_a}}+\int \!{\frac {a}{g \left ( z \right ) }}\,{\rm d}z \right ) \]

____________________________________________________________________________________

6.6.25.6 [1572] Problem 6

problem number 1572

Added May 31, 2019.

Problem Chapter 6.8.3.6, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ w_x + (f_1(x) y+f_2(x)) w_y + (g(x,y) z + h(x,y) )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  D[w[x, y,z], x] + (f1[x]*y+f2[x])*D[w[x, y,z], y] +(g[x,y]*z+h[x,y])*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left (y \exp \left (-\int _1^x\text {f1}(K[1])dK[1]\right )-\int _1^x\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2],z \exp \left (-\int _1^xg\left (K[3],\exp \left (\int _1^{K[3]}\text {f1}(K[1])dK[1]\right ) \left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]\right ) y-\int _1^x\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]+\int _1^{K[3]}\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]\right )\right )dK[3]\right )-\int _1^x\exp \left (-\int _1^{K[4]}\text {InverseFunction}[\text {Inactive}[\text {Integrate}],1,2]\left [\log \left (\exp \left (\int _1^xg\left (K[3],\exp \left (\int _1^{K[3]}\text {f1}(K[1])dK[1]\right ) \left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]\right ) y-\int _1^x\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]+\int _1^{K[3]}\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]\right )\right )dK[3]\right )\right ),\{K[3],1,x\}\right ]dK[3]\right ) h\left (K[4],\exp \left (\int _1^{K[4]}\text {f1}(K[1])dK[1]\right ) \left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]\right ) y-\int _1^x\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]+\int _1^{K[4]}\exp \left (-\int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]\right )\right )dK[4]\right )\right \}\right \}\]

Maple

restart; 
pde := diff(w(x,y,z),x)+ (f1(x)*y+f2(x))*diff(w(x,y,z),y)+(g(x,y)*z+h(x,y))*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( -\int \!{\it f2} \left ( x \right ) {{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+y{{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}},-\int ^{x}\!h \left ( {\it \_a}, \left ( \int \!{\it f2} \left ( {\it \_a} \right ) {{\rm e}^{-\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}}\,{\rm d}{\it \_a}-\int \!{\it f2} \left ( x \right ) {{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+y{{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}} \right ) {{\rm e}^{-\int \!g \left ( {\it \_a}, \left ( \int \!{\it f2} \left ( {\it \_a} \right ) {{\rm e}^{-\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}}\,{\rm d}{\it \_a}-\int \!{\it f2} \left ( x \right ) {{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+y{{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}} \right ) \,{\rm d}{\it \_a}}}{d{\it \_a}}+z{{\rm e}^{-\int ^{x}\!g \left ( {\it \_f}, \left ( \int \!{\it f2} \left ( {\it \_f} \right ) {{\rm e}^{-\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}}\,{\rm d}{\it \_f}-\int \!{\it f2} \left ( x \right ) {{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+y{{\rm e}^{-\int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}} \right ) {d{\it \_f}}}} \right ) \]

____________________________________________________________________________________

6.6.25.7 [1573] Problem 7

problem number 1573

Added May 31, 2019.

Problem Chapter 6.8.3.7, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ w_x + (f_1(x) y+f_2(x) y^k) w_y + (g(x,y) z + h(x,y) z^m )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  D[w[x, y,z], x] + (f1[x]*y+f2[x]*y^k)*D[w[x, y,z], y] +(g[x,y]*z+h[x,y]*z^m)*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

\[\left \{\left \{w(x,y,z)\to c_1\left ((k-1) \int _1^x\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2]+y^{1-k} \exp \left ((k-1) \int _1^x\text {f1}(K[1])dK[1]\right ),(m-1) \int _1^x\exp \left ((m-1) \int _1^{K[4]}\text {InverseFunction}[\text {Inactive}[\text {Integrate}],1,2]\left [-\frac {\log \left (\exp \left (-(m-1) \int _1^xg\left (K[3],\left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]-(k-1) \int _1^{K[3]}\text {f1}(K[1])dK[1]\right ) y^{-k} \left (\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^x\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k-\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^{K[3]}\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k+\exp \left (k \int _1^x\text {f1}(K[1])dK[1]\right ) y\right )\right ){}^{\frac {1}{1-k}}\right )dK[3]\right )\right )}{m-1},\{K[3],1,x\}\right ]dK[3]\right ) h\left (K[4],\left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]-(k-1) \int _1^{K[4]}\text {f1}(K[1])dK[1]\right ) y^{-k} \left (\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^x\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k-\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^{K[4]}\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k+\exp \left (k \int _1^x\text {f1}(K[1])dK[1]\right ) y\right )\right ){}^{\frac {1}{1-k}}\right )dK[4]+z^{1-m} \exp \left ((m-1) \int _1^xg\left (K[3],\left (\exp \left (-\int _1^x\text {f1}(K[1])dK[1]-(k-1) \int _1^{K[3]}\text {f1}(K[1])dK[1]\right ) y^{-k} \left (\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^x\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k-\exp \left (\int _1^x\text {f1}(K[1])dK[1]\right ) (k-1) \int _1^{K[3]}\exp \left ((k-1) \int _1^{K[2]}\text {f1}(K[1])dK[1]\right ) \text {f2}(K[2])dK[2] y^k+\exp \left (k \int _1^x\text {f1}(K[1])dK[1]\right ) y\right )\right ){}^{\frac {1}{1-k}}\right )dK[3]\right )\right )\right \}\right \}\]

Maple

restart; 
pde := diff(w(x,y,z),x)+ (f1(x)*y+f2(x)*y^k)*diff(w(x,y,z),y)+(g(x,y)*z+h(x,y)*z^m)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( \left ( k-1 \right ) \int \!{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}}{\it f2} \left ( x \right ) \,{\rm d}x+{y}^{-k+1}{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}}, \left ( m-1 \right ) \int ^{x}\!{{\rm e}^{\int \!g \left ( {\it \_h},{{\rm e}^{\int \!{\it f1} \left ( {\it \_h} \right ) \,{\rm d}{\it \_h}}} \left ( \left ( -k+1 \right ) \int \!{\it f2} \left ( {\it \_h} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_h} \right ) \,{\rm d}{\it \_h} \left ( k-1 \right ) }}\,{\rm d}{\it \_h}+ \left ( k-1 \right ) \int \!{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}}{\it f2} \left ( x \right ) \,{\rm d}x+{y}^{-k+1}{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) ^{- \left ( k-1 \right ) ^{-1}} \right ) \,{\rm d}{\it \_h} \left ( m-1 \right ) }}h \left ( {\it \_h},{{\rm e}^{\int \!{\it f1} \left ( {\it \_h} \right ) \,{\rm d}{\it \_h}}} \left ( \left ( -k+1 \right ) \int \!{\it f2} \left ( {\it \_g} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_g} \right ) \,{\rm d}{\it \_g} \left ( k-1 \right ) }}\,{\rm d}{\it \_g}+ \left ( k-1 \right ) \int \!{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}}{\it f2} \left ( x \right ) \,{\rm d}x+{y}^{-k+1}{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) ^{- \left ( k-1 \right ) ^{-1}} \right ) {d{\it \_h}}+{z}^{1-m}{{\rm e}^{\int ^{x}\!g \left ( {\it \_f},{{\rm e}^{\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}} \left ( \left ( -k+1 \right ) \int \!{\it f2} \left ( {\it \_f} \right ) {{\rm e}^{\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f} \left ( k-1 \right ) }}\,{\rm d}{\it \_f}+ \left ( k-1 \right ) \int \!{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}}{\it f2} \left ( x \right ) \,{\rm d}x+{y}^{-k+1}{{\rm e}^{ \left ( k-1 \right ) \int \!{\it f1} \left ( x \right ) \,{\rm d}x}} \right ) ^{- \left ( k-1 \right ) ^{-1}} \right ) {d{\it \_f}} \left ( m-1 \right ) }} \right ) \]

____________________________________________________________________________________

6.6.25.8 [1574] Problem 8

problem number 1574

Added May 31, 2019.

Problem Chapter 6.8.3.8, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ w_x + (f_1(x) y+f_2(x) y^k) w_y + (g(x,y) + h(x,y) e^{\lambda z} )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  D[w[x, y,z], x] + (f1[x]*y+f2[x]*y^k)*D[w[x, y,z], y] +(g[x,y]*z+h[x,y]*Exp[lambda*z])*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

Failed

Maple

restart; 
pde := diff(w(x,y,z),x)+ (f1(x)*y+f2(x)*y^k)*diff(w(x,y,z),y)+(g(x,y)*z+h(x,y)*exp(lambda*z))*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

time expired

____________________________________________________________________________________

6.6.25.9 [1575] Problem 9

problem number 1575

Added May 31, 2019.

Problem Chapter 6.8.3.9, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ w_x + (f_1(x) +f_2(x) e^{\lambda y}) w_y + (g(x,y) z + h(x,y) z^k )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  D[w[x, y,z], x] + (f1[x]+f2[x]*Exp[lambda*y])*D[w[x, y,z], y] +(g[x,y]*z+h[x,y]*z^k)*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

Failed

Maple

restart; 
pde := diff(w(x,y,z),x)+ (f1(x)+f2(x)*exp(lambda*y))*diff(w(x,y,z),y)+(g(x,y)*z+h(x,y)*z^k)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( -{\frac { \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}}{\lambda }}, \left ( k-1 \right ) \int ^{x}\!h \left ( {\it \_f},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_f} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}}\,{\rm d}{\it \_f}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}{\lambda }} \right ) {{\rm e}^{\int \!g \left ( {\it \_f},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_f} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}}\,{\rm d}{\it \_f}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_f} \right ) \,{\rm d}{\it \_f}}{\lambda }} \right ) \,{\rm d}{\it \_f} \left ( k-1 \right ) }}{d{\it \_f}}+{z}^{-k+1}{{\rm e}^{\int ^{x}\!g \left ( {\it \_a},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_a} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}}\,{\rm d}{\it \_a}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_a} \right ) \,{\rm d}{\it \_a}}{\lambda }} \right ) {d{\it \_a}} \left ( k-1 \right ) }} \right ) \]

____________________________________________________________________________________

6.6.25.10 [1576] Problem 10

problem number 1576

Added May 31, 2019.

Problem Chapter 6.8.3.10, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ w_x + (f_1(x) +f_2(x) e^{\lambda y}) w_y + (g(x,y) + h(x,y) e^{\beta z} )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  D[w[x, y,z], x] + (f1[x]+f2[x]*Exp[lambda*y])*D[w[x, y,z], y] +(g[x,y]+h[x,y]*Exp[beta*z])*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

Failed

Maple

restart; 
pde := diff(w(x,y,z),x)+ (f1(x)+f2(x)*exp(lambda*y))*diff(w(x,y,z),y)+(g(x,y)+h(x,y)*exp(beta*z))*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

\[w \left ( x,y,z \right ) ={\it \_F1} \left ( -{\frac { \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}}{\lambda }},{\frac {1}{\beta } \left ( -\beta \,\int ^{x}\!h \left ( {\it \_b},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_b} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}}\,{\rm d}{\it \_b}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}{\lambda }} \right ) {{\rm e}^{\beta \,\int \!g \left ( {\it \_b},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_b} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}}\,{\rm d}{\it \_b}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}{\lambda }} \right ) \,{\rm d}{\it \_b}}}{d{\it \_b}}-{{\rm e}^{\beta \, \left ( -z+\int ^{x}\!g \left ( {\it \_b},{\frac {\ln \left ( \left ( \left ( {{\rm e}^{\lambda \, \left ( y-\int \!{\it f1} \left ( x \right ) \,{\rm d}x \right ) }}\lambda \,\int \!{\it f2} \left ( x \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( x \right ) \,{\rm d}x}}\,{\rm d}x+1 \right ) {{\rm e}^{\lambda \, \left ( \int \!{\it f1} \left ( x \right ) \,{\rm d}x-y \right ) }}-\int \!{\it f2} \left ( {\it \_b} \right ) {{\rm e}^{\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}}\,{\rm d}{\it \_b}\lambda \right ) ^{-1} \right ) +\lambda \,\int \!{\it f1} \left ( {\it \_b} \right ) \,{\rm d}{\it \_b}}{\lambda }} \right ) {d{\it \_b}} \right ) }} \right ) } \right ) \]

____________________________________________________________________________________

6.6.25.11 [1577] Problem 11

problem number 1577

Added May 31, 2019.

Problem Chapter 6.8.3.11, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ f_1(x) g_1(y) w_x + f_2(x) g_2(y) w_y + (h_1(x,y) + h_2(x,y) z^m )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  f1[x]*g1[y]*D[w[x, y,z], x] + f2[x]*g2[y]*D[w[x, y,z], y] +(h1[x,y]+h2[x,y]*z^m)*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

Failed

Maple

restart; 
pde := f1(x)*g1(y)*diff(w(x,y,z),x)+ f2(x)*g2(y)*diff(w(x,y,z),y)+(h1(x,y)+h2(x,y)*z^m)*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

sol=()

____________________________________________________________________________________

6.6.25.12 [1578] Problem 12

problem number 1578

Added May 31, 2019.

Problem Chapter 6.8.3.12, from Handbook of first order partial differential equations by Polyanin, Zaitsev, Moussiaux.

Solve for \(w(x,y,z)\)

\[ f_1(x) g_1(y) w_x + f_2(x) g_2(y) w_y + (h_1(x,y) + h_2(x,y) e^{\lambda z} )w_z = 0 \]

Mathematica

ClearAll["Global`*"]; 
pde =  f1[x]*g1[y]*D[w[x, y,z], x] + f2[x]*g2[y]*D[w[x, y,z], y] +(h1[x,y]+h2[x,y]*Exp[lambda*z])*D[w[x,y,z],z]==0; 
sol =  AbsoluteTiming[TimeConstrained[DSolve[pde, w[x, y,z], {x, y,z}], 60*10]];
 

Failed

Maple

restart; 
pde := f1(x)*g1(y)*diff(w(x,y,z),x)+ f2(x)*g2(y)*diff(w(x,y,z),y)+(h1(x,y)+h2(x,y)*exp(lambda*z))*diff(w(x,y,z),z)= 0; 
cpu_time := timelimit(60*10,CodeTools[Usage](assign('sol',pdsolve(pde,w(x,y,z))),output='realtime'));
 

sol=()