Copyright (C) 2007-2011 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/>.
0001 function info = discretionary_policy(var_list) 0002 0003 % Copyright (C) 2007-2011 Dynare Team 0004 % 0005 % This file is part of Dynare. 0006 % 0007 % Dynare is free software: you can redistribute it and/or modify 0008 % it under the terms of the GNU General Public License as published by 0009 % the Free Software Foundation, either version 3 of the License, or 0010 % (at your option) any later version. 0011 % 0012 % Dynare is distributed in the hope that it will be useful, 0013 % but WITHOUT ANY WARRANTY; without even the implied warranty of 0014 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 0015 % GNU General Public License for more details. 0016 % 0017 % You should have received a copy of the GNU General Public License 0018 % along with Dynare. If not, see <http://www.gnu.org/licenses/>. 0019 0020 global options_ oo_ M_ 0021 0022 options_.discretionary_policy = 1; 0023 oldoptions = options_; 0024 options_.order = 1; 0025 info = stoch_simul(var_list); 0026 0027 if options_.noprint == 0 0028 disp_steady_state(M_,oo_) 0029 for i=M_.orig_endo_nbr:M_.endo_nbr 0030 if strmatch('mult_',M_.endo_names(i,:)) 0031 disp(sprintf('%s \t\t %g',M_.endo_names(i,:), ... 0032 oo_.dr.ys(i))); 0033 end 0034 end 0035 end 0036 0037 0038 %oo_ = evaluate_planner_objective(oo_.dr,M_,oo_,options_); 0039 0040 options_ = oldoptions;