Do not enter in the last loop if aux_lead_nbr=0 (no auxiliary variables for leads).

time-shift
Stéphane Adjemian (Gpm 2011-05-03 15:34:32 +02:00 committed by Stéphane Adjemian (Scylla)
parent b5634d8e37
commit b5bf0f5dbe
1 changed files with 17 additions and 15 deletions

View File

@ -31,20 +31,22 @@ for i=1:n
k = k+1;
end
for i=1:aux_lead_nbr+1;
if byte_code
[info, res] = bytecode('static','evaluate',ys1,...
[exo_steady_state; ...
exo_det_steady_state],params);
else
res = feval([fname '_static'],ys1,...
[exo_steady_state; ...
exo_det_steady_state],params);
end;
for j=1:n
if aux_vars(j).type == 0
el = aux_vars(j).endo_index;
ys1(el) = ys1(el)-res(el);
if aux_lead_nbr
for i=1:aux_lead_nbr+1;
if byte_code
[info, res] = bytecode('static','evaluate',ys1,...
[exo_steady_state; ...
exo_det_steady_state],params);
else
res = feval([fname '_static'],ys1,...
[exo_steady_state; ...
exo_det_steady_state],params);
end;
for j=1:n
if aux_vars(j).type == 0
el = aux_vars(j).endo_index;
ys1(el) = ys1(el)-res(el);
end
end
end
end
end