diff options
| author |  Thomas Capricelli <orzel@freehackers.org> | 2009-09-28 03:49:23 +0200 |
|---|---|---|
| committer | Thomas Capricelli <orzel@freehackers.org> | 2009-09-28 03:49:23 +0200 |
| commit | d9120345659fabbb14342cd2a4ced0e541d1076e (patch) | |
| tree | 58af25da342ea8434adb9216d169cdfd2f3571f4 /unsupported | |
| parent | d3850641a1077a26dab7b74890d21c078dc983d9 (diff) | |
fdjac2 is not needed anymore
Diffstat (limited to 'unsupported')
| -rw-r--r-- | unsupported/Eigen/NonLinear | 1 | ||||
| -rw-r--r-- | unsupported/Eigen/src/NonLinear/fdjac2.h | 35 |
2 files changed, 0 insertions, 36 deletions
diff --git a/unsupported/Eigen/NonLinear b/unsupported/Eigen/NonLinear index e98a907a5..334b6d65d 100644 --- a/unsupported/Eigen/NonLinear +++ b/unsupported/Eigen/NonLinear @@ -45,7 +45,6 @@ namespace Eigen { #include "src/NonLinear/r1mpyq.h" #include "src/NonLinear/rwupdt.h" #include "src/NonLinear/qrfac.h" -#include "src/NonLinear/fdjac2.h" #include "src/NonLinear/fdjac1.h" #include "src/NonLinear/qform.h" #include "src/NonLinear/lmpar.h" diff --git a/unsupported/Eigen/src/NonLinear/fdjac2.h b/unsupported/Eigen/src/NonLinear/fdjac2.h deleted file mode 100644 index cb360d84c..000000000 --- a/unsupported/Eigen/src/NonLinear/fdjac2.h +++ /dev/null @@ -1,35 +0,0 @@ - -template<typename FunctorType, typename Scalar> -int ei_fdjac2( - const FunctorType &Functor, - Matrix< Scalar, Dynamic, 1 > &x, - Matrix< Scalar, Dynamic, 1 > &fvec, - Matrix< Scalar, Dynamic, Dynamic > &fjac, - Scalar epsfcn) -{ - /* Local variables */ - Scalar h, temp; - int iflag; - - /* Function Body */ - const Scalar epsmch = epsilon<Scalar>(); - const int n = x.size(); - const Scalar eps = ei_sqrt((std::max(epsfcn,epsmch))); - Matrix< Scalar, Dynamic, 1 > wa(fvec.size()); - - for (int j = 0; j < n; ++j) { - temp = x[j]; - h = eps * ei_abs(temp); - if (h == 0.) { - h = eps; - } - x[j] = temp + h; - iflag = Functor(x, wa); - if (iflag < 0) - return iflag; - x[j] = temp; - fjac.col(j) = (wa-fvec)/h; - } - return iflag; -} - |