1function [sR,sG] = restricted_steadystate(y,x,indx) 2 3% Copyright (C) 2006-2009 Dynare Team 4% 5% This file is part of Dynare. 6% 7% Dynare is free software: you can redistribute it and/or modify 8% it under the terms of the GNU General Public License as published by 9% the Free Software Foundation, either version 3 of the License, or 10% (at your option) any later version. 11% 12% Dynare is distributed in the hope that it will be useful, 13% but WITHOUT ANY WARRANTY; without even the implied warranty of 14% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15% GNU General Public License for more details. 16% 17% You should have received a copy of the GNU General Public License 18% along with Dynare. If not, see <http://www.gnu.org/licenses/>. 19 20global options_ M_ oo_ 21 22inde = options_.steadystate_partial.sseqn; 23 24ss = oo_.steady_state; 25 26ss(indx) = y; 27 28eval(['[R,G] = ' M_.fname '.static(ss, x, M_.params);']); 29 30sR = R(inde); 31sG = G(inde,indx);