Mathematica 3.0.0 on WinNT 4: Bug in Show[]

*To*: mathgroup at smc.vnet.net*Subject*: [mg8848] Mathematica 3.0.0 on WinNT 4: Bug in Show[]*From*: Gregor Overney <overney at worldnet.att.net>*Date*: Mon, 29 Sep 1997 02:40:21 -0400*Organization*: AT&T WorldNet Services*Sender*: owner-wri-mathgroup at wolfram.com

Please try the following code that should overlap a CountourPlot together with a DensityPlot using Mathematica 3.0.0 on WinNT 4.0. Any idea how to fix this problem? If you are replacing PlotPoints->300 with PlotPoints->100 and PlotPoints->200 with PlotPoints->50, respectively, it should work, but then the quality of the output is far from publication quality. I do not think that the problem is related to RAM size, nor do I believe that a hardware related problem (e.g. graphics board, CPU, ...) could cause this strange behavior. gregor Func[x_, y_] = Sin[x^2*y - 4 x*y^2] + x*y; Cont1 = DensityPlot[ Func[x, y], {x, -nres, nres}, {y, -nres, nres}, PlotPoints -> 300, Mesh -> False, ColorFunction -> Hue, DisplayFunction -> Identity]; Cont2 = ContourPlot[Func[x, y], {x, -nres, nres}, {y, -nres, nres}, PlotPoints -> 200, Contours -> {0}, ContourShading -> False, ContourStyle -> {RGBColor[0, 0, 0]}, DisplayFunction -> Identity]; Show[{Cont1,Cont2}, DisplayFunction -> $DisplayFunction];