ContourPlot[2 (y^3 + 6 ArcTan[x] + 6 x Sin[y]) == Pi (3 + 2 Pi^2), {x, 100, 200}, {y, 0, 15}]