I came across a plot3d where a non continuous function looked continuous. One way to confirm if it was indeed coninuous was to use style=point
with(plots):
plot3d(Im(sqrt(x+I*y)), x = -2 .. 2, y = -2 .. 2)

plot3d(Im(sqrt(x+I*y)), x = -2 .. 2, y = -2 .. 2, style = point, grid = [70, 70])

With style=point we see a better representation. One way to show the surface without the inteconnected surface would be to split the graph into two.
a := plot3d(Im(sqrt(x+I*y)), x = -2 .. 2, y = 0 .. 2):
b := plot3d(Im(sqrt(x+I*y)), x = -2 .. 2, y = -2 .. 0):
display(a,b)
