\[ y''(x)-y(x) (B+n (n+1) \wp (x;\text {g2},\text {g3}))=0 \] ✗ Mathematica : cpu = 0.200477 (sec), leaf count = 0 , could not solve
DSolve[-((B + n*(1 + n)*WeierstrassP[x, {g2, g3}])*y[x]) + Derivative[2][y][x] == 0, y[x], x]
✗ Maple : cpu = 0. (sec), leaf count = 0 , result contains DESol
\[\{y \left (x \right ) = \mathit {DESol}\left (\left \{\left (-\left (n +1\right ) n \WeierstrassP \left (x , \mathit {g2} , \mathit {g3}\right )-B \right ) \textit {\_Y} \left (x \right )+\frac {d^{2}}{d x^{2}}\textit {\_Y} \left (x \right )\right \}, \left \{\textit {\_Y} \left (x \right )\right \}\right )\}\]