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

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

Revision: 6189
          http://octave.svn.sourceforge.net/octave/?rev=6189&view=rev
Author:   paramaniac
Date:     2009-08-31 18:44:42 +0000 (Mon, 31 Aug 2009)

Log Message:
-----------
fix one typo, two simplifications

Modified Paths:
--------------
    trunk/octave-forge/main/control/inst/buildsens.m
    trunk/octave-forge/main/control/inst/sysfeedback.m

Modified: trunk/octave-forge/main/control/inst/buildsens.m
===================================================================
--- trunk/octave-forge/main/control/inst/buildsens.m	2009-08-31 13:51:08 UTC (rev 6188)
+++ trunk/octave-forge/main/control/inst/buildsens.m	2009-08-31 18:44:42 UTC (rev 6189)
@@ -29,7 +29,7 @@
 ## Sensitivity system data structure.
 ## @end table
 ##
-## @seealso{svplot}
+## @seealso{sysfeedback, buildretdiff}
 ##
 ## @example
 ## @group
@@ -61,7 +61,7 @@
 ##
 ## @end deftypefn
 
-## Version: 0.2
+## Version: 0.2.1
 
 function retsys = buildsens (sys)
 
@@ -87,9 +87,9 @@
 
   sysI = ss ([], [], [], eye (n_in), t_sam);
 
-  in_scl = (-1) * ones (1, n_in);
+  in_scl = (-1) * eye (n_in);
 
-  sys = sysscale (sys, [], diag (in_scl));
+  sys = sysscale (sys, [], in_scl);
 
   retsys = feedback (sysI, sys, +1);
 

Modified: trunk/octave-forge/main/control/inst/sysfeedback.m
===================================================================
--- trunk/octave-forge/main/control/inst/sysfeedback.m	2009-08-31 13:51:08 UTC (rev 6188)
+++ trunk/octave-forge/main/control/inst/sysfeedback.m	2009-08-31 18:44:42 UTC (rev 6189)
@@ -72,7 +72,7 @@
 ## @end deftypefn
 
 ## Author: Lukas Reichlin <luk...@sw...>
-## Version: 0.2
+## Version: 0.2.1
 
 function retsys = sysfeedback (sys)
 
@@ -104,7 +104,7 @@
   ## Connect outputs with inputs
   out_idx = 1 : n_out;
 
-  in_dup_idx = (n_in + 1) : (2 * n_in);
+  in_dup_idx = n_in + (1 : n_in);
 
   sys = sysconnect (sys, out_idx, in_dup_idx);
 


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