From 877cc55e78c8613f043390cee9cd8dd79f976a43 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?=
<stephane.adjemian@univ-lemans.fr>
Date: Mon, 9 Jul 2012 12:14:21 +0200
Subject: [PATCH] Fixed bug.
---
matlab/dr_block.m | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/matlab/dr_block.m b/matlab/dr_block.m
index 7bcdadedc6..44b95efcbd 100644
--- a/matlab/dr_block.m
+++ b/matlab/dr_block.m
@@ -413,15 +413,14 @@ for i = 1:Size;
index_0m = (n_static+1:n_static+n_pred) + indexi_0 - 1;
index_0p = (n_static+n_pred+1:n) + indexi_0 - 1;
index_m = 1:(n_pred+n_both);
- indexi_p = max(lead_lag_incidence(2,:))+1;
- index_p = indexi_p:size(jacob, 2);
+ index_p = lead_lag_incidence(3,find(lead_lag_incidence(3,:)));
nyf = n_fwrd + n_both;
A = aa(:,index_m); % Jacobain matrix for lagged endogeneous variables
B = aa(:,index_c); % Jacobian matrix for contemporaneous endogeneous variables
C = aa(:,index_p); % Jacobain matrix for led endogeneous variables
row_indx = n_static+1:n;
-
+
if task ~= 1 && options_.dr_cycle_reduction == 1
A1 = [aa(row_indx,index_m ) zeros(n_dynamic,n_fwrd)];
B1 = [aa(row_indx,index_0m) aa(row_indx,index_0p) ];
--
GitLab