Fixes for models without parameters or exogenous variables.
parent
1a55cd7945
commit
d7042b8e80
|
@ -27,6 +27,11 @@ warning off MATLAB:subscripting:noSubscriptsSpecified
|
||||||
% Get parameters.
|
% Get parameters.
|
||||||
for i=1:length(varargin)
|
for i=1:length(varargin)
|
||||||
fid = fopen(sprintf('%s/parameters.inc', varargin{i}));
|
fid = fopen(sprintf('%s/parameters.inc', varargin{i}));
|
||||||
|
if fid<0
|
||||||
|
% No parameters in the cherrypicked (sub)model, go to the
|
||||||
|
% next cherrypicked model.
|
||||||
|
continue
|
||||||
|
end
|
||||||
statement = fgetl(fid);
|
statement = fgetl(fid);
|
||||||
if exist('plist', 'var')
|
if exist('plist', 'var')
|
||||||
plist = union(plist, strsplit(statement, {'parameters', ' ', ';'}));
|
plist = union(plist, strsplit(statement, {'parameters', ' ', ';'}));
|
||||||
|
@ -91,6 +96,11 @@ xlist = cell(MAX_NUMBER_OF_ELEMENTS, 2);
|
||||||
xnum = 0;
|
xnum = 0;
|
||||||
for i=1:length(varargin)
|
for i=1:length(varargin)
|
||||||
fid = fopen(sprintf('%s/exogenous.inc', varargin{i}));
|
fid = fopen(sprintf('%s/exogenous.inc', varargin{i}));
|
||||||
|
if fid<0
|
||||||
|
% No exogenous variables in the cherrypicked (sub)model, go to the
|
||||||
|
% next cherrypicked model.
|
||||||
|
continue
|
||||||
|
end
|
||||||
cline = fgetl(fid);
|
cline = fgetl(fid);
|
||||||
while ischar(cline)
|
while ischar(cline)
|
||||||
if ~isequal(cline, 'varexo')
|
if ~isequal(cline, 'varexo')
|
||||||
|
@ -111,6 +121,11 @@ xlist = xlist(1:xnum,:);
|
||||||
calibration = '';
|
calibration = '';
|
||||||
for i=1:length(varargin)
|
for i=1:length(varargin)
|
||||||
fid = fopen(sprintf('%s/parameter-values.inc', varargin{i}));
|
fid = fopen(sprintf('%s/parameter-values.inc', varargin{i}));
|
||||||
|
if fid<0
|
||||||
|
% No calibrations in the cherrypicked (sub)model, go to the
|
||||||
|
% next cherrypicked model.
|
||||||
|
continue
|
||||||
|
end
|
||||||
cline = fgetl(fid);
|
cline = fgetl(fid);
|
||||||
while ischar(cline)
|
while ischar(cline)
|
||||||
calibration = sprintf('%s\n%s', calibration, cline);
|
calibration = sprintf('%s\n%s', calibration, cline);
|
||||||
|
|
Loading…
Reference in New Issue