Mercurial > hg > octave-lojdl
diff scripts/statistics/distributions/wblrnd.m @ 10549:95c3e38098bf
Untabify .m scripts
author | Rik <code@nomad.inbox5.com> |
---|---|
date | Fri, 23 Apr 2010 11:28:50 -0700 |
parents | 3306cfcb856e |
children | be55736a0783 |
line wrap: on
line diff
--- a/scripts/statistics/distributions/wblrnd.m +++ b/scripts/statistics/distributions/wblrnd.m @@ -37,7 +37,7 @@ if (!isscalar(shape) || !isscalar(scale)) [retval, shape, scale] = common_size (shape, scale); if (retval > 0) - error ("wblrnd: shape and scale must be of common size or scalar"); + error ("wblrnd: shape and scale must be of common size or scalar"); endif endif endif @@ -52,8 +52,8 @@ sz = [r, c]; if (any (size (scale) != 1) && - ((length (size (scale)) != length (sz)) - || any (size (scale) != sz))) + ((length (size (scale)) != length (sz)) + || any (size (scale) != sz))) error ("wblrnd: shape and scale must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -66,8 +66,8 @@ endif if (any (size (scale) != 1) && - ((length (size (scale)) != length (sz)) - || any (size (scale) != sz))) + ((length (size (scale)) != length (sz)) + || any (size (scale) != sz))) error ("wblrnd: shape and scale must be scalar or of size sz"); endif elseif (nargin == 2)