# Tag Info

6

One option would be to restrict the function from funky regions with a Condition liks this f[x_, y_] /; Abs[x - y] > 5 := (Sin[x] - Sin[y])/(x - y); Plot3D[f[x, y], {x, -10, 10}, {y, -10, 10}] Out: One can easily see that Plot3D will also sample points in the region which is "forbidden", the points are just not drawn due to the RegionFunction. ...

5

According to the documentation center: Goto first scans any compound expression in which it appears directly, then scans compound expressions that enclose this one. Your Goto - Label construction is part of the List so Mathematica fails to find the label. Taking this under consideration, the following will work: k = 0; Do[{ Label[top]; k = k + 1; ...

1

What is going on? By Trace-ing the ContourPlot3D, I found the warning (on my MMA) comes from a function SystemProtoPlotDumpfindextreme (Hereafter, the context SystemProtoPlotDump will be omitted for readability): findextreme[{f_, {x_, xmin_, xmax_}, {y_, ymin_, ymax_}, {z_, zmin_, zmax_} }] := ...

1

It seems there is a undefined variable games in the compressed data. The code in the compressed data attempts to do a union on this games variable and some lists. So essentially, the error you get is the same one caused by Union[{}, games] To see it for yourself, try using Uncompress with two arguments. I suggest to use HoldComplete as a second argument. ...

1

My reading of the error message you are getting is that if you try λp[85.] = 6540 λp[100.] = 6540 Psat[85.] = 78896.6 Psat[100.] = 323767 your original formulation might work. λp[100] is not the same as λp[100.]. Similarly for λp[85] and Psat, too.

Only top voted, non community-wiki answers of a minimum length are eligible