changeset 10241:2eb9871fb3e4 octave-forge

control-devel: minor changes
author paramaniac
date Sat, 12 May 2012 15:32:53 +0000
parents 157fcfea657d
children 52586f108b57
files extra/control-devel/devel/GlassFurnace.m extra/control-devel/devel/PowerPlant.m extra/control-devel/src/slident.cc
diffstat 3 files changed, 8 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-devel/devel/GlassFurnace.m	Sat May 12 15:06:57 2012 +0000
+++ b/extra/control-devel/devel/GlassFurnace.m	Sat May 12 15:32:53 2012 +0000
@@ -38,7 +38,7 @@
 %}
 
 
-close all, clc
+clear all, close all, clc
 
 load glassfurnace.dat
 T=glassfurnace(:,1);
--- a/extra/control-devel/devel/PowerPlant.m	Sat May 12 15:06:57 2012 +0000
+++ b/extra/control-devel/devel/PowerPlant.m	Sat May 12 15:32:53 2012 +0000
@@ -40,7 +40,7 @@
 
 %}
 
-close all, clc
+clear all, close all, clc
 
 % NB: the code from DaISy is wrong:
 %     powerplant(:,1) is just the sample number
--- a/extra/control-devel/src/slident.cc	Sat May 12 15:06:57 2012 +0000
+++ b/extra/control-devel/src/slident.cc	Sat May 12 15:32:53 2012 +0000
@@ -405,8 +405,8 @@
                 "coefficient matrix"};
 
 
-        error_msg ("ident", info_a, 2, err_msg);
-        warning_msg ("ident", iwarn_a, 5, warn_msg);
+        error_msg ("ident: IB01AD", info_a, 2, err_msg);
+        warning_msg ("ident: IB01AD", iwarn_a, 5, warn_msg);
 
 
         // resize
@@ -586,8 +586,8 @@
                 "gain matrix is set to zero"};
 
 
-        error_msg ("ident", info_b, 10, err_msg_b);
-        warning_msg ("ident", iwarn_b, 5, warn_msg_b);
+        error_msg ("ident: IB01BD", info_b, 10, err_msg_b);
+        warning_msg ("ident: IB01BD", iwarn_b, 5, warn_msg_b);
 
         // resize
         a.resize (n, n);
@@ -682,8 +682,8 @@
                 "and/or  B and D  could be inaccurate"};
 
 
-        error_msg ("ident", info_c, 2, err_msg_c);
-        warning_msg ("ident", iwarn_c, 6, warn_msg_c);
+        error_msg ("ident: IB01CD", info_c, 2, err_msg_c);
+        warning_msg ("ident: IB01CD", iwarn_c, 6, warn_msg_c);
       
         
         // return values