From 13a67737de6371d4ac7008b8a19695d40847c27f Mon Sep 17 00:00:00 2001
From: michel <michel@ac1d8469-bf42-47a9-8791-bf33cf982152>
Date: Sun, 12 Feb 2006 07:56:03 +0000
Subject: [PATCH] v4 dynare_solve: added jacobian_flag for the case where we
 want numerical derivatives (unfinished)

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v3@621 ac1d8469-bf42-47a9-8791-bf33cf982152
---
 matlab/dynare_solve.m | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/matlab/dynare_solve.m b/matlab/dynare_solve.m
index 1c77442182..4d36ed4409 100644
--- a/matlab/dynare_solve.m
+++ b/matlab/dynare_solve.m
@@ -3,6 +3,10 @@
 function [x,check] = dynare_solve(func,x,varargin)
   global gstep_ options_ debug_
   
+
+% unfinished
+  jacobian_flag = 0;   
+
   options_ = set_default_option(options_,'solve_algo',2);
   check = 0;
   func = str2func(func);
@@ -26,7 +30,7 @@ function [x,check] = dynare_solve(func,x,varargin)
 
   if options_.solve_algo == 1
     nn = size(x,1) ;
-    [x,check]=solve1(func,x,1:nn,1:nn,varargin{:});
+    [x,check]=solve1(func,x,1:nn,1:nn,jacobian_flag,varargin{:});
   elseif options_.solve_algo == 2
     nn = size(x,1) ;
     %    tolf = eps^(2/3) ;
@@ -82,4 +86,4 @@ function [x,check] = dynare_solve(func,x,varargin)
 
   % 08/28/03 MJ add a final call to solve1 for solve_algo == 1 in case
   %             initvals generates 'false' zeros in the Jacobian
-  
\ No newline at end of file
+  
-- 
GitLab