Tangent plane examples 

 

1.  The surface  z = `^`(e, `+`(`-`(`*`(`^`(x, 2))), `-`(`*`(`^`(y, 2)))))and its tangent plane at (.1,0): 

 

with(plots); -1 

Surf1 := plot3d(exp(`+`(`-`(`*`(`^`(x, 2))), `-`(`*`(`^`(y, 2))))), x = -1 .. 1, y = -1 .. 1, style = patchnogrid); -1 

Tang1 := plot3d(`+`(exp(-0.1e-1), `-`(`*`(.2, `*`(exp(-0.1e-1), `*`(`+`(x, `-`(.1))))))), x = -.4 .. .6, y = -.5 .. .5); -1 

display(Surf1, Tang1); 1 

Plot_2d
 

This should look like what we expect for a tangent plane. 

 

2.  Here is a somewhat different example.  The graph is `and`(z = f(x, y), f(x, y) = `/`(`*`(xy), `*`(`+`(`*`(`^`(x, 2)), `*`(`^`(y, 2)))))) (and Checking by the definition, we can see diff(f(0, 0), x) = 0and  diff(f(0, 0), y) = 0.   But here the "tangent plane" does not match the shape of the graph very well near (0,0): 

 

Surf2 := plot3d(`/`(`*`(x, `*`(y)), `*`(`+`(`*`(`^`(x, 2)), `*`(`^`(y, 2))))), x = -1 .. 1, y = -1 .. 1, style = patchnogrid); -1; Tang2 := plot3d(0, x = -.5 .. .5, y = -.5 .. .5); -1; display(Surf2, ...
Surf2 := plot3d(`/`(`*`(x, `*`(y)), `*`(`+`(`*`(`^`(x, 2)), `*`(`^`(y, 2))))), x = -1 .. 1, y = -1 .. 1, style = patchnogrid); -1; Tang2 := plot3d(0, x = -.5 .. .5, y = -.5 .. .5); -1; display(Surf2, ...
Surf2 := plot3d(`/`(`*`(x, `*`(y)), `*`(`+`(`*`(`^`(x, 2)), `*`(`^`(y, 2))))), x = -1 .. 1, y = -1 .. 1, style = patchnogrid); -1; Tang2 := plot3d(0, x = -.5 .. .5, y = -.5 .. .5); -1; display(Surf2, ...
 

Plot_2d