Mercurial > hg > octave-nkf

comparison scripts/deprecated/exponential_cdf.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
30 30
31 ## Deprecated in version 3.0 31 ## Deprecated in version 3.0
32 32
33 function cdf = exponential_cdf (varargin) 33 function cdf = exponential_cdf (varargin)
34 34
35 persistent warned = false;
36 if (! warned)
37 warned = true;
38 warning ("Octave:deprecated-function",
39 ["exponential_cdf is obsolete and will be removed from a future\n",
40 "version of Octave, please use expcdf instead"]);
41 endif
42
35 if (nargin > 1) 43 if (nargin > 1)
36 varargin{2} = 1 ./ varargin{2}; 44 varargin{2} = 1 ./ varargin{2};
37 endif 45 endif
38 46
39 cdf = expcdf (varargin{:}); 47 cdf = expcdf (varargin{:});