initialisation of eigenvalue and st. state stocks

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@938 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
ratto 2006-09-28 08:30:32 +00:00
parent 7d39d1d273
commit aef29f9c51
1 changed files with 7 additions and 0 deletions

View File

@ -101,6 +101,11 @@ if fload==0 | nargin<2 | isempty(fload),
T=zeros(size(dr_.ghx,1),size(dr_.ghx,2)+size(dr_.ghu,2),Nsam/2);
end
if isfield(dr_,'ghx'),
egg=zeros(length(dr_.eigval),Nsam);
end
yys=zeros(length(dr_.ys),Nsam);
if estim_params_.np<52 & ilptau,
[lpmat] = lptauSEQ(Nsam,estim_params_.np);
@ -206,7 +211,9 @@ if fload==0 | nargin<2 | isempty(fload),
end
end
else
if exist('egg'),
egg(:,j)=ones(size(egg,1),1).*1.1;
end
iwrong(j)=j;
end
end