disp_model_summary

 function disp_model_summary(M)
     displays the model summary

 INPUTS
   M         [matlab structure] Definition of the model.           
   dr        [matlab structure] Decision rules

 Copyright (C) 2001-2010 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 disp_model_summary(M,dr)
0002 
0003 % function disp_model_summary(M)
0004 %     displays the model summary
0005 %
0006 % INPUTS
0007 %   M         [matlab structure] Definition of the model.
0008 %   dr        [matlab structure] Decision rules
0009 %
0010 % Copyright (C) 2001-2010 Dynare Team
0011 %
0012 % This file is part of Dynare.
0013 %
0014 % Dynare is free software: you can redistribute it and/or modify
0015 % it under the terms of the GNU General Public License as published by
0016 % the Free Software Foundation, either version 3 of the License, or
0017 % (at your option) any later version.
0018 %
0019 % Dynare is distributed in the hope that it will be useful,
0020 % but WITHOUT ANY WARRANTY; without even the implied warranty of
0021 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
0022 % GNU General Public License for more details.
0023 %
0024 % You should have received a copy of the GNU General Public License
0025 % along with Dynare.  If not, see <http://www.gnu.org/licenses/>.
0026 
0027 disp(' ')
0028 disp('MODEL SUMMARY')
0029 disp(' ')
0030 disp(['  Number of variables:         ' int2str(M.endo_nbr)])
0031 disp(['  Number of stochastic shocks: ' int2str(M.exo_nbr)])
0032 disp(['  Number of state variables:   ' ...
0033       int2str(length(find(dr.kstate(:,2) <= M.maximum_lag+1)))])
0034 disp(['  Number of jumpers:           ' ...
0035       int2str(length(find(dr.kstate(:,2) == M.maximum_lag+2)))])
0036 disp(['  Number of static variables:  ' int2str(dr.nstatic)])
0037 my_title='MATRIX OF COVARIANCE OF EXOGENOUS SHOCKS';
0038 labels = deblank(M.exo_names);
0039 headers = char('Variables',labels);
0040 lh = size(labels,2)+2;
0041 dyntable(my_title,headers,labels,M.Sigma_e,lh,10,6);
0042