From 68535ae21275d61e3d4e4867c55713d5b5dc1e5e Mon Sep 17 00:00:00 2001 From: george Date: Tue, 3 Mar 2009 11:14:36 +0000 Subject: [PATCH] passes mexext to k_order and reads and unpacks data passed back git-svn-id: https://www.dynare.org/svn/dynare/trunk@2446 ac1d8469-bf42-47a9-8791-bf33cf982152 --- matlab/kordpert/dr1_k_order.m | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/matlab/kordpert/dr1_k_order.m b/matlab/kordpert/dr1_k_order.m index a4356321e..179bb1756 100644 --- a/matlab/kordpert/dr1_k_order.m +++ b/matlab/kordpert/dr1_k_order.m @@ -133,13 +133,14 @@ function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_) % z = z(iyr0) ; % oo_.dyn_ys=z; % extended ys try - [ysteady, gx, gu]=k_order_perturbation(dr,task,M_,options_, oo_ ); - load(M_.fname); - ghxu = eval([M_.fname '_g_1']); - sss= size(ghxu,2); - dr.ghx= ghxu(:,1:sss-M_.exo_nbr); - dr.ghu= ghxu(:,sss-M_.exo_nbr+1:end); - dr.ys=eval([M_.fname '_ss']); + [ysteady, ghx_u]=k_order_perturbation(dr,task,M_,options_, oo_ , ['.' mexext]); +% load(M_.fname); +% dr.ys=eval([M_.fname '_ss']); + dr.ys=ysteady; +% ghxu = eval([M_.fname '_g_1']); + sss= size(ghx_u,2); + dr.ghx= ghx_u(:,1:sss-M_.exo_nbr); + dr.ghu= ghx_u(:,sss-M_.exo_nbr+1:end); catch disp('*************************************************************************************'); % disp('Problem with using k_order perturbation solver - Using Dynare solver instead');