fixed log_variable function

time-shift
Michel Juillard 2016-05-05 20:53:22 +02:00
parent 034bd0367b
commit ef232ac436
2 changed files with 36 additions and 1 deletions

View File

@ -0,0 +1,35 @@
function k = get_all_variables_but_lagged_leaded_exogenous(M)
% returns indices of all endogenous variables in declaration order except
% lagged and leaded exogenous
%
% INPUT
% M: model structure
%
% OUTPUT
% k: vector of variable indices
%
% Copyright (C) 2011-2016 Dynare Team
%
% This file is part of Dynare.
%
% Dynare is free software: you can redistribute it and/or modify
% it under the terms of the GNU General Public License as published by
% the Free Software Foundation, either version 3 of the License, or
% (at your option) any later version.
%
% Dynare is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
% GNU General Public License for more details.
%
% You should have received a copy of the GNU General Public License
% along with Dynare. If not, see <http://www.gnu.org/licenses/>.
if isempty(M.aux_vars)
k = 1:M.endo_nbr;
else
type = [M.aux_vars.type];
k = [1:M.orig_endo_nbr; M.orig_endo_nbr+find((type ~= 2) & ...
(type ~= 3))'];
end

View File

@ -33,7 +33,7 @@ orig_endo_nbr = M.orig_endo_nbr;
aux_vars = M.aux_vars;
y = zeros(length(ivar),1);
for i = ivar(:)'
for i = 1:length(ivar)
% Does ivar(i) refer to a lag/lead exogenous variable?
if ivar(i) > orig_endo_nbr
av = aux_vars(ivar(i) - orig_endo_nbr);