# HG changeset patch
# User jwe
# Date 1142608481 0
# Node ID 9be68956e4509147e4749e2636e66fdf45296664
# Parent  161ebd1f34108e4b9bc6d8fc68ca2b386c24a665
[project @ 2006-03-17 15:14:41 by jwe]

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,10 @@
 2006-03-17  John W. Eaton  <jwe@octave.org>
 
+	* deprecated/hypergeometric_rnd.m: Update interface to match
+	current 2.1.x version.
+
+	* deprecated/t_rnd.m: Call trnd, not t_rnd.
+
 	* miscellaneous/dir.m: Use readdir instead of glob.
 	Special case for "." to avoid globbing.  Use list_in_columns.
 	Eliminate unused variables len and finfo.
diff --git a/scripts/deprecated/hypergeometric_rnd.m b/scripts/deprecated/hypergeometric_rnd.m
--- a/scripts/deprecated/hypergeometric_rnd.m
+++ b/scripts/deprecated/hypergeometric_rnd.m
@@ -18,30 +18,18 @@
 ## 02110-1301, USA.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {} hypergeometric_rnd (@var{n_size}, @var{m}, @var{t}, @var{n})
-## @deftypefnx {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c})
-## @deftypefnx {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{sz})
-## Generate a row vector containing a random sample of size @var{n_size}
-## from the hypergeometric distribution with parameters @var{m}, @var{t},
+## @deftypefn {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c})
+## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{sz})
+## Return an @var{r} by @var{c} matrix of random samples from the
+## hypergeometric distribution with parameters @var{m}, @var{t},
 ## and @var{n}.
 ##
-## If  @var{r} and @var{c} are given create a matrix with @var{r} rows and
-## @var{c} columns. Or if @var{sz} is a vector, create a matrix of size
-## @var{sz}.
-##
 ## The parameters @var{m}, @var{t}, and @var{n} must positive integers
 ## with @var{m} and @var{n} not greater than @var{t}.
 ## @end deftypefn
 
-function rnd = hypergeometric_rnd (N, m, t, n)
+function rnd = hypergeometric_rnd (varargin)
 
-  switch (nargin)
-    case 3
-      rnd = hygernd (m, t, N);
-    case 4
-      rnd = hygernd (m, t, N, n);
-    otherwise
-      usage ("rnd = hypergeometric_rnd (N, m, t, n)");
-  endswitch
+  rnd = hygernd (varargin{:});
 
 endfunction
diff --git a/scripts/deprecated/t_rnd.m b/scripts/deprecated/t_rnd.m
--- a/scripts/deprecated/t_rnd.m
+++ b/scripts/deprecated/t_rnd.m
@@ -34,6 +34,6 @@
 
 function rnd = t_rnd (varargin)
 
- rnd =  t_rnd (varargin{:});
+ rnd =  trnd (varargin{:});
 
 endfunction
diff --git a/scripts/statistics/distributions/hygernd.m b/scripts/statistics/distributions/hygernd.m
--- a/scripts/statistics/distributions/hygernd.m
+++ b/scripts/statistics/distributions/hygernd.m
@@ -18,17 +18,12 @@
 ## 02110-1301, USA.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {} hygernd (@var{n_size}, @var{m}, @var{t}, @var{n})
-## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c})
+## @deftypefn {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c})
 ## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{sz})
-## Generate a row vector containing a random sample of size @var{n_size}
-## from the hypergeometric distribution with parameters @var{m}, @var{t},
+## Return an @var{r} by @var{c} matrix of random samples from the
+## hypergeometric distribution with parameters @var{m}, @var{t},
 ## and @var{n}.
 ##
-## If  @var{r} and @var{c} are given create a matrix with @var{r} rows and
-## @var{c} columns. Or if @var{sz} is a vector, create a matrix of size
-## @var{sz}.
-##
 ## The parameters @var{m}, @var{t}, and @var{n} must positive integers
 ## with @var{m} and @var{n} not greater than @var{t}.
 ## @end deftypefn