PolynomialExtendedGCD[x^3+px+q,D[x^3+px+q,x],x]