[Octave-cvsupdate] SF.net SVN: octave:[7720] trunk/octave-forge/main/control/inst

[<par...@us...>]

Revision: 7720
          http://octave.svn.sourceforge.net/octave/?rev=7720&view=rev
Author:   paramaniac
Date:     2010-09-14 19:52:29 +0000 (Tue, 14 Sep 2010)

Log Message:
-----------
control: add TODOs

Modified Paths:
--------------
    trunk/octave-forge/main/control/inst/@lti/isstable.m
    trunk/octave-forge/main/control/inst/@lti/size.m
    trunk/octave-forge/main/control/inst/@lti/tfdata.m
    trunk/octave-forge/main/control/inst/@tf/__get__.m
    trunk/octave-forge/main/control/inst/__conv2tfpolycell__.m
    trunk/octave-forge/main/control/inst/bode.m
    trunk/octave-forge/main/control/inst/bodemag.m
    trunk/octave-forge/main/control/inst/impulse.m
    trunk/octave-forge/main/control/inst/initial.m
    trunk/octave-forge/main/control/inst/lsim.m
    trunk/octave-forge/main/control/inst/margin.m
    trunk/octave-forge/main/control/inst/nichols.m
    trunk/octave-forge/main/control/inst/nyquist.m
    trunk/octave-forge/main/control/inst/pzmap.m
    trunk/octave-forge/main/control/inst/rlocus.m
    trunk/octave-forge/main/control/inst/sigma.m
    trunk/octave-forge/main/control/inst/step.m

Modified: trunk/octave-forge/main/control/inst/@lti/isstable.m
===================================================================
--- trunk/octave-forge/main/control/inst/@lti/isstable.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/@lti/isstable.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -27,7 +27,7 @@
 
 function bool = isstable (sys, tol = 0)
 
-  if (nargin == 0 || nargin > 2)
+  if (nargin > 2)
     print_usage ();
   endif
 

Modified: trunk/octave-forge/main/control/inst/@lti/size.m
===================================================================
--- trunk/octave-forge/main/control/inst/@lti/size.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/@lti/size.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -28,7 +28,7 @@
 
 function [n, varargout] = size (ltisys, idx = 0)
 
-  if (nargin != 1 && nargin != 2)
+  if (nargin > 2)
     print_usage ();
   endif
 

Modified: trunk/octave-forge/main/control/inst/@lti/tfdata.m
===================================================================
--- trunk/octave-forge/main/control/inst/@lti/tfdata.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/@lti/tfdata.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -38,8 +38,8 @@
   tsam = sys.tsam;
 
   if (rtype == "vector")
-    num = cellfun ("@tfpoly/get", num, "UniformOutput", false);
-    den = cellfun ("@tfpoly/get", den, "UniformOutput", false);
+    num = cellfun ("@tfpoly/get", num, "uniformoutput", false);
+    den = cellfun ("@tfpoly/get", den, "uniformoutput", false);
   endif
 
 endfunction
\ No newline at end of file

Modified: trunk/octave-forge/main/control/inst/@tf/__get__.m
===================================================================
--- trunk/octave-forge/main/control/inst/@tf/__get__.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/@tf/__get__.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -26,9 +26,9 @@
 
   switch (prop)  # {<internal name>, <user name>}
     case "num"
-      val = cellfun ("@tfpoly/get", sys.num, "UniformOutput", false);
+      val = cellfun ("@tfpoly/get", sys.num, "uniformoutput", false);
     case "den"
-      val = cellfun ("@tfpoly/get", sys.den, "UniformOutput", false);
+      val = cellfun ("@tfpoly/get", sys.den, "uniformoutput", false);
     case {"tfvar", "variable"}
       val = sys.tfvar;
     otherwise

Modified: trunk/octave-forge/main/control/inst/__conv2tfpolycell__.m
===================================================================
--- trunk/octave-forge/main/control/inst/__conv2tfpolycell__.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/__conv2tfpolycell__.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -29,6 +29,6 @@
     nd = {nd};
   endif
 
-  ndr = cellfun (@tfpoly, nd, "UniformOutput", false);
+  ndr = cellfun (@tfpoly, nd, "uniformoutput", false);
 
 endfunction
\ No newline at end of file

Modified: trunk/octave-forge/main/control/inst/bode.m
===================================================================
--- trunk/octave-forge/main/control/inst/bode.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/bode.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -49,6 +49,8 @@
 
 function [mag_r, pha_r, w_r] = bode (sys, w = [])
 
