changeset 9444:e8b75df0bf70 octave-forge

control-devel: work on iddata class (5)
author paramaniac
date Wed, 15 Feb 2012 21:15:20 +0000
parents 33c370bd7451
children 675c4333424b
files extra/control-devel/inst/@iddata/display.m
diffstat 1 files changed, 13 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-devel/inst/@iddata/display.m	Wed Feb 15 19:45:53 2012 +0000
+++ b/extra/control-devel/inst/@iddata/display.m	Wed Feb 15 21:15:20 2012 +0000
@@ -30,9 +30,19 @@
   [exname, e] = __labels__ (dat.exname, "exp");
   
   [n, p, m, e] = size (dat);
+  
+  str = ["Time domain dataset '", datname, "' containing ", num2str(e), " experiment"];
+  if (e > 1)
+    str = [str, "s"];
+  endif
 
   disp ("");
-  disp (["Time domain data set '", datname, "' containing ", num2str(e), " experiments"]);
-
-
+  disp (str);
+%{
+  str = strvcat (exname)
+  space = (repmat ("  ", e, 1))
+  %str = [space, exname]
+  class (space)
+  class (str)
+%}
 endfunction