Mercurial > hg > octave-terminal
changeset 11737:dd93a39fa8fe release-3-0-x
Add warning to rest of deprecated functions
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,46 @@ +2008-04-04 David Bateman <dbateman@free.fr> + + * deprecated/beta_cdf.m deprecated/beta_inv.m + deprecated/beta_pdf.m deprecated/beta_rnd.m + deprecated/binomial_cdf.m deprecated/binomial_inv.m + deprecated/binomial_pdf.m deprecated/binomial_rnd.m + deprecated/chisquare_cdf.m deprecated/chisquare_inv.m + deprecated/chisquare_pdf.m deprecated/chisquare_rnd.m + deprecated/clearplot.m deprecated/clg.m deprecated/com2str.m + deprecated/exponential_cdf.m deprecated/exponential_inv.m + deprecated/exponential_pdf.m deprecated/exponential_rnd.m + deprecated/f_cdf.m deprecated/f_inv.m deprecated/f_pdf.m + deprecated/f_rnd.m deprecated/gamma_cdf.m deprecated/gamma_inv.m + deprecated/gamma_pdf.m deprecated/gamma_rnd.m + deprecated/geometric_cdf.m deprecated/geometric_inv.m + deprecated/geometric_pdf.m deprecated/geometric_rnd.m + deprecated/hypergeometric_cdf.m deprecated/hypergeometric_inv.m + deprecated/hypergeometric_pdf.m deprecated/hypergeometric_rnd.m + deprecated/intersection.m deprecated/is_bool.m + deprecated/is_complex.m deprecated/is_list.m + deprecated/is_matrix.m deprecated/is_scalar.m + deprecated/is_square.m deprecated/is_stream.m deprecated/isstr.m + deprecated/is_struct.m deprecated/is_symmetric.m + deprecated/is_vector.m deprecated/lognormal_cdf.m + deprecated/lognormal_inv.m deprecated/lognormal_pdf.m + deprecated/lognormal_rnd.m deprecated/meshdom.m + deprecated/normal_cdf.m deprecated/normal_inv.m + deprecated/normal_pdf.m deprecated/normal_rnd.m + deprecated/pascal_cdf.m deprecated/pascal_inv.m + deprecated/pascal_pdf.m deprecated/pascal_rnd.m + deprecated/poisson_cdf.m deprecated/poisson_inv.m + deprecated/poisson_pdf.m deprecated/poisson_rnd.m + deprecated/polyinteg.m deprecated/setstr.m + deprecated/struct_contains.m deprecated/struct_elements.m + deprecated/t_cdf.m deprecated/t_inv.m deprecated/t_pdf.m + deprecated/t_rnd.m deprecated/uniform_cdf.m + deprecated/uniform_inv.m deprecated/uniform_pdf.m + deprecated/uniform_rnd.m deprecated/weibcdf.m deprecated/weibinv.m + deprecated/weibpdf.m deprecated/weibrnd.m deprecated/weibull_cdf.m + deprecated/weibull_inv.m deprecated/weibull_pdf.m + deprecated/weibull_rnd.m deprecated/wiener_rnd.m: Add warning that + function will be removed in a future version. + 2008-04-04 John W. Eaton <jwe@octave.org> * deprecated/beta_cdf.m, deprecated/beta_inv.m,
--- a/scripts/deprecated/beta_cdf.m +++ b/scripts/deprecated/beta_cdf.m @@ -30,6 +30,14 @@ function cdf = beta_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["beta_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use betacdf instead"]); + endif + cdf = betacdf (varargin{:}); endfunction
--- a/scripts/deprecated/beta_inv.m +++ b/scripts/deprecated/beta_inv.m @@ -30,6 +30,14 @@ function inv = beta_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["beta_inv is obsolete and will be removed from a future\n", + "version of Octave, please use betainv instead"]); + endif + inv = betainv (varargin{:}); endfunction
--- a/scripts/deprecated/beta_pdf.m +++ b/scripts/deprecated/beta_pdf.m @@ -29,6 +29,14 @@ function pdf = beta_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["beta_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use betapdf instead"]); + endif + pdf = betapdf (varargin{:}); endfunction
--- a/scripts/deprecated/beta_rnd.m +++ b/scripts/deprecated/beta_rnd.m @@ -35,6 +35,14 @@ function rnd = beta_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["beta_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use betarnd instead"]); + endif + rnd = betarnd (varargin{:}); endfunction
--- a/scripts/deprecated/binomial_cdf.m +++ b/scripts/deprecated/binomial_cdf.m @@ -29,6 +29,14 @@ function cdf = binomial_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["binomial_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use binocdf instead"]); + endif + cdf = binocdf (varargin{:}); endfunction
--- a/scripts/deprecated/binomial_inv.m +++ b/scripts/deprecated/binomial_inv.m @@ -29,6 +29,14 @@ function inv = binomial_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["binomial_inv is obsolete and will be removed from a future\n", + "version of Octave, please use binoinv instead"]); + endif + inv = binoinv (varargin{:}); endfunction
--- a/scripts/deprecated/binomial_pdf.m +++ b/scripts/deprecated/binomial_pdf.m @@ -30,6 +30,14 @@ function pdf = binomial_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["binomial_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use binopdf instead"]); + endif + pdf = binopdf (varargin{:}); endfunction
--- a/scripts/deprecated/binomial_rnd.m +++ b/scripts/deprecated/binomial_rnd.m @@ -35,6 +35,14 @@ function rnd = binomial_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["binomial_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use binornd instead"]); + endif + rnd = binornd (varargin{:}); endfunction
--- a/scripts/deprecated/chisquare_cdf.m +++ b/scripts/deprecated/chisquare_cdf.m @@ -30,6 +30,14 @@ function cdf = chisquare_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["chisquare_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use chi2cdf instead"]); + endif + cdf = chi2cdf (varargin{:}); endfunction
--- a/scripts/deprecated/chisquare_inv.m +++ b/scripts/deprecated/chisquare_inv.m @@ -30,6 +30,14 @@ function inv = chisquare_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["chisquare_inv is obsolete and will be removed from a future\n", + "version of Octave, please use chi2inv instead"]); + endif + inv = chi2inv (varargin{:}); endfunction
--- a/scripts/deprecated/chisquare_pdf.m +++ b/scripts/deprecated/chisquare_pdf.m @@ -30,6 +30,14 @@ function pdf = chisquare_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["chisquare_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use chi2pdf instead"]); + endif + pdf = chi2pdf (varargin{:}); endfunction
--- a/scripts/deprecated/chisquare_rnd.m +++ b/scripts/deprecated/chisquare_rnd.m @@ -34,6 +34,14 @@ function rnd = chisquare_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["chisquare_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use chi2rnd instead"]); + endif + rnd = chi2rnd (varargin{:}); endfunction
--- a/scripts/deprecated/clearplot.m +++ b/scripts/deprecated/clearplot.m @@ -27,6 +27,14 @@ function clearplot () + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["function clearplot () is obsolete and will be removed from a future\n", + "version of Octave, please use clf instead"]); + endif + clf (); endfunction
--- a/scripts/deprecated/clg.m +++ b/scripts/deprecated/clg.m @@ -27,6 +27,14 @@ function clg () + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["function clg () is obsolete and will be removed from a future\n", + "version of Octave, please use clf instead"]); + endif + clf (); endfunction
--- a/scripts/deprecated/com2str.m +++ b/scripts/deprecated/com2str.m @@ -37,6 +37,14 @@ function retval = com2str (zz, flg) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["com2str is obsolete and will be removed from a future\n", + "version of Octave, please use num2str instead"]); + endif + if (nargin < 1 || nargin > 2) print_usage (); endif
--- a/scripts/deprecated/exponential_cdf.m +++ b/scripts/deprecated/exponential_cdf.m @@ -32,6 +32,14 @@ function cdf = exponential_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["exponential_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use expcdf instead"]); + endif + if (nargin > 1) varargin{2} = 1 ./ varargin{2}; endif
--- a/scripts/deprecated/exponential_inv.m +++ b/scripts/deprecated/exponential_inv.m @@ -30,6 +30,14 @@ function inv = exponential_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["exponential_inv is obsolete and will be removed from a future\n", + "version of Octave, please use expinv instead"]); + endif + if (nargin > 1) varargin{2} = 1 ./ varargin{2}; endif
--- a/scripts/deprecated/exponential_pdf.m +++ b/scripts/deprecated/exponential_pdf.m @@ -29,6 +29,14 @@ function pdf = exponential_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["exponential_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use exppdf instead"]); + endif + if (nargin > 1) varargin{2} = 1 ./ varargin{2}; endif
--- a/scripts/deprecated/exponential_rnd.m +++ b/scripts/deprecated/exponential_rnd.m @@ -35,6 +35,14 @@ function rnd = exponential_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["exponential_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use exprnd instead"]); + endif + if (nargin > 0) varargin{1} = 1 ./ varargin{1}; endif
--- a/scripts/deprecated/f_cdf.m +++ b/scripts/deprecated/f_cdf.m @@ -30,6 +30,14 @@ function cdf = f_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["f_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use fcdf instead"]); + endif + cdf = fcdf (varargin{:}); endfunction
--- a/scripts/deprecated/f_inv.m +++ b/scripts/deprecated/f_inv.m @@ -30,6 +30,14 @@ function inv = f_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["f_inv is obsolete and will be removed from a future\n", + "version of Octave, please use finv instead"]); + endif + inv = finv (varargin{:}); endfunction
--- a/scripts/deprecated/f_pdf.m +++ b/scripts/deprecated/f_pdf.m @@ -30,6 +30,14 @@ function pdf = f_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["f_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use fpdf instead"]); + endif + pdf = fpdf (varargin{:}); endfunction
--- a/scripts/deprecated/f_rnd.m +++ b/scripts/deprecated/f_rnd.m @@ -36,6 +36,14 @@ function rnd = f_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["f_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use frnd instead"]); + endif + rnd = frnd (varargin{:}); endfunction
--- a/scripts/deprecated/gamma_cdf.m +++ b/scripts/deprecated/gamma_cdf.m @@ -30,6 +30,14 @@ function cdf = gamma_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["gamma_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use gamcdf instead"]); + endif + if (nargin > 2) varargin{3} = 1 ./ varargin{3}; endif
--- a/scripts/deprecated/gamma_inv.m +++ b/scripts/deprecated/gamma_inv.m @@ -30,6 +30,14 @@ function inv = gamma_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["gamma_inv is obsolete and will be removed from a future\n", + "version of Octave, please use gaminv instead"]); + endif + if (nargin > 2) varargin{3} = 1 ./ varargin{3}; endif
--- a/scripts/deprecated/gamma_pdf.m +++ b/scripts/deprecated/gamma_pdf.m @@ -30,6 +30,14 @@ function pdf = gamma_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["gamma_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use gampdf instead"]); + endif + if (nargin > 2) varargin{3} = 1 ./ varargin{3}; endif
--- a/scripts/deprecated/gamma_rnd.m +++ b/scripts/deprecated/gamma_rnd.m @@ -35,6 +35,14 @@ function rnd = gamma_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["gamma_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use gamrnd instead"]); + endif + if (nargin > 1) varargin{2} = 1 ./ varargin{2}; endif
--- a/scripts/deprecated/geometric_cdf.m +++ b/scripts/deprecated/geometric_cdf.m @@ -29,6 +29,14 @@ function cdf = geometric_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["geometric_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use geocdf instead"]); + endif + cdf = geocdf (varargin{:}); endfunction
--- a/scripts/deprecated/geometric_inv.m +++ b/scripts/deprecated/geometric_inv.m @@ -29,6 +29,14 @@ function inv = geometric_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["geometric_inv is obsolete and will be removed from a future\n", + "version of Octave, please use geoinv instead"]); + endif + inv = geoinv (varargin{:}); endfunction
--- a/scripts/deprecated/geometric_pdf.m +++ b/scripts/deprecated/geometric_pdf.m @@ -29,6 +29,14 @@ function pdf = geometric_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["geometric_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use geopdf instead"]); + endif + pdf = geopdf (varargin{:}); endfunction
--- a/scripts/deprecated/geometric_rnd.m +++ b/scripts/deprecated/geometric_rnd.m @@ -35,6 +35,14 @@ function rnd = geometric_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["geometric_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use geornd instead"]); + endif + rnd = geornd (varargin{:}); endfunction
--- a/scripts/deprecated/hypergeometric_cdf.m +++ b/scripts/deprecated/hypergeometric_cdf.m @@ -36,6 +36,14 @@ function cdf = hypergeometric_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["hypergeometric_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use hygecdf instead"]); + endif + cdf = hygecdf (varargin{:}); endfunction
--- a/scripts/deprecated/hypergeometric_inv.m +++ b/scripts/deprecated/hypergeometric_inv.m @@ -33,6 +33,14 @@ function inv = hypergeometric_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["hypergeometric_inv is obsolete and will be removed from a future\n", + "version of Octave, please use hygeinv instead"]); + endif + inv = hygeinv (varargin{:}); endfunction
--- a/scripts/deprecated/hypergeometric_pdf.m +++ b/scripts/deprecated/hypergeometric_pdf.m @@ -34,6 +34,14 @@ function pdf = hypergeometric_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["hypergeometric_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use hygepdf instead"]); + endif + pdf = hygepdf (varargin{:}); endfunction
--- a/scripts/deprecated/hypergeometric_rnd.m +++ b/scripts/deprecated/hypergeometric_rnd.m @@ -31,6 +31,14 @@ function rnd = hypergeometric_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["hypergeometric_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use hygernd instead"]); + endif + rnd = hygernd (varargin{:}); endfunction
--- a/scripts/deprecated/intersection.m +++ b/scripts/deprecated/intersection.m @@ -27,6 +27,14 @@ function y = intersection (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["intersection is obsolete and will be removed from a future\n", + "version of Octave, please use intersect instead"]); + endif + y = intersect (varargin{:}); endfunction
--- a/scripts/deprecated/is_bool.m +++ b/scripts/deprecated/is_bool.m @@ -27,6 +27,14 @@ function retval = is_bool (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_bool is obsolete and will be removed from a future\n", + "version of Octave, please use isbool instead"]); + endif + retval = isbool (varargin{:}); endfunction
--- a/scripts/deprecated/is_complex.m +++ b/scripts/deprecated/is_complex.m @@ -27,6 +27,14 @@ function retval = is_complex (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_complex is obsolete and will be removed from a future\n", + "version of Octave, please use iscomplex instead"]); + endif + retval = iscomplex (varargin{:}); endfunction
--- a/scripts/deprecated/is_list.m +++ b/scripts/deprecated/is_list.m @@ -27,6 +27,14 @@ function retval = is_list (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_list is obsolete and will be removed from a future\n", + "version of Octave, please use islist instead"]); + endif + retval = islist (varargin{:}); endfunction
--- a/scripts/deprecated/is_matrix.m +++ b/scripts/deprecated/is_matrix.m @@ -27,6 +27,14 @@ function retval = is_matrix (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_matrix is obsolete and will be removed from a future\n", + "version of Octave, please use ismatrix instead"]); + endif + retval = ismatrix (varargin{:}); endfunction
--- a/scripts/deprecated/is_scalar.m +++ b/scripts/deprecated/is_scalar.m @@ -27,6 +27,14 @@ function retval = is_scalar (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_scalar is obsolete and will be removed from a future\n", + "version of Octave, please use isscalar instead"]); + endif + retval = isscalar (varargin{:}); endfunction
--- a/scripts/deprecated/is_square.m +++ b/scripts/deprecated/is_square.m @@ -27,6 +27,14 @@ function retval = is_square (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_square is obsolete and will be removed from a future\n", + "version of Octave, please use issquare instead"]); + endif + retval = issquare (varargin{:}); endfunction
--- a/scripts/deprecated/is_stream.m +++ b/scripts/deprecated/is_stream.m @@ -27,6 +27,14 @@ function retval = is_stream (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_stream is obsolete and will be removed from a future\n", + "version of Octave, please use isstream instead"]); + endif + retval = isstream(varargin{:}); endfunction
--- a/scripts/deprecated/is_struct.m +++ b/scripts/deprecated/is_struct.m @@ -27,6 +27,14 @@ function retval = is_struct (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_struct is obsolete and will be removed from a future\n", + "version of Octave, please use isstruct instead"]); + endif + retval = isstruct (varargin{:}); endfunction
--- a/scripts/deprecated/is_symmetric.m +++ b/scripts/deprecated/is_symmetric.m @@ -27,6 +27,14 @@ function retval = is_symmetric (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_symmetric is obsolete and will be removed from a future\n", + "version of Octave, please use issymmetric instead"]); + endif + retval = issymmetric (varargin{:}); endfunction
--- a/scripts/deprecated/is_vector.m +++ b/scripts/deprecated/is_vector.m @@ -27,6 +27,14 @@ function retval = is_vector (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["is_vector is obsolete and will be removed from a future\n", + "version of Octave, please use isvector instead"]); + endif + retval = isvector (varargin{:}); endfunction
--- a/scripts/deprecated/isstr.m +++ b/scripts/deprecated/isstr.m @@ -27,6 +27,14 @@ function retval = isstr (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["isstr is obsolete and will be removed from a future\n", + "version of Octave, please use ischar instead"]); + endif + retval = ischar (varargin{:}); endfunction
--- a/scripts/deprecated/lognormal_cdf.m +++ b/scripts/deprecated/lognormal_cdf.m @@ -34,6 +34,14 @@ function cdf = lognormal_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["lognormal_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use logncdf instead"]); + endif + if (nargin > 1) a = varargin{2}; idx = a >= 0;
--- a/scripts/deprecated/lognormal_inv.m +++ b/scripts/deprecated/lognormal_inv.m @@ -34,6 +34,14 @@ function inv = lognormal_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["lognormal_inv is obsolete and will be removed from a future\n", + "version of Octave, please use logninv instead"]); + endif + if (nargin > 1) a = varargin{2}; idx = a >= 0;
--- a/scripts/deprecated/lognormal_pdf.m +++ b/scripts/deprecated/lognormal_pdf.m @@ -34,6 +34,14 @@ function pdf = lognormal_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["lognormal_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use lognpdf instead"]); + endif + if (nargin > 1) a = varargin{2}; idx = a >= 0;
--- a/scripts/deprecated/lognormal_rnd.m +++ b/scripts/deprecated/lognormal_rnd.m @@ -35,6 +35,14 @@ function rnd = lognormal_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["lognormal_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use lognrnd instead"]); + endif + if (nargin > 1) a = varargin{2}; idx = a >= 0;
--- a/scripts/deprecated/meshdom.m +++ b/scripts/deprecated/meshdom.m @@ -27,6 +27,14 @@ function [xx, yy] = meshdom (x, y) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["meshdom is obsolete and will be removed from a future\n", + "version of Octave, please use meshgrid instead"]); + endif + if (nargin == 2) if (isvector (x) && isvector (y)) xx = ones (length (y), 1) * x(:).';
--- a/scripts/deprecated/normal_cdf.m +++ b/scripts/deprecated/normal_cdf.m @@ -32,6 +32,14 @@ function cdf = normal_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["normal_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use normcdf instead"]); + endif + if (nargin > 2) varargin{3} = sqrt (varargin{3}); endif
--- a/scripts/deprecated/normal_inv.m +++ b/scripts/deprecated/normal_inv.m @@ -32,6 +32,14 @@ function inv = normal_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["normal_inv is obsolete and will be removed from a future\n", + "version of Octave, please use norminv instead"]); + endif + if (nargin > 2) varargin{3} = sqrt (varargin{3}); endif
--- a/scripts/deprecated/normal_pdf.m +++ b/scripts/deprecated/normal_pdf.m @@ -32,6 +32,14 @@ function pdf = normal_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["normal_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use normpdf instead"]); + endif + if (nargin > 2) varargin{3} = sqrt (varargin{3}); endif
--- a/scripts/deprecated/normal_rnd.m +++ b/scripts/deprecated/normal_rnd.m @@ -35,6 +35,14 @@ function rnd = normal_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["normal_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use normrnd instead"]); + endif + if (nargin > 1) varargin{2} = sqrt (varargin{2}); endif
--- a/scripts/deprecated/pascal_cdf.m +++ b/scripts/deprecated/pascal_cdf.m @@ -33,6 +33,14 @@ function cdf = pascal_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["pascal_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use nbincdf instead"]); + endif + cdf = nbincdf(varargin{:}); endfunction
--- a/scripts/deprecated/pascal_inv.m +++ b/scripts/deprecated/pascal_inv.m @@ -34,6 +34,14 @@ function inv = pascal_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["pascal_inv is obsolete and will be removed from a future\n", + "version of Octave, please use nbininv instead"]); + endif + inv = nbininv(varargin{:}); endfunction
--- a/scripts/deprecated/pascal_pdf.m +++ b/scripts/deprecated/pascal_pdf.m @@ -34,6 +34,14 @@ function pdf = pascal_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["pascal_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use nbinpdf instead"]); + endif + pdf = nbinpdf (varargin{:}); endfunction
--- a/scripts/deprecated/pascal_rnd.m +++ b/scripts/deprecated/pascal_rnd.m @@ -35,6 +35,14 @@ function rnd = pascal_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["pascal_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use nbinrnd instead"]); + endif + rnd = nbinrnd (varargin{:}); endfunction
--- a/scripts/deprecated/poisson_cdf.m +++ b/scripts/deprecated/poisson_cdf.m @@ -30,6 +30,14 @@ function cdf = poisson_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["poisson_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use poisscdf instead"]); + endif + cdf = poisscdf (varargin{:}); endfunction
--- a/scripts/deprecated/poisson_inv.m +++ b/scripts/deprecated/poisson_inv.m @@ -30,6 +30,14 @@ function inv = poisson_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["poisson_inv is obsolete and will be removed from a future\n", + "version of Octave, please use poissinv instead"]); + endif + inv = poissinv (varargin{:}); endfunction
--- a/scripts/deprecated/poisson_pdf.m +++ b/scripts/deprecated/poisson_pdf.m @@ -29,6 +29,14 @@ function pdf = poisson_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["poisson_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use poisspdf instead"]); + endif + pdf = poisspdf (varargin{:}); endfunction
--- a/scripts/deprecated/poisson_rnd.m +++ b/scripts/deprecated/poisson_rnd.m @@ -33,6 +33,14 @@ function rnd = poisson_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["poisson_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use poissrnd instead"]); + endif + rnd = poissrnd (varargin{:}); endfunction
--- a/scripts/deprecated/polyinteg.m +++ b/scripts/deprecated/polyinteg.m @@ -34,6 +34,14 @@ function y = polyinteg (p) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["polyinteg is obsolete and will be removed from a future\n", + "version of Octave, please use polyint instead"]); + endif + y = polyint (p); endfunction
--- a/scripts/deprecated/setstr.m +++ b/scripts/deprecated/setstr.m @@ -27,6 +27,14 @@ function retval = setstr (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["setstr is obsolete and will be removed from a future\n", + "version of Octave, please use char instead"]); + endif + retval = char (varargin{:}); endfunction
--- a/scripts/deprecated/struct_contains.m +++ b/scripts/deprecated/struct_contains.m @@ -27,6 +27,14 @@ function retval = struct_contains (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["struct_contains is obsolete and will be removed from a future\n", + "version of Octave, please use isfield instead"]); + endif + retval = isfield (varargin{:}); endfunction
--- a/scripts/deprecated/struct_elements.m +++ b/scripts/deprecated/struct_elements.m @@ -27,6 +27,14 @@ function retval = struct_elements (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["struct_elements is obsolete and will be removed from a future\n", + "version of Octave, please use fieldnames instead"]); + endif + retval = char (fieldnames (varargin{:})); endfunction
--- a/scripts/deprecated/t_cdf.m +++ b/scripts/deprecated/t_cdf.m @@ -30,6 +30,14 @@ function cdf = t_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["t_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use tcdf instead"]); + endif + cdf = tcdf (varargin{:}); endfunction
--- a/scripts/deprecated/t_inv.m +++ b/scripts/deprecated/t_inv.m @@ -34,6 +34,14 @@ function inv = t_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["t_inv is obsolete and will be removed from a future\n", + "version of Octave, please use tinv instead"]); + endif + inv = tinv (varargin{:}); endfunction
--- a/scripts/deprecated/t_pdf.m +++ b/scripts/deprecated/t_pdf.m @@ -30,6 +30,14 @@ function pdf = t_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["t_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use tpdf instead"]); + endif + pdf = tpdf (varargin{:}); endfunction
--- a/scripts/deprecated/t_rnd.m +++ b/scripts/deprecated/t_rnd.m @@ -35,6 +35,14 @@ function rnd = t_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["t_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use trnd instead"]); + endif + rnd = trnd (varargin{:}); endfunction
--- a/scripts/deprecated/uniform_cdf.m +++ b/scripts/deprecated/uniform_cdf.m @@ -31,6 +31,14 @@ function cdf = uniform_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["uniform_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use unifcdf instead"]); + endif + cdf = unifcdf (varargin{:}); endfunction
--- a/scripts/deprecated/uniform_inv.m +++ b/scripts/deprecated/uniform_inv.m @@ -31,6 +31,14 @@ function inv = uniform_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["uniform_inv is obsolete and will be removed from a future\n", + "version of Octave, please use unifinv instead"]); + endif + inv = unifinv (varargin{:}); endfunction
--- a/scripts/deprecated/uniform_pdf.m +++ b/scripts/deprecated/uniform_pdf.m @@ -31,6 +31,14 @@ function pdf = uniform_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["uniform_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use unifpdf instead"]); + endif + pdf = unifpdf (varargin{:}); endfunction
--- a/scripts/deprecated/uniform_rnd.m +++ b/scripts/deprecated/uniform_rnd.m @@ -34,6 +34,14 @@ function rnd = uniform_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["uniform_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use unifrnd instead"]); + endif + rnd = unifrnd (varargin{:}); endfunction
--- a/scripts/deprecated/weibcdf.m +++ b/scripts/deprecated/weibcdf.m @@ -34,6 +34,14 @@ function cdf = weibcdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibcdf is obsolete and will be removed from a future\n", + "version of Octave, please use wblcdf instead"]); + endif + cdf = wblcdf (varargin{:}); endfunction
--- a/scripts/deprecated/weibinv.m +++ b/scripts/deprecated/weibinv.m @@ -27,6 +27,14 @@ function inv = weibinv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibinv is obsolete and will be removed from a future\n", + "version of Octave, please use wblinv instead"]); + endif + inv = wblinv (varargin{:}); endfunction
--- a/scripts/deprecated/weibpdf.m +++ b/scripts/deprecated/weibpdf.m @@ -34,6 +34,14 @@ function pdf = weibpdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibpdf is obsolete and will be removed from a future\n", + "version of Octave, please use wblpdf instead"]); + endif + pdf = wblpdf (varargin{:}); endfunction
--- a/scripts/deprecated/weibrnd.m +++ b/scripts/deprecated/weibrnd.m @@ -32,6 +32,14 @@ function rnd = weibrnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibrnd is obsolete and will be removed from a future\n", + "version of Octave, please use wblrnd instead"]); + endif + rnd = wblrnd (varargin{:}); endfunction
--- a/scripts/deprecated/weibull_cdf.m +++ b/scripts/deprecated/weibull_cdf.m @@ -34,6 +34,14 @@ function cdf = weibull_cdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibull_cdf is obsolete and will be removed from a future\n", + "version of Octave, please use wblcdf instead"]); + endif + if (nargin == 2) varargin{3} = varargin{2}; varargin{2} = 1;
--- a/scripts/deprecated/weibull_inv.m +++ b/scripts/deprecated/weibull_inv.m @@ -27,6 +27,14 @@ function inv = weibull_inv (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibull_inv is obsolete and will be removed from a future\n", + "version of Octave, please use wblinv instead"]); + endif + if (nargin == 2) varargin{3} = varargin{2}; varargin{2} = 1;
--- a/scripts/deprecated/weibull_pdf.m +++ b/scripts/deprecated/weibull_pdf.m @@ -34,6 +34,14 @@ function pdf = weibull_pdf (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibull_pdf is obsolete and will be removed from a future\n", + "version of Octave, please use wblpdf instead"]); + endif + if (nargin == 2) varargin{3} = varargin{2}; varargin{2} = 1;
--- a/scripts/deprecated/weibull_rnd.m +++ b/scripts/deprecated/weibull_rnd.m @@ -32,6 +32,14 @@ function rnd = weibull_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["weibull_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use wblrnd instead"]); + endif + if (nargin > 1) tmp = varargin{2}; varargin{2} = varargin{1};
--- a/scripts/deprecated/wiener_rnd.m +++ b/scripts/deprecated/wiener_rnd.m @@ -35,6 +35,14 @@ function retval = wiener_rnd (varargin) + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + ["wiener_rnd is obsolete and will be removed from a future\n", + "version of Octave, please use wienrnd instead"]); + endif + retval = wienrnd (varargin{:}); endfunction