Question: Making a procedure for saddlepoints

restart;

f:=(x,y)->x^4-3*x^2-2*y^3+3*y+0.5*x*y;

proc (x, y) options operator, arrow; x^4-3*x^2-2*y^3+3*y+.5*y*x end proc

(1)

 

Critical points: tangentline in x direction and y direction are  0  for some points on the surface  f(x,y)  

 

CriticalPoints:= [ solve( {diff(f(x,y),x)=0,diff(f(x,y),y)=0}, {x,y}) ];

[{x = 0.5935572277e-1, y = .7105957432}, {x = 1.191117672, y = .7741187286}, {x = 1.255942703, y = -.7776000848}, {x = -0.5877159444e-1, y = -.7036351094}, {x = -1.197482099, y = -.6326213916}, {x = -1.250162405, y = .6291421140}]

(2)

         

Seems that maple calculate 6 points on the surface with a default domain?

let me make a  3D plot of f  ( not specifying the domain values)

plot3d(f);

 

 

I calculated 6 critical points :how to show them in the plot? : i calculate the functionvalues for f
So now i do have x,y,z values for a 3D point
plot3D ({ f, points}) ?

?student

 

Some information to find in

• 

 Student[MultivariateCalculus]  ..link?

• 

Multivariate Calculus Study Guide

In order to make a procedure ( to make it general) out of the wanted calculated steps , i must first calculate these steps
List of wanted steps:

1. 

calculate (6 )critical points : i did

2. 

investigate of the found critical points :are there saddle points among them?
Show this in a table

3. 

show a critical point with 2 section lines in this critical point intersected in a plot

4. 

show these critical points in a plot

===========================================

How to make table out of this list.CriticalPoints. for easy reading.?

==========================================

CriticalPoints:= [ solve( {diff(f(x,y),x)=0,diff(f(x,y),y)=0}, {x,y}) ];

[{x = 0.5935572277e-1, y = .7105957432}, {x = 1.191117672, y = .7741187286}, {x = 1.255942703, y = -.7776000848}, {x = -0.5877159444e-1, y = -.7036351094}, {x = -1.197482099, y = -.6326213916}, {x = -1.250162405, y = .6291421140}]

(3)

 

Download zadelpunten_procedure.mw

Please Wait...