Bug 3643 fixed, mtlb_eig is now obsolete
[scilab.git] / scilab / modules / compatibility_functions / macros / mtlb_eig.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2002-2004 - INRIA - Vincent COUVERT 
3 // 
4 // This file must be used under the terms of the CeCILL.
5 // This source file is licensed as described in the file COPYING, which
6 // you should have received as part of this distribution.  The terms
7 // are also available at    
8 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
9
10 function [vd,D]=mtlb_eig(A,B)
11 // Emulation function for eig() Matlab function
12
13 warnobsolete("spec", "5.1.2")
14
15 [lhs,rhs]=argn()
16
17 if rhs==1 then
18   if lhs==1 then
19     vd=spec(A)
20   else
21     [vd,D]=spec(A)
22   end  
23 else
24   error(msprintf(gettext("%s: use with %d input argument(s) is not yet implemented.\n"),"mtlb_eig",2));
25 end
26 endfunction