1function discount_factor=get_optimal_policy_discount_factor(params,param_names) 2 3%function discount_factor=get_optimal_policy_discount_factor(M) 4% get the value of Ramsey policy discount factor 5% 6% INPUTS 7% params: (vector) value of parameters 8% param_names: (char array) list of parameter names 9% 10% OUTPUTS 11% discount_factor (double) discount factor 12% 13% SPECIAL REQUIREMENTS 14% none 15 16% Copyright (C) 2007-2018 Dynare Team 17% 18% This file is part of Dynare. 19% 20% Dynare is free software: you can redistribute it and/or modify 21% it under the terms of the GNU General Public License as published by 22% the Free Software Foundation, either version 3 of the License, or 23% (at your option) any later version. 24% 25% Dynare is distributed in the hope that it will be useful, 26% but WITHOUT ANY WARRANTY; without even the implied warranty of 27% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 28% GNU General Public License for more details. 29% 30% You should have received a copy of the GNU General Public License 31% along with Dynare. If not, see <http://www.gnu.org/licenses/>. 32 33discount_factor = params(find(strcmp('optimal_policy_discount_factor', param_names))); 34