v4 dr1.m: bug correction to kron unrolling

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@1144 ac1d8469-bf42-47a9-8791-bf33cf982152
2007-01-08 11:00:02 +00:00 · 2007-01-08 11:00:02 +00:00 · 7417d18014
parent de3460760f
commit 7417d18014
1 changed files with 1 additions and 1 deletions
--- a/matlab/dr1.m
+++ b/matlab/dr1.m
@ -495,7 +495,7 @@ if nrhu1*nrhu1*nchu1*nchu1 > 1e7
 else
  B1 = B*dr.ghxx*kron(hu1,hu1);
 end
-rhs = -[rhs; zeros(n-M_.endo_nbr,size(rhs,2))]-B*dr.ghxx*kron(hu1,hu1);
+rhs = -[rhs; zeros(n-M_.endo_nbr,size(rhs,2))]-B1;

 %lhs
 dr.ghuu = A\rhs;