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);