From 24726573554265fa0301a4c13fdbb0247d94452b Mon Sep 17 00:00:00 2001
From: michel <michel@ac1d8469-bf42-47a9-8791-bf33cf982152>
Date: Fri, 13 Jan 2006 15:50:32 +0000
Subject: [PATCH] v4 dr.1: corrected fu bug in backward models

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@595 ac1d8469-bf42-47a9-8791-bf33cf982152
---
 matlab/dr1.m | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/matlab/dr1.m b/matlab/dr1.m
index 3fda447bc..56e98f509 100644
--- a/matlab/dr1.m
+++ b/matlab/dr1.m
@@ -133,6 +133,7 @@ npred = dr.npred;
 nboth = dr.nboth;
 order_var = dr.order_var;
 nd = size(kstate,1);
+nz = nnz(M_.lead_lag_incidence);
 
 sdyn = M_.endo_nbr - nstatic;
 
@@ -150,7 +151,7 @@ if M_.maximum_lead == 0;  % backward models
     m = m+length(k);
   end
   if M_.exo_nbr
-    dr.ghu = -b\fu;
+    dr.ghu = -b\jacobia_(:,nz+1:end);
   end
   dr.eigval = eig(transition_matrix(dr));
   dr.rank = 0;
@@ -176,7 +177,6 @@ b = aa(:,k0);
 b10 = b(1:nstatic,1:nstatic);
 b11 = b(1:nstatic,nstatic+1:end);
 b2 = b(nstatic+1:end,nstatic+1:end);
-nz = nnz(M_.lead_lag_incidence);
 if any(isinf(a(:)))
   info = 1;
   return