60.2.301 problem 879

Internal problem ID [10875]
Book : Differential Gleichungen, E. Kamke, 3rd ed. Chelsea Pub. NY, 1948
Section : Chapter 1, Additional non-linear first order
Problem number : 879
Date solved : Sunday, March 30, 2025 at 07:18:39 PM
CAS classification : [[_1st_order, `_with_symmetry_[F(x),G(x)*y+H(x)]`]]

\begin{align*} y^{\prime }&=-\frac {-x y-y+\sqrt {y^{2}+x^{2}}\, x^{2}-x \sqrt {y^{2}+x^{2}}\, y}{x \left (x +1\right )} \end{align*}

Maple. Time used: 0.102 (sec). Leaf size: 56
ode:=diff(y(x),x) = -(-x*y(x)-y(x)+(x^2+y(x)^2)^(1/2)*x^2-x*(x^2+y(x)^2)^(1/2)*y(x))/x/(1+x); 
dsolve(ode,y(x), singsol=all);
 
\[ \ln \left (2\right )+\ln \left (\frac {x \left (\sqrt {2 y^{2}+2 x^{2}}+y+x \right )}{-x +y}\right )+\sqrt {2}\, x -\sqrt {2}\, \ln \left (x +1\right )-\ln \left (x \right )-c_1 = 0 \]
Mathematica. Time used: 37.232 (sec). Leaf size: 220
ode=D[y[x],x] == (y[x] + x*y[x] - x^2*Sqrt[x^2 + y[x]^2] + x*y[x]*Sqrt[x^2 + y[x]^2])/(x*(1 + x)); 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
\begin{align*} y(x)\to \frac {x-2 \sqrt {x^2 \tanh ^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right ) \text {sech}^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right )}}{-1+2 \tanh ^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right )} \\ y(x)\to \frac {x+2 \sqrt {x^2 \tanh ^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right ) \text {sech}^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right )}}{-1+2 \tanh ^2\left (\sqrt {2} \left (\int _1^x\frac {K[1]}{K[1]+1}dK[1]+c_1\right )\right )} \\ y(x)\to x \\ \end{align*}
Sympy
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq(Derivative(y(x), x) + (x**2*sqrt(x**2 + y(x)**2) - x*sqrt(x**2 + y(x)**2)*y(x) - x*y(x) - y(x))/(x*(x + 1)),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
Timed Out