15.4.21 problem 22

Internal problem ID [2934]
Book : Differential Equations by Alfred L. Nelson, Karl W. Folley, Max Coral. 3rd ed. DC heath. Boston. 1964
Section : Exercise 8, page 34
Problem number : 22
Date solved : Tuesday, March 04, 2025 at 03:32:44 PM
CAS classification : [[_homogeneous, `class A`], _exact, _rational, _dAlembert]

\begin{align*} \frac {x^{2}+3 y^{2}}{x \left (3 x^{2}+4 y^{2}\right )}+\frac {\left (2 x^{2}+y^{2}\right ) y^{\prime }}{y \left (3 x^{2}+4 y^{2}\right )}&=0 \end{align*}

Maple. Time used: 0.420 (sec). Leaf size: 73
ode:=(x^2+3*y(x)^2)/x/(3*x^2+4*y(x)^2)+(2*x^2+y(x)^2)/y(x)/(3*x^2+4*y(x)^2)*diff(y(x),x) = 0; 
dsolve(ode,y(x), singsol=all);
 
\[ y = \operatorname {RootOf}\left (x^{3} {\mathrm e}^{3 c_1} \textit {\_Z}^{24}-4 \textit {\_Z}^{15}-3 x^{3} {\mathrm e}^{3 c_1}\right )^{5} \sqrt {\frac {\operatorname {RootOf}\left (x^{3} {\mathrm e}^{3 c_1} \textit {\_Z}^{24}-4 \textit {\_Z}^{15}-3 x^{3} {\mathrm e}^{3 c_1}\right )^{5}}{x}}\, {\mathrm e}^{-\frac {3 c_1}{2}} \]
Mathematica. Time used: 60.157 (sec). Leaf size: 1649
ode=(x^2+3*y[x]^2)/(x*(3*x^2+4*y[x]^2))+(2*x^2+y[x]^2)/(y[x]*(3*x^2+4*y[x]^2))*D[y[x],x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 

Too large to display

Sympy. Time used: 0.823 (sec). Leaf size: 29
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq((2*x**2 + y(x)**2)*Derivative(y(x), x)/((3*x**2 + 4*y(x)**2)*y(x)) + (x**2 + 3*y(x)**2)/(x*(3*x**2 + 4*y(x)**2)),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
\[ \log {\left (x \right )} = C_{1} + \log {\left (\frac {\left (3 + \frac {4 y^{2}{\left (x \right )}}{x^{2}}\right )^{\frac {5}{24}}}{\left (\frac {y{\left (x \right )}}{x}\right )^{\frac {2}{3}}} \right )} \]