79 lines
2.5 KiB
Matlab
79 lines
2.5 KiB
Matlab
function [lhs, rhs, linenum] = getEquationsByTags(jsonmodel, varargin)
|
|
%function [lhs, rhs] = getEquationByTag(jsonmodel, varargin)
|
|
% Return the lhs, rhs of an equation and the line it was defined
|
|
% on given its tag
|
|
%
|
|
% INPUTS
|
|
% jsonmodel [string] JSON representation of model block
|
|
% varargin [string or cellstring arrays] tagname and tagvalue for
|
|
% eqs to get
|
|
%
|
|
% OUTPUTS
|
|
% lhs: [cellstring array] left hand side of eq
|
|
% rhs: [cellstring array] right hand side of eq
|
|
% linenum: [cellstring array] eq line in .mod file
|
|
%
|
|
% SPECIAL REQUIREMENTS
|
|
% none
|
|
|
|
% Copyright (C) 2017 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/>.
|
|
|
|
assert(nargin == 1 || nargin == 3, 'Incorrect number of arguments passed to getEquationsByTags');
|
|
|
|
if nargin == 1
|
|
lhs = cell(1, length(jsonmodel));
|
|
rhs = cell(1, length(jsonmodel));
|
|
linenum = cell(1, length(jsonmodel));
|
|
for i=1:length(jsonmodel)
|
|
lhs{i} = jsonmodel{i}.lhs;
|
|
rhs{i} = jsonmodel{i}.rhs;
|
|
linenum{i} = jsonmodel{i}.line;
|
|
end
|
|
return
|
|
end
|
|
|
|
tagname = varargin{1};
|
|
tagvalue = varargin{2};
|
|
|
|
assert(ischar(tagname), 'Tag name must be a string');
|
|
assert(ischar(tagvalue) || iscell(tagvalue), 'Tag value must be a string or a cell string array');
|
|
|
|
if ischar(tagvalue)
|
|
tagvalue = {tagvalue};
|
|
end
|
|
|
|
lhs = cell(1, length(tagvalue));
|
|
rhs = cell(1, length(tagvalue));
|
|
linenum = cell(1, length(tagvalue));
|
|
|
|
for i=1:length(jsonmodel)
|
|
for j = 1:length(tagvalue)
|
|
if isfield(jsonmodel{i}, 'tags') && ...
|
|
isfield(jsonmodel{i}.tags, tagname) && ...
|
|
strcmp(jsonmodel{i}.tags.(tagname), tagvalue{j})
|
|
lhs{j} = jsonmodel{i}.lhs;
|
|
rhs{j} = jsonmodel{i}.rhs;
|
|
linenum{j} = jsonmodel{i}.line;
|
|
if ~any(cellfun(@isempty, lhs))
|
|
return
|
|
end
|
|
break
|
|
end
|
|
end
|
|
end
|
|
end |