diff scripts/statistics/distributions/gamrnd.m @ 11587:c792872f8942

all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children 19b9f17d22af
line wrap: on
line diff
--- a/scripts/statistics/distributions/gamrnd.m	Thu Jan 20 17:24:59 2011 -0500
+++ b/scripts/statistics/distributions/gamrnd.m	Thu Jan 20 17:35:29 2011 -0500
@@ -19,9 +19,9 @@
 ## -*- texinfo -*-
 ## @deftypefn  {Function File} {} gamrnd (@var{a}, @var{b}, @var{r}, @var{c})
 ## @deftypefnx {Function File} {} gamrnd (@var{a}, @var{b}, @var{sz})
-## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of 
+## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of
 ## random samples from the Gamma distribution with parameters @var{a}
-## and @var{b}.  Both @var{a} and @var{b} must be scalar or of size 
+## and @var{b}.  Both @var{a} and @var{b} must be scalar or of size
 ## @var{r} by @var{c}.
 ##
 ## If @var{r} and @var{c} are omitted, the size of the result matrix is
@@ -35,7 +35,7 @@
 function rnd = gamrnd (a, b, r, c)
 
   if (nargin > 1)
-    if (!isscalar(a) || !isscalar(b)) 
+    if (!isscalar(a) || !isscalar(b))
       [retval, a, b] = common_size (a, b);
       if (retval > 0)
         error ("gamrnd: A and B must be of common size or scalar");
@@ -83,7 +83,7 @@
     else
       rnd = b .* randg(a, sz);
     endif
-  else 
+  else
     k = find (!(a > 0) | !(a < Inf) | !(b > 0) | !(b < Inf));
     if (any (k))
       rnd(k) = NaN;