[_exact, _rational, [_Abel, `2nd type`, `class B`]]
Book solution method
Exact equation
Mathematica ✓
cpu = 0.011937 (sec), leaf count = 83
Maple ✓
cpu = 0.014 (sec), leaf count = 25
DSolve[2*x + 2*x*y[x] + 3*y[x]^2 + (3 + x^2 + 6*x*y[x])*y'[x] == 0,y[x],x]
Mathematica raw output
{{y[x] -> -(3 + x^2 + Sqrt[9 + 6*x^2 - 12*x^3 + x^4 + 36*x*C[1]])/(6*x)}, {y[x]
-> -(3 + x^2 - Sqrt[9 + 6*x^2 - 12*x^3 + x^4 + 36*x*C[1]])/(6*x)}}
Maple raw input
dsolve((3+6*x*y(x)+x^2)*diff(y(x),x)+2*x+2*x*y(x)+3*y(x)^2 = 0, y(x),'implicit')
Maple raw output
x^2*y(x)+3*x*y(x)^2+x^2+_C1+3*y(x) = 0