Merge branch 'purely_backward' of git.dynare.org:JohannesPfeifer/dynare

Ref. !1951
2021-10-25 18:27:58 +02:00 · 2021-10-25 18:27:58 +02:00 · 23fdec40f1
parent 1921e3c9f1 17a58ccec6
commit 23fdec40f1
1 changed files with 5 additions and 1 deletions
--- a/matlab/stochastic_solvers.m
+++ b/matlab/stochastic_solvers.m
@ -216,7 +216,11 @@ if M_.maximum_endo_lead == 0
    % backward models: simplified code exist only at order == 1
    if local_order == 1
        [k1,~,k2] = find(kstate(:,4));
-        dr.state_var = k2;
+        if M_.maximum_endo_lag
+            dr.state_var = find(M_.lead_lag_incidence(1,:));
+        else
+            dr.state_var = [];
+        end
        dr.ghx(:,k1) = -b\jacobia_(:,k2);
        if M_.exo_nbr
            dr.ghu =  -b\jacobia_(:,nz+1:end);