check_list_of_variables.m

function varlist = check_list_of_variables(options_, M_, varlist)
% This function defines, if necessary, the list of endogenous variables
% for which the posterior statistics have to be computed.
%
%
% INPUTS
%
%   options_        [structure]                 Dynare structure.
%   M_              [structure]                 Dynare structure (related to model definition).
%   varlist         [cell of char arrays]       Array of strings with name of the endogenous variables.
%
% OUTPUTS
%   varlist         [cell of char arrays]
%
% SPECIAL REQUIREMENTS

% Copyright © 2003-2018 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 <https://www.gnu.org/licenses/>.

% Get uniques
[~, ~, index_uniques] = varlist_indices(varlist, M_.endo_names);
varlist = varlist(index_uniques);

msg = false;
if options_.dsge_var && options_.bayesian_irf
    if ~isempty(varlist)
        for i=1:size(varlist,1)
            idx = strmatch(varlist{i}, options_.varobs, 'exact');
            if isempty(idx)
                dprintf('%s is not an observed variable!', varlist{i})
                msg = true;
            end
        end
        if ~isequal(size(varlist), length(options_.varobs))
            msg = true;
        end
        if msg
            skipline()
            disp('Posterior IRFs will be computed for all observed variables.')
            skipline()
        end
    end
    varlist = options_.varobs;
    return
end

if ~isempty(varlist) && ~isempty(options_.endo_vars_for_moment_computations_in_estimation)
    error('You cannot use the consider_all_endogenous, consider_all_endogenous_and_auxiliary or consider_all_observed options when listing variables after the estimation command')
elseif isempty(varlist) && ~isempty(options_.endo_vars_for_moment_computations_in_estimation)
    if strcmp(options_.endo_vars_for_moment_computations_in_estimation,'all_endogenous_variables')
        varlist = M_.endo_names(1:M_.orig_endo_nbr);
    elseif strcmp(options_.endo_vars_for_moment_computations_in_estimation,'all_endogenous_and_auxiliary_variables')
        varlist = M_.endo_names;
    elseif strcmp(options_.endo_vars_for_moment_computations_in_estimation,'only_observed_variables')
        varlist = options_.varobs;
    else