4.36.42 2a2y(x)+(3a+y(x))y(x)+ay(x)2+y(x)=y(x)3

ODE
2a2y(x)+(3a+y(x))y(x)+ay(x)2+y(x)=y(x)3 ODE Classification

[[_2nd_order, _missing_x]]

Book solution method
TO DO

Mathematica
cpu = 26.101 (sec), leaf count = 0 , could not solve

DSolve[2*a^2*y[x] + a*y[x]^2 + (3*a + y[x])*Derivative[1][y][x] + Derivative[2][y][x] == y[x]^3, y[x], x]

Maple
cpu = 0.293 (sec), leaf count = 358

{1a(eax+(y(x)eax12_f62_C1(_f2(i31)(_f6_C1)1(_f6_C1)2(1+_C1_f6+_C1)3+(_f6_C1)2(1+_C1_f6+_C1)3(i3+1))d_f_C2)a)=0,1a(eax+(y(x)eax12_f62_C1(_f2(i3+1)(_f6_C1)1(_f6_C1)2(1+_C1_f6+_C1)3+(i3+1)(_f6_C1)2(1+_C1_f6+_C1)3)d_f_C2)a)=0,1a(eax+(y(x)eax1_f6+_C1(_f6_C1)2(1+_C1_f6+_C1)3_f21(_f6_C1)2(1+_C1_f6+_C1)3d_f_C2)a)=0} Mathematica raw input

DSolve[2*a^2*y[x] + a*y[x]^2 + (3*a + y[x])*y'[x] + y''[x] == y[x]^3,y[x],x]

Mathematica raw output

DSolve[2*a^2*y[x] + a*y[x]^2 + (3*a + y[x])*Derivative[1][y][x] + Derivative[2][
y][x] == y[x]^3, y[x], x]

Maple raw input

dsolve(diff(diff(y(x),x),x)+(3*a+y(x))*diff(y(x),x)+2*a^2*y(x)+a*y(x)^2 = y(x)^3, y(x),'implicit')

Maple raw output

(-exp(-a*x)+(-Intat(1/(-_f^6+_C1)*((_f^6-_C1)^2*(-1+(_C1/(-_f^6+_C1))^(1/2)))^(1
/3)-_f^2/((_f^6-_C1)^2*(-1+(_C1/(-_f^6+_C1))^(1/2)))^(1/3),_f = y(x)*exp(a*x))-_
C2)*a)/a = 0, (-exp(-a*x)+(-Intat((-_f^2*(I*3^(1/2)-1)*(_f^6-_C1)/((_f^6-_C1)^2*
(-1+(_C1/(-_f^6+_C1))^(1/2)))^(1/3)+((_f^6-_C1)^2*(-1+(_C1/(-_f^6+_C1))^(1/2)))^
(1/3)*(I*3^(1/2)+1))/(2*_f^6-2*_C1),_f = y(x)*exp(a*x))-_C2)*a)/a = 0, (-exp(-a*
x)+(-Intat((_f^2*(I*3^(1/2)+1)*(_f^6-_C1)/((_f^6-_C1)^2*(-1+(_C1/(-_f^6+_C1))^(1
/2)))^(1/3)+(-I*3^(1/2)+1)*((_f^6-_C1)^2*(-1+(_C1/(-_f^6+_C1))^(1/2)))^(1/3))/(2
*_f^6-2*_C1),_f = y(x)*exp(a*x))-_C2)*a)/a = 0