Mercurial > hg > octave-avbm

diff liboctave/DASSL.h @ 3945:b050da7f9994

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-05-20 19:40:07 by jwe]
author jwe
date Mon, 20 May 2002 19:40:07 +0000 (2002-05-20)
parents cdfbc6678c23
children 53b4eab68976
line wrap: on
line diff
--- a/liboctave/DASSL.h
+++ b/liboctave/DASSL.h
@@ -53,11 +53,12 @@
 
   void init (void)
     {
-      x_absolute_tolerance = sqrt (DBL_EPSILON);
+      double sqrt_eps = ::sqrt (DBL_EPSILON);
+      x_absolute_tolerance = sqrt_eps;
       x_initial_step_size = -1.0;
       x_maximum_step_size = -1.0;
       x_minimum_step_size = 0.0;
-      x_relative_tolerance = sqrt (DBL_EPSILON);
+      x_relative_tolerance = sqrt_eps;
     }
 
   void copy (const DASSL_options& opt)