ContourPlot[1*x^2 + x*y + 3*y^2, {x, -10, 10}, {y, -10, 10}]