dsolve(diff(diff(diff(y(x),x),x),x)+(A*WeierstrassP(x,g2,g3)+a)*diff(y(x),x)+B*WeierstrassPPrime(x,g2,g3)*y(x)=0,y(x))