home *** CD-ROM | disk | FTP | other *** search
-
- (*********************************************************************
-
- Adapted from
- Roman E. Maeder: Programming in Mathematica,
- Second Edition, Addison-Wesley, 1991.
-
- *********************************************************************)
-
-
- N[f[x_], prec_:$MachinePrecision] := Nf[x, prec]
-
- Nf[x_, prec_:$MachinePrecision] := {x, prec} (* numerical code goes here *)
-