From edb717c1c9b9b65155168b2c8fca4f9200dba766 Mon Sep 17 00:00:00 2001 From: michel Date: Sun, 22 Nov 2009 16:51:36 +0000 Subject: [PATCH] 4.1: factoring the code for Model Summary git-svn-id: https://www.dynare.org/svn/dynare/trunk@3161 ac1d8469-bf42-47a9-8791-bf33cf982152 --- matlab/disp_model_summary.m | 42 +++++++++++++++++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 matlab/disp_model_summary.m diff --git a/matlab/disp_model_summary.m b/matlab/disp_model_summary.m new file mode 100644 index 000000000..b09c3adc4 --- /dev/null +++ b/matlab/disp_model_summary.m @@ -0,0 +1,42 @@ +function disp_model_summary(M,dr) + +% 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-2009 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 . + + disp(' ') + disp('MODEL SUMMARY') + disp(' ') + disp([' Number of variables: ' int2str(M.endo_nbr)]) + disp([' Number of stochastic shocks: ' int2str(M.exo_nbr)]) + disp([' Number of state variables: ' ... + int2str(length(find(dr.kstate(:,2) <= M.maximum_lag+1)))]) + disp([' Number of jumpers: ' ... + int2str(length(find(dr.kstate(:,2) == M.maximum_lag+2)))]) + disp([' Number of static variables: ' int2str(dr.nstatic)]) + my_title='MATRIX OF COVARIANCE OF EXOGENOUS SHOCKS'; + labels = deblank(M.exo_names); + headers = strvcat('Variables',labels); + lh = size(labels,2)+2; + dyntable(my_title,headers,labels,M.Sigma_e,lh,10,6); +