filters/@ekf/display.m

   1 function display(obj)\r
   2 % No documentation available\r
   3 \r
   4 % Toolbox for nonlinear filtering.\r
   5 % Copyright (C) 2005  Jakob Rosén <jakob.rosen@gmail.com>\r
   6 %\r
   7 % This program is free software; you can redistribute it and/or\r
   8 % modify it under the terms of the GNU General Public License\r
   9 % as published by the Free Software Foundation; either version 2\r
  10 % of the License, or (at your option) any later version.\r
  11 %\r
  12 % This program is distributed in the hope that it will be useful,\r
  13 % but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  14 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  15 % GNU General Public License for more details.\r
  16 %\r
  17 % You should have received a copy of the GNU General Public License\r
  18 % along with this program; if not, write to the Free Software\r
  19 % Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.\r
  20 \r
  21 disp(' ');\r
  22 disp([inputname(1),' = '])\r
  23 disp(' ');\r
  24 \r
  25 if isempty(obj.model)\r
  26         disp('Empty EKF object');\r
  27 else\r
  28         disp('Extended Kalman Filter (EKF) object');\r
  29         disp('-----------------------------------');\r
  30         disp(' ');\r
  31         disp(['t = ',num2str(obj.t)]);\r
  32         disp(['assigned model: ',get(obj.model,'description')]);\r
  33         disp(['Simulation length: ', num2str(size(obj.xhat,2))]);\r
  34         disp(['History length: ',num2str(size(obj.xhat_history,2))]);\r
  35         if obj.historysize<0\r
  36                 hstr='Unlimited';\r
  37         else\r
  38                 hstr=num2str(obj.historysize);\r
  39         end;\r
  40         disp(['History size: ',hstr]);\r
  41         disp(' ');\r
  42 end