Mercurial > hg > octave-nkf

comparison scripts/deprecated/exponential_inv.m @ 7696:0a362fa8f3c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add warning to rest of deprecated functions
author David Bateman <dbateman@free.fr>
date Fri, 04 Apr 2008 10:18:35 -0400
parents 8e5371d47da6
children 1cdb42b372e8 72830070a17b
comparison
equal deleted inserted replaced
7695:eacf87a24f55 7696:0a362fa8f3c8
28 28
29 ## Deprecated in version 3.0 29 ## Deprecated in version 3.0
30 30
31 function inv = exponential_inv (varargin) 31 function inv = exponential_inv (varargin)
32 32
33 persistent warned = false;
34 if (! warned)
35 warned = true;
36 warning ("Octave:deprecated-function",
37 ["exponential_inv is obsolete and will be removed from a future\n",
38 "version of Octave, please use expinv instead"]);
39 endif
40
33 if (nargin > 1) 41 if (nargin > 1)
34 varargin{2} = 1 ./ varargin{2}; 42 varargin{2} = 1 ./ varargin{2};
35 endif 43 endif
36 44
37 inv = expinv (varargin{:}); 45 inv = expinv (varargin{:});