[[_homogeneous, `class G`], _rational]
Book solution method
Exact equation, integrating factor
Mathematica ✓
cpu = 0.0126665 (sec), leaf count = 123
Maple ✓
cpu = 0.006 (sec), leaf count = 16
DSolve[2*(x - y[x]^4)*y'[x] == y[x],y[x],x]
Mathematica raw output
{{y[x] -> -(Sqrt[C[1] - Sqrt[-4*x + C[1]^2]]/Sqrt[2])}, {y[x] -> Sqrt[C[1] - Sqr
t[-4*x + C[1]^2]]/Sqrt[2]}, {y[x] -> -(Sqrt[C[1] + Sqrt[-4*x + C[1]^2]]/Sqrt[2])
}, {y[x] -> Sqrt[C[1] + Sqrt[-4*x + C[1]^2]]/Sqrt[2]}}
Maple raw input
dsolve(2*(x-y(x)^4)*diff(y(x),x) = y(x), y(x),'implicit')
Maple raw output
y(x)^4-y(x)^2*_C1+x = 0