+  ## TODO: multiplot feature:   bode (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 2)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/bodemag.m
===================================================================
--- trunk/octave-forge/main/control/inst/bodemag.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/bodemag.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -47,6 +47,8 @@
 
 function [mag_r, w_r] = bodemag (sys, w = [])
 
+  ## TODO: multiplot feature:   bodemag (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 2)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/impulse.m
===================================================================
--- trunk/octave-forge/main/control/inst/impulse.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/impulse.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -58,6 +58,8 @@
 
 function [y_r, t_r, x_r] = impulse (sys, tfinal = [], dt = [])
 
+  ## TODO: multiplot feature:   impulse (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 3)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/initial.m
===================================================================
--- trunk/octave-forge/main/control/inst/initial.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/initial.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -68,6 +68,8 @@
 
 function [y_r, t_r, x_r] = initial (sys, x0, tfinal = [], dt = [])
 
+  ## TODO: multiplot feature:   initial (sys1, "b", sys2, "r", ..., x0, ...)
+
   if (nargin < 2 || nargin > 4)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/lsim.m
===================================================================
--- trunk/octave-forge/main/control/inst/lsim.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/lsim.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -55,6 +55,8 @@
 
 function [y_r, t_r, x_r] = lsim (sys, u, t = [], x0 = [], method = "zoh")
 
+  ## TODO: multiplot feature:   lsim (sys1, "b", sys2, "r", ..., u, t)
+
   if (nargin < 2 || nargin > 5)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/margin.m
===================================================================
--- trunk/octave-forge/main/control/inst/margin.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/margin.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -123,6 +123,8 @@
 
 function [gamma_r, phi_r, w_gamma_r, w_phi_r] = margin (sys, tol = sqrt (eps))
 
+  ## TODO: multiplot feature:   margin (sys1, "b", sys2, "r", ...)
+
   ## check whether arguments are OK
   if (nargin < 1 || nargin > 2)
     print_usage ();

Modified: trunk/octave-forge/main/control/inst/nichols.m
===================================================================
--- trunk/octave-forge/main/control/inst/nichols.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/nichols.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -49,6 +49,8 @@
 
 function [mag_r, pha_r, w_r] = nichols (sys, w = [])
 
+  ## TODO: multiplot feature:   nichols (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 2)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/nyquist.m
===================================================================
--- trunk/octave-forge/main/control/inst/nyquist.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/nyquist.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -49,6 +49,8 @@
 
 function [re_r, im_r, w_r] = nyquist (sys, w = [])
 
+  ## TODO: multiplot feature:   nyquist (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 2)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/pzmap.m
===================================================================
--- trunk/octave-forge/main/control/inst/pzmap.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/pzmap.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -27,6 +27,9 @@
 
 function [pol_r, zer_r] = pzmap (sys)
 
+  ## TODO: multiplot feature:   pzmap (sys1, "b", sys2, "r", ...)
+  ## TODO: use better symbols for poles and zeros, fltk backend might be helpful
+
   if (nargin != 1)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/rlocus.m
===================================================================
--- trunk/octave-forge/main/control/inst/rlocus.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/rlocus.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -65,6 +65,8 @@
 
 function [rldata_r, k_break, rlpol, gvec, real_ax_pts] = rlocus (sys, increment, min_k, max_k)
 
+  ## TODO: multiplot feature:   rlocus (sys1, "b", sys2, "r", ...)
+
   if (nargin < 1 || nargin > 4)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/sigma.m
===================================================================
--- trunk/octave-forge/main/control/inst/sigma.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/sigma.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -61,6 +61,8 @@
 
 function [sv_r, w_r] = sigma (sys, w = [], resptype = 0)
 
+  ## TODO: multiplot feature:   sigma (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 3)
     print_usage ();
   endif

Modified: trunk/octave-forge/main/control/inst/step.m
===================================================================
--- trunk/octave-forge/main/control/inst/step.m	2010-09-14 15:24:08 UTC (rev 7719)
+++ trunk/octave-forge/main/control/inst/step.m	2010-09-14 19:52:29 UTC (rev 7720)
@@ -58,6 +58,8 @@
 
 function [y_r, t_r, x_r] = step (sys, tfinal = [], dt = [])
 
+  ## TODO: multiplot feature:   step (sys1, "b", sys2, "r", ...)
+
   if (nargin == 0 || nargin > 3)
     print_usage ();
   endif


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.