[[_homogeneous, `class G`]]
Book solution method
No Missing Variables ODE, Solve for
Mathematica ✓
cpu = 0.204213 (sec), leaf count = 133
Maple ✓
cpu = 0.072 (sec), leaf count = 57
DSolve[-y[x]^4 + y[x]*y'[x] + x*y'[x]^2 == 0,y[x],x]
Mathematica raw output
{{y[x] -> -Sqrt[-1 + Tanh[(C[1] - Log[x])/2]^2]/(2*Sqrt[x])}, {y[x] -> Sqrt[-1 +
Tanh[(C[1] - Log[x])/2]^2]/(2*Sqrt[x])}, {y[x] -> -Sqrt[-1 + Tanh[(-C[1] + Log[
x])/2]^2]/(2*Sqrt[x])}, {y[x] -> Sqrt[-1 + Tanh[(-C[1] + Log[x])/2]^2]/(2*Sqrt[x
])}}
Maple raw input
dsolve(x*diff(y(x),x)^2+y(x)*diff(y(x),x)-y(x)^4 = 0, y(x),'implicit')
Maple raw output
y(x)^2+1/4/x = 0, ln(x)-_C1+2*arctanh(1/(4*x*y(x)^2+1)^(1/2)) = 0, ln(x)-_C1-2*a
rctanh(1/(4*x*y(x)^2+1)^(1/2)) = 0