bug 4852
[scilab.git] / scilab / modules / compatibility_functions / macros / mtlb_eig.sci
index efdb989..4c7f9cf 100644 (file)
@@ -10,6 +10,8 @@
 function [vd,D]=mtlb_eig(A,B)
 // Emulation function for eig() Matlab function
 
+warnobsolete("spec", "5.1.2")
+
 [lhs,rhs]=argn()
 
 if rhs==1 then
@@ -17,11 +19,8 @@ if rhs==1 then
     vd=spec(A)
   else
     [vd,D]=spec(A)
-    if isreal(vd,0) & size(vd,"*")>1 then
-      vd(:,1:2)=-vd(:,1:2)
-    end
   end  
 else
-  error(gettext("mtlb_eig() used with 2 rhs: not yet implemented."));
+  error(msprintf(gettext("%s: use with %d input argument(s) is not yet implemented.\n"),"mtlb_eig",2));
 end
 endfunction