Mercurial > hg > octave-nkf

comparison liboctave/DASRT-opts.in @ 15220:61822c866ba1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
use std::numeric_limits<T>::epsilon in C++ code * __contourc__.cc, __qp__.cc, quadcc.cc, qz.cc, eigs.cc, mex.cc, graphics.cc, CMatrix.cc, CollocWt.cc, DASPK-opts.in, DASRT-opts.in, DASSL-opts.in, LSODE-opts.in, Quad-opts.in, Range.cc, dMatrix.cc, eigs-base.cc, fCMatrix.cc, fMatrix.cc: Replace DBL_EPSILON and FLT_EPSILON with std::numeric_limits<T>::epsilon.
author John W. Eaton <jwe@octave.org>
date Thu, 23 Aug 2012 12:13:59 -0400
parents 72c96de7a403
children
comparison
equal deleted inserted replaced
15219:aeba1adfd76b 15220:61822c866ba1
30 END_DOC_ITEM 30 END_DOC_ITEM
31 TYPE = "Array<double>" 31 TYPE = "Array<double>"
32 SET_ARG_TYPE = "const $TYPE&" 32 SET_ARG_TYPE = "const $TYPE&"
33 INIT_BODY 33 INIT_BODY
34 $OPTVAR.resize (dim_vector (1, 1)); 34 $OPTVAR.resize (dim_vector (1, 1));
35 $OPTVAR(0) = ::sqrt (DBL_EPSILON); 35 $OPTVAR(0) = ::sqrt (std::numeric_limits<double>::epsilon ());
36 END_INIT_BODY 36 END_INIT_BODY
37 SET_CODE 37 SET_CODE
38 void set_$OPT (double val) 38 void set_$OPT (double val)
39 { 39 {
40 $OPTVAR.resize (dim_vector (1, 1)); 40 $OPTVAR.resize (dim_vector (1, 1));
41 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (DBL_EPSILON); 41 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (std::numeric_limits<double>::epsilon ());
42 reset = true; 42 reset = true;
43 } 43 }
44 44
45 void set_$OPT (const $TYPE& val) 45 void set_$OPT (const $TYPE& val)
46 { $OPTVAR = val; reset = true; } 46 { $OPTVAR = val; reset = true; }
66 END_DOC_ITEM 66 END_DOC_ITEM
67 TYPE = "Array<double>" 67 TYPE = "Array<double>"
68 SET_ARG_TYPE = "const $TYPE&" 68 SET_ARG_TYPE = "const $TYPE&"
69 INIT_BODY 69 INIT_BODY
70 $OPTVAR.resize (dim_vector (1, 1)); 70 $OPTVAR.resize (dim_vector (1, 1));
71 $OPTVAR(0) = ::sqrt (DBL_EPSILON); 71 $OPTVAR(0) = ::sqrt (std::numeric_limits<double>::epsilon ());
72 END_INIT_BODY 72 END_INIT_BODY
73 SET_CODE 73 SET_CODE
74 void set_$OPT (double val) 74 void set_$OPT (double val)
75 { 75 {
76 $OPTVAR.resize (dim_vector (1, 1)); 76 $OPTVAR.resize (dim_vector (1, 1));
77 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (DBL_EPSILON); 77 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (std::numeric_limits<double>::epsilon ());
78 reset = true; 78 reset = true;
79 } 79 }
80 80
81 void set_$OPT (const $TYPE& val) 81 void set_$OPT (const $TYPE& val)
82 { $OPTVAR = val; reset = true; } 82 { $OPTVAR = val; reset = true; }