>

> alias(CESolve=solve);

CESolve

>

> Ans1 := exp(-x^2-y^2); # exp(-x^2-y^2)

Ans1 := exp(-x^2-y^2)

> Ans2 := 5*exp(-x^2-y^2); # 5*exp(-x^2-y^2)

Ans2 := 5*exp(-x^2-y^2)

> Ans3 := diff(Ans2,x); # diff(Ans2,x)

Ans3 := -10*x*exp(-x^2-y^2)

> Ans4 := CESolve({Ans3 = 0},{x}); # CESolve({Ans3 = 0},{x})

Ans4 := {x = 0}

> Ans5 := diff(Ans3,x); # diff(Ans3,x)

Ans5 := -10*exp(-x^2-y^2)+20*x^2*exp(-x^2-y^2)

> Ans6 := CESolve({Ans5 = 0},{x}); # CESolve({Ans5 = 0},{x})

Ans6 := {x = 1/2*sqrt(2)}, {x = -1/2*sqrt(2)}

> Ans7 := CESolve({Ans5 = 0},{y}); # CESolve({Ans5 = 0},{y})

Ans7 := NULL

> Ans8 := eval(Ans2,y = 0); # eval(Ans2,y = 0)

Ans8 := 5*exp(-x^2)

> Ans9 := diff(Ans8,x); # diff(Ans8,x)

Ans9 := -10*x*exp(-x^2)

> Ans10 := diff(Ans9,x); # diff(Ans9,x)

Ans10 := -10*exp(-x^2)+20*x^2*exp(-x^2)

> Ans11 := CESolve({Ans10 = 0},{x}); # CESolve({Ans10 = 0},{x})

Ans11 := {x = 1/2*sqrt(2)}, {x = -1/2*sqrt(2)}

>