From 0b1416872bc477efe015c60f6b303adf20210c5b Mon Sep 17 00:00:00 2001
From: michel <michel@ac1d8469-bf42-47a9-8791-bf33cf982152>
Date: Thu, 13 Oct 2005 20:21:14 +0000
Subject: [PATCH] v4, dynare_estimation.m: moved optimset instructions and set
 MH file size to 1e6

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@496 ac1d8469-bf42-47a9-8791-bf33cf982152
---
 matlab/dynare_estimation.m | 20 +++++++++++++-------
 1 file changed, 13 insertions(+), 7 deletions(-)

diff --git a/matlab/dynare_estimation.m b/matlab/dynare_estimation.m
index d62c81c15..464453c8c 100644
--- a/matlab/dynare_estimation.m
+++ b/matlab/dynare_estimation.m
@@ -54,19 +54,13 @@ options_ = set_default_option(options_,'filtered_vars',0);
 options_ = set_default_option(options_,'kalman_algo',1);
 options_ = set_default_option(options_,'kalman_tol',10^(-12));
 options_ = set_default_option(options_,'posterior_mode_estimation',1);
-options_ = set_default_option(options_,'MaxNumberOfBytes',10000);
+options_ = set_default_option(options_,'MaxNumberOfBytes',1e6);
 
 %% Add something to the parser ++>
 M_.dname = M_.fname; % The user should be able to choose another name
                      % for the directory...
 
 
-optim_options = optimset('display','iter','LargeScale','off', ...
-			 'MaxFunEvals',100000,'TolFun',1e-8,'TolX',1e-6);
-if isfield(options_,'optim_opt')
-	eval(['optim_options = optimset(optim_options,' options_.optim_opt ');']);
-end
-
 pnames 		= ['     ';'beta ';'gamm ';'norm ';'invg ';'unif ';'invg2'];
 n_varobs 	= size(options_.varobs,1);
 
@@ -226,6 +220,12 @@ initial_estimation_checks(xparam1,gend,data);
 if options_.mode_compute > 0 & options_.posterior_mode_estimation
   fh=str2func('DsgeLikelihood');
   if options_.mode_compute == 1  
+    optim_options = optimset('display','iter','LargeScale','off', ...
+			     'MaxFunEvals',100000,'TolFun',1e-8,'TolX',1e-6);
+    if isfield(options_,'optim_opt')
+      eval(['optim_options = optimset(optim_options,' options_.optim_opt ');']);
+    end
+
     [xparam1,fval,exitflag,output,lamdba,grad,hessian_fmincon] = ...
 	fmincon(fh,xparam1,[],[],[],[],lb,ub,[],optim_options,gend,data);
   elseif options_.mode_compute == 2
@@ -234,6 +234,12 @@ if options_.mode_compute > 0 & options_.posterior_mode_estimation
 	asamin('minimize','DsgeLikelihood',xparam1,lb,ub,- ...
 	       ones(size(xparam1)),gend,data);   
   elseif options_.mode_compute == 3
+    optim_options = optimset('display','iter',...
+			     'MaxFunEvals',100000,'TolFun',1e-8,'TolX',1e-6);
+    if isfield(options_,'optim_opt')
+      eval(['optim_options = optimset(optim_options,' options_.optim_opt ');']);
+    end
+
     [xparam1,fval,exitflag] = fminunc(fh,xparam1,optim_options,gend, ...
 				      data);
   elseif options_.mode_compute == 4