minor bug fix
git-svn-id: https://www.dynare.org/svn/dynare/trunk@2977 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
531021acef
commit
3f09d91873
|
@ -22,7 +22,8 @@ function [McoH, McoJ, PcoH, PcoJ, condH, condJ, eH, eJ, ind01, ind02, indnoH, in
|
||||||
|
|
||||||
% 1. check rank of H at theta
|
% 1. check rank of H at theta
|
||||||
npar = size(H,2);
|
npar = size(H,2);
|
||||||
indno = {};
|
indnoH = {};
|
||||||
|
indnoJ = {};
|
||||||
ind1 = find(vnorm(H)~=0);
|
ind1 = find(vnorm(H)~=0);
|
||||||
H1 = H(:,ind1);
|
H1 = H(:,ind1);
|
||||||
[e1,e2] = eig(H1'*H1);
|
[e1,e2] = eig(H1'*H1);
|
||||||
|
|
Loading…
Reference in New Issue