[_quadrature]
Book solution method
Missing Variables ODE, Independent variable missing, Solve for
Mathematica ✓
cpu = 0.454499 (sec), leaf count = 171
Maple ✓
cpu = 0.174 (sec), leaf count = 50
DSolve[1 - y[x]*y'[x] + 3*y'[x]^5 == 0,y[x],x]
Mathematica raw output
{Solve[x + C[1] == Integrate[Root[1 - K[1]*#1 + 3*#1^5 & , 1]^(-1), {K[1], 1, y[
x]}], y[x]], Solve[x + C[1] == Integrate[Root[1 - K[2]*#1 + 3*#1^5 & , 2]^(-1),
{K[2], 1, y[x]}], y[x]], Solve[x + C[1] == Integrate[Root[1 - K[3]*#1 + 3*#1^5 &
, 3]^(-1), {K[3], 1, y[x]}], y[x]], Solve[x + C[1] == Integrate[Root[1 - K[4]*#
1 + 3*#1^5 & , 4]^(-1), {K[4], 1, y[x]}], y[x]], Solve[x + C[1] == Integrate[Roo
t[1 - K[5]*#1 + 3*#1^5 & , 5]^(-1), {K[5], 1, y[x]}], y[x]]}
Maple raw input
dsolve(3*diff(y(x),x)^5-y(x)*diff(y(x),x)+1 = 0, y(x),'implicit')
Maple raw output
x-1/2*y(x)^2-5/2*RootOf(3*_Z^5-y(x)*_Z+1)^3+3/2*y(x)*RootOf(3*_Z^5-y(x)*_Z+1)^4-
_C1 = 0