ex09_solutions

Here is the implementation of the Δ function, illustrating the handyness of the Module command.

In[34]:=

$Delta[e_] := Module[{}, Clear[y, r] ; yhtalo = y''[r] - (-2/r - e) y[r] == 0 ... and tells Mathematica NOT to evaluate the function before it has a numerical argument *)$

$General :: spell1 : Possible spelling error: new symbol name \"dyal\" is similar to existing symbol \"yal\". More…$

$General :: spell1 : Possible spelling error: new symbol name \"dylo\" is similar to existing symbol \"ylo\". More…$

$General :: spell1 : Possible spelling error: new symbol name \"alku\" is similar to existing symbol \"ralku\". More…$

[Graphics:../HTMLFiles/ex09_solutions_125.gif]

Out[36]=

Out[37]=

Created by Mathematica (April 10, 2007